Hallo,
liebe Experten, habe schon eine ganze Zeit damit verbracht mich in ein Programm einzuloggen.
Leider ohne Erfolg.
Da mein englisch nicht so gut ist, habe ich mir die ganzen Seiten von Danp2 mit dem Übersetzer angeschaut.
Ich komme einfach nicht weiter.
Vielleicht ist einer so nett und hilft mir dabei.
Bin absoluter Anfänger!
Liebe Grüße
Windi
C
#include "wd_core.au3"
#include "wd_helper.au3"
;$_WD_DEBUG = False
FileChangeDir(".\WebDriver-0.1.0.13")
Local $sDesiredCapabilities, $sSession, $sElement
;Local $sEmailAddress = 'mein@gmx.de'
;Local $sPassword = 'meinpassword'
SetupGecko()
_WD_Window($sSession, "Maximize", "")
_WD_Startup()
Local $sSession = _WD_CreateSession($sDesiredCapabilities)
_WD_Navigate($sSession, "https://mydrive.tomtom.com/de_de/#+viewport=51.80712,7.8184,13,0,-0+ver=3 ")
;$sElement = _WD_FindElement($sSession, $_WD_LOCATOR_ByXPath,'//*[@id="cookie_banner_allow_button"]')
;sleep(1000)
;_WD_ElementAction ($sSession, $sElement, "click" )
; Click Anmelde button
Local $sButton = _WD_FindElement($sSession, $_WD_LOCATOR_ByXPath, '//*[@id="greenland-desktop-headerView-loginButton"]')
_WD_ElementAction($sSession, $sButton, 'click')
; _WD_LoadWait($sSession, 2000)
Func SetupGecko()
_WD_Option('Driver', 'geckodriver.exe')
_WD_Option('DriverParams', '--log trace')
_WD_Option('Port', 4444)
$sDesiredCapabilities = '{"desiredCapabilities":{"javascriptEnabled":true,"nativeEvents":true,"acceptInsecureCerts":true}}'
EndFunc ;==>SetupGecko
Alles anzeigen