Как остановить закрытие браузера в VBA - PullRequest
0 голосов
/ 02 августа 2020

Я пытаюсь автоматически войти на веб-сайт и работаю там. Я хотел бы, чтобы он оставался открытым без использования команды остановки (команды остановки не позволяют запускать другие vba). Как оставить браузер открытым?

Function OzarkLogin()
Dim bot As New WebDriver
bot.Start "chrome", "https://supplyline.oreillyauto.com/wps/portal/supplyline/"
bot.Get "/"
bot.FindElementById("userId").SendKeys DLookup("[User ID]", "Ozark Password")
bot.Wait 1000
bot.FindElementById("password").SendKeys DLookup("[Password]", "Ozark Password")
bot.FindElementByName("loginbutton").Click
bot.Window.Maximize
Stop
End Function

1 Ответ

0 голосов
/ 18 августа 2020

Объявите bot как переменную publi c вне вашей функции, таким образом она не будет уничтожена при завершении функции / подпрограммы. Не забудьте в какой-то момент закрыть драйвер.

...