Hallo,
könntet ihr mir bitte einen Tipp geben, wie man eine msg-box bestätigt, für den Fall, dass sie erscheint?
Konkret:
Ich will eine Outlook Exchange synchronisierung automatisieren, was ich soweit auch halbwegs hinbekommen habe.
Danach soll Outlook geschlossen werden. Manchmal erscheint aber eine msg über Synchronisationsfehler, die man aber ignorieren kann. Die msg muss aber unbedingt bestätigt werden, da Outlook sonst nicht beendet werden kann.
Wie kann ich das machen, dass die msg eben nur dann bestätigt wird, wenn sie auch erscheint???
Spoiler anzeigen
Run("c:\Program Files\Cisco Systems\VPN Client\ipsecdialer.exe")
WinSetOnTop("VPN Client - Version 4.0.1 (Rel)","", 1) ;Fenster im Vordergrund ...
WinActivate("VPN Client - Version 4.0.1 (Rel)","") ;Fenster aktivieren ...
WinWaitActive("VPN Client - Version 4.0.1 (Rel)","") ;warte bis Fenster Active ...
Send("{ENTER}")
Sleep(20000)
Send("password")
Sleep(2000)
Send("{ENTER}")
Run("c:\Program Files\Microsoft Office\Office\outlook.exe")
Sleep(5000)
Send("!w")
WinWaitActive("Inbox - Microsoft Outlook","")
Sleep(2000)
Send("{F9}")
;Sleep(300000)
Sleep(30000)
WinSetOnTop("VPN Client - Version 4.0.1 (Rel)","", 1)
WinActivate("VPN Client - Version 4.0.1 (Rel)","")
WinWaitActive("VPN Client - Version 4.0.1 (Rel)","")
Sleep(2000)
Send("!c")
Send("d")
Sleep(5000)
WinClose("VPN Client - Version 4.0.1 (Rel)","")
Sleep(2000)
Run("c:\Program Files\Pivotal\Relation\relation.exe")
Sleep(2000)
Send("{ENTER}")
WinSetOnTop("Relationship - Mobile SQL7","", 1)
WinActivate("Relationship - Mobile SQL7","")
;Sleep(300000)
Sleep(30000)
WinClose("Relationship - Mobile SQL7","")
If Not WinActive("Pivotal Relationship","") Then WinActivate("Pivotal Relationship","")
Send("{ENTER}")
WinWaitActive("Inbox - Microsoft Outlook","")
; Send("{ENTER}") Einfach auf gut Glück mal Enter senden funktioniert leider nicht...
WinClose("Inbox - Microsoft Outlook","")
Ersuche um Nachsicht und -hilfe...