- #Automatically download chromedriver selenium drivers#
- #Automatically download chromedriver selenium update#
- #Automatically download chromedriver selenium code#
Next, you need to create a Class Module named SeleniumWebDriver. But if you can follow along, you might be able to add your own support for any of the other SeleniumBasic-supported WebDrivers.īefore we get started, it is important to enable the following References by going to Tools > References within the VBE:
#Automatically download chromedriver selenium drivers#
I should start out by saying that I am only supporting Chrome and Edge drivers for the time being. Success = ShellExecute(0, "runas", tmpbatpath, aPic, vbNullString, SW_SHOWNORMAL) Print #1, "taskkill /f /im Chromedriver.exe" If IsProcessRunning("Chromedriver.exe") Then ' Print #1, "taskkill /f /im Googleupdate.exe" ' Print #1, "taskkill /f /im GoogleCrashHandler64.exe" ' Print #1, "taskkill /f /im GoogleCrashHandler.exe" 'Enable these if required to copy chromedriver.exe 'Check if Chromedriver downloaded successfully
Tmpbatpath = Tempfolder & "copychdrv.bat" 'Create batch file to copy chromedriver.exe to Seleniumbasic folder and run it using Administrator rights OApp.Namespace(Tempfolder).CopyHere oApp.Namespace(TempZipFile).Items Set oApp = CreateObject("Shell.Application") SaveToFile TempZipFile, adSaveCreateOverWrite
Leftversion_no = dotsarr3(0) & dotsarr3(1)ĭownload_url = "" + version_number + "/chromedriver_win32.zip"Ĭall objHttp.Open("GET", download_url, False) 'Get latest release version of chromedriver which matches installed version of Chrome
#Automatically download chromedriver selenium update#
" & vbCrLf & "Chrome version is " & chrversion & vbCrLf & "Chrome driver version is " & chrdrv, vbYesNo, "Do you want to update Chromedriver ?") Myyn = MsgBox("Wrong version of chromedriver. 'If major version mismatch (first two numbers) then ask if update required Gspath = Chr(34) & SeleniumFolder & "chromedriver.exe" & Chr(34)Įrrcode = oShell.Exec(torun).StdOut.ReadAll Set objHttp = CreateObject("MSXML2.ServerXMLHTTP.6.0")Ĭhrversion = CreateObject("WScript.Shell").RegRead("HKEY_CURRENT_USER\Software\Google\Chrome\BLBeacon\version") 'Delete chromedriver.exe from temporary folder if it already exists TempDrvFile = Tempfolder & "Chromedriver.exe" SeleniumFolder = Environ$("ProgramW6432") & "\SeleniumBasic\" TempZipFile = Tempfolder & "Chromedriver.zip"
#Automatically download chromedriver selenium code#
I am not using Edge so that code functionality is not there in my code. Also, adding a functionality to run the update only if the current chrome version does not match installed chromedriver version. There is now an API to check Latest Release of ChromeDriver. SeleniumBasic is a good tool for certain applications, but often lacks community support as VBA is not as widely used in the community as other languages - at least not on a more sophisticated level. While this is a Self-Answered question, I absolutely would love to see other methods posted here for myself and other users to try out. But for the most part, it should just work. The problem I can see in the future is that layouts of each respective webpage may change, so I do welcome updates if this is the case and I will try to update as well. Now I don't claim this to be the perfect solution, but it at least works. In my web searching, I have found support for other languages to "auto-update" their versions of these drivers, but VBA, as usual, was lacking support. For those who use SeleniumBasic, you know it can be a hassle to manually download the driver from the respective webpage every so often when your main Host browser gets a major update. I have searched the web for a solution to "auto-update" my Selenium EdgeDriver automatically.
0 kommentar(er)
