SeleniumBasic ne semble plus fonctionner avec Firefox depuis la version 47.0 de Firefox
hello,
Le problème (du moins chez moi) était dû au fait que le WebDriver pour Firefox n'était plus à jour dans SeleniumBasic. En effet la dernière version de SeleniumBasic date de mars 2016 et depuis le driver Firefox a évolué de son côté pour prendre en compte les nouvelles versions de Firefox.
Voici comment procéder pour mettre à jour ce driver :
D'abord il faut localiser le répertoire où sont les fichiers de SeleniumBasic :
sur mon pc sous windows 7 ils se trouvent dans le répertoire C:\Users\<nom du user>\AppData\Local\SeleniumBasic
le driver en cause est firefoxdriver.xpi le renommer firefox.xpi.old
Ensuite pour récupérer un driver à jour faire ceci (je n'ai pas trouvé le driver firefox tout seul à télécharger :( )
Télécharger le Selenium Standalone server version 2.53.1 ici
Ouvrir le fichier jar téléchargé avec 7zip
Descendre dans l'arborescence jusqu'à selenium-server-standalone-2.53.1.jar\org\openqa\selenium\firefox\
Extraire le fichier webdriver.xpi et le renommer firefoxdriver.xpi
Le mettre dans le répertoire C:\Users\<nom du user>\AppData\Local\SeleniumBasic
Avec ce nouveau driver j'arrive à utiliser SeleniumBasic avec Firefox 47.0.1 32 bits . J'utilise Excel 2010 32 bits sous windows 7 64 bits.
Voici le code VBA qui fonctionne chez moi pour effectuer ce qui était demandé la discussion piloter-fenetre-windows-vba en utilisant SeleniumBasic
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29
| Public Sub AspirateurABC()
'J.P Juillet 2016
Dim by As New by, Assert As New Assert, Verify As New Verify, Waiter As New Waiter
Dim driver As New WebDriver
'on change les paramètres de Firefox pour un téléchargement automatique
'des fichiers .txt
' on peut ajouter une extension dans le profil utilisé
' driver.AddExtension ("f:\temp\Adblock_plus.xpi")
driver.SetPreference "browser.download.folderList", 2
driver.SetPreference "browser.download.manager.showWhenStarting", False
driver.SetPreference "browser.download.dir", "f:\mytemp"
' ne pas demander pour les fichiers .txt (pour les csv -> text/csv)
driver.SetPreference "browser.helperApps.neverAsk.saveToDisk", "text/plain"
driver.Start "firefox", "http://www.abcbourse.com/"
'driver.Start "internet explorer", "http://www.abcbourse.com/"
driver.Get "/download/historiques.aspx"
driver.FindElementById("ctl00_BodyABC_strDateDeb").Clear
driver.FindElementById("ctl00_BodyABC_strDateDeb").SendKeys "26/05/2015"
driver.FindElementById("ctl00_BodyABC_strDateFin").Clear
driver.FindElementById("ctl00_BodyABC_strDateFin").SendKeys "26/05/2016"
driver.FindElementById("ctl00_BodyABC_oneSico").Click
driver.FindElementById("ctl00_BodyABC_txtOneSico").Clear
driver.FindElementById("ctl00_BodyABC_txtOneSico").SendKeys "FR0000120222"
driver.FindElementById("ctl00_BodyABC_Button1").Click
'tempo pour permettre le téléchargement
'on pourrait tester l'apparition du fichier téléchargé
Application.Wait Now + TimeValue("0:00:10")
driver.Quit
End Sub |
Ami calmant, J.P