ich weiss nicht ob's hier richtig ist, aba ich hab ein kleines script für meine arbeit geschrieben.
Problem war:
Ich sende einzelne Arbeitsblätter aus einer Exceldatei an verschiedene Empfänger mittels Makro. Outlook 2003 meldet sich dann immer mit ner Messagebox und einem für 5 Sek gesperrten "Ja" Button.
Das war mir zu blöd, also hab ich mal im Internet gesucht. Das Outlookplugin das Abhilfe schaffen sollte geht bei mir nicht, ein kostenpflichtiges Tool (ja, da gibt's eines mit selben Funktionsumfang wie mein Script) kam nicht in frage.
Also selber schnell ein paar Zeilen getippselt =) vielleicht findet's ja wer brauchbar.
Code
Opt("WinTitleMatchMode", 4)
dim $result
While 1
While WinExists("[CLASS:#32770; TITLE:Microsoft Office Outlook]")
WinActivate(WinExists("[CLASS:#32770; TITLE:Microsoft Office Outlook]"))
MouseClick("left")
ControlEnable("[CLASS:#32770; TITLE:Microsoft Office Outlook]","","[CLASSNN:Button4; INSTANCE:4; ID:4774]")
ControlClick("[CLASS:#32770; TITLE:Microsoft Office Outlook]","","[CLASSNN:Button4; INSTANCE:4; ID:4774]")
WEnd
WEndlg Ju