Мне нужно зайти на сайт, для которого необходимо заполнить форму прокси . Я не смог пройти через форму, используя Selenium VBA.
Я вызвал VBS скрипт из VBA , чтобы заполнить форму. Работает, когда ПК не заблокирован.
Ниже приведена форма прокси.
Код Outlook VBA для вызова VBS:
Dim bot as new chromedriver
bot.Start "chrome", "https://nissan.service-now.com/nav_to.do?uri=%2Fhome.do%3F"
bot.Get ("https://nissan.service-now.com/nav_to.do?uri=%2Fhome.do%3F") '//load webpage
strFileName = "d:\LocalData\Z018439\Desktop\MY\NX-AMO\VBACodes\Shell.vbs"
Set oshell = CreateObject("Wscript.shell")
oshell.Run "vbsc " & strFileName '//call vbs file
VBS код для заполнения формы прокси:
Sub test()
Dim shell_object
Dim app_path, time
wscript.Sleep 12000
shell_object = "wscript.shell"
Set objshell = CreateObject(shell_object)
objshell.SendKeys ""
objshell.SendKeys "{Tab}"
objshell.SendKeys ""
objshell.SendKeys "{Enter}"
End Sub
Когда ПК заблокирован, функция клавиатуры отключена и, следовательно, sendkeys (VBS) не работает. Запуск выполняется по прибытии новой почты в Outlook.
Как заполнить форму прокси, когда ПК заблокирован.