Загрузка страницы

Whatsapp Desktop Automation with VBA

How to automate Whatsapp Desktop to login, search for user, send message and attachment and logout.
Here's the complete macro or VBA code:
Option Explicit
Dim driver As New WebDriver
Sub LoginSearchUserSendMessageAttachmentViaWhatsapp()
'Chrome Driver
'Selenium
'Selenium Wrapper

Dim keys As New SeleniumWrapper.keys
Dim filepath As String

filepath = "C:\exceltrainingvideos-12\find-header-with-todays-date.xlsm"

driver.Start "chrome"
driver.Get "https://web.whatsapp.com/"
driver.Window.Maximize

driver.Wait 5000

'driver.Wait 2000
driver.FindElementByXPath("//span[@title = 'Dt']").Click
driver.Wait 1000
driver.SendKeys (keys.Tab + keys.Tab)
driver.Wait 1000
driver.SendKeys ("Poonam Mobile")
driver.Wait 1000
driver.SendKeys (keys.Enter)
driver.FindElementByClass ("_3FRCZ")
driver.SendKeys ("Please study *the below attached file* for the class tomorrow.")
driver.Wait 1000
driver.SendKeys (keys.Enter)

driver.Wait 2000
driver.FindElementByXPath("//div[@title='Attach']").Click

driver.Wait 10000
driver.FindElementByXPath("//input[@accept='image/*,video/mp4,video/3gpp,video/quicktime']").SendKeys (filepath)

driver.Wait 2000 ' this wait time depends on the size of your file max 64 mb
driver.FindElementByXPath("//span[@data-icon = 'send']").Click

driver.Wait 1000
driver.FindElementByXPath("//div[@title = 'Menu']").Click
driver.FindElementByXPath("//div[@title='Log out']").Click

driver.Quit

End Sub

Видео Whatsapp Desktop Automation with VBA канала Dinesh Kumar Takyar
Показать
Комментарии отсутствуют
Введите заголовок:

Введите адрес ссылки:

Введите адрес видео с YouTube:

Зарегистрируйтесь или войдите с
Информация о видео
1 октября 2020 г. 23:26:15
00:12:51
Яндекс.Метрика