Beiträge von DavidSWP

danke

Hallo,

ich habe ein Problem. Ich schreibe meine Skripte in AutoIT auf einem XP-PC mit Office Basic (nur PowerPoint Viewer).

Ich soll derzeitig eine Präsentation automatisieren auf einem PC mit Windows 7 und Office 2007.

Leider habe ich keine Möglichkeit mir den Title und die Class von den Windows von PowerPoint zu erarbeiten.

Deshalb meine bitte. Kann mir jemand bitte den Title und die Class von der Speicherabfrage beim Schließen der PowerPoint Präsentation senden.

Bedingung Microsoft Office 2007 und ein Windows 7 System

Vielen Dank

danke. bei inet seiten suche ich einen befehl der sowas aussagt wie: wenn die seite ausgeladen hat dann mache ....

gibt es so einen?

Hammer mit dem Befehl do until läuft alles durch.

Vielen Dank

Wie funzt den WINWAITACTIVE??

Hallo ich habe ein Script geschrieben

• Das Script soll das Wetterprogramm öffnen
• ist dieses offen, soll er die Wetterdaten holen
• Wenn der Ladebalken durch ist soll er Outlook öffnen
• und einen Screenshot machen
• und diesen per Mail senden
• dann soll er Outlook schließen
• dann soll er das MEVIS-Fenster öffnen
• die Daten exportieren
• wenn Bestimmte Fenster sich nach und nach öffen soll er sie abarbeiten
• am ende Mevis schließen
• Beenden bestätigen

run("C:\Programme\Mevis\Mevis.exe")
if WinActive("[CLASS:MEVIS]") then ;Frage 1 Schleife wird nicht ausgeführt warum?
sleep(1000)
Send("{ALT down}")
send("s")
send("m")
Send("{ALT up}")
Sleep(1000)
EndIf
if WinActive("[TITLE:Geräteabfrage:;CLASS:#32770]") then
send("{DOWN}")
send("{ENTER}")
SLEEP(2000)
EndIf

While 1
If WinActive("[CLASS:KomObj1]") Then
Sleep(3000)
Else
Send("{PRINTSCREEN}")
Run("C:\Programme\Microsoft Office\Office12\OUTLOOK.exe") ;öffnet outlook zuerst soll erst MEVIS öffnen dann Abfragen und erst wenn oben alles fertig weitermachen
sleep(5000)
send("^{n}")
If WinActive("[CLASS:rctrl_renwnd32]") then
sleep(3000)
send(max.mustermann@....de)
send("{TAB 3}")
send("Wetterstationsdaten heruntergeladen")
send("{Tab}")
send("Die Messwerte der Wetterstation wurden heruntergeladen")
send("{ENTER}{ENTER}")
send("^{v}")
sleep(1000)
send("!{s}")
sleep(1000)
Else
send("^{n}")
ExitLoop
Endif
ExitLoop
EndIf
WEnd
sleep(5000)
WinClose("[CLASS:rctrl_renwnd32]")
WinActivate("[CLASS:MEVIS]")
if WinActive("[CLASS:MEVIS]") then
send("!{e}")
sleep(1000)
send("{ENTER}")
EndIf
if WinActive("[TITLE:dBase-Datenbank ausgeben;CLASS:#32770]") then ;Winactive geht nicht!
send("{ENTER}")
EndIf
If WinActive("[TITLE:Datenbank speichern unter;CLASS:#32770]") then ;Winactive geht nicht!
send("{LEFT}")
sleep(1000)
send("{ENTER}")
EndIf
if WinActive("[TITLE:Datenbank speichern unter; CLASS:#32770]") then ;Winactive geht nicht!
send("{LEFT}")
send("{ENTER}")
EndIf
if WinActive("[TITLE:Frage;CLASS:#32770]") then ;Winactive geht nicht!
send("{ENTER}")
EndIf
sleep(20000)
WinClose("[CLASS:MEVIS]")
sleep(1000)
send("{LEFT}{ENTER}")
Exit

die grünen Texte sind meine problemstellen

Vielen DANK

Nach ein paar Änderungen ist der Quelletext jetzt so:

run("C:\Programme\Mevis\Mevis.exe")
WinWait("[CLASS:MEVIS]", "", 10)
Send("{ALT down}")
send("s")
send("m")
Send("{ALT up}")
Sleep(1000)
send("{DOWN}")
send("{ENTER}")
SLEEP(2000)
While 1
If WinActive("[CLASS:KomObj1]") Then ;Wenn Ladefenster offen ist warte 10 sec ; Dauerabfrage bis Ladefenster weg
Sleep(3000)
Else ;sonst arbeite ab
Send("{PRINTSCREEN}")
Run("C:\Programme\Microsoft Office\Office12\OUTLOOK.exe")
WinWait("Posteingang - Microsoft Outlook", "", 10)
send("^{n}")
sleep(3000)
send([email='blabla@web.de'][/email])
send("{TAB 3}")
send("Wetterstationsdaten heruntergeladen")
send("{Tab}")
send("Die Messwerte der Wetterstation wurden heruntergeladen")
send("{ENTER}{ENTER}")
send("^{v}")
sleep(1000)
send("!{s}")
ExitLoop
EndIf
WEnd
send("!{e}")
send("{ENTER}{ENTER}{ENTER}")
send("{LEFT}{ENTER}{ENTER}")

Leider macht er Outlook jetzt zu früh auf

ok Danke. @ alpines ich arbeite seid 1 tag mit Autoit also entschuldigt die Fragerei. wie verwende ich winexists / win activate immer in if schleifen?

Danke arbeite eure Tipps ein.

Was sind Tags??

Hallo ich soll ein Script verfassen in dem ein Programm (Wetterstation) geöffnet wird und Wetterdaten geladen werden. Als Bestätigung soll eine Email mit einem Screenshot gesendet werden. Danach soll zurück in das erste Programm gesprungen werden und weiter Befehle programmiert werden. Mein Problem ist das nach dem ende der While-Schleife für den Screenshot keine befehle mehr genommen werden.

Scripttext:

run("C:\Programme\Mevis\Mevis.exe")
Sleep(10000)
Send("{ALT down}")
send("s")
send("m")
Send("{ALT up}")
Sleep(1000)
send("{DOWN}")
send("{ENTER}")
SLEEP(2000)
While 1
If WinActive("[CLASS:KomObj1]") Then ;Wenn Ladefenster offen ist warte 10 sec ; Dauerabfrage bis Ladefenster weg
Sleep(3000)
Else ;sonst arbeite ab
Send("{PRINTSCREEN}")
Run("C:\Programme\Microsoft Office\Office12\OUTLOOK.exe")
Sleep(20000)
send("^{n}")
sleep(3000)
send("max.musterman@mail.de")
send("{TAB 3}")
send("Wetterstationsdaten heruntergeladen")
send("{Tab}")
send("Die Messwerte der Wetterstation wurden heruntergeladen")
send("{ENTER}{ENTER}")
send("^{v}")
sleep(1000)
send("!{s}")
Exit
EndIf
WEnd
WinActivate("[CLASS:MEVIS]")
send("!{e}")
send("{ENTER}{ENTER}{ENTER}")
send("{LEFT}{ENTER}{ENTER}")

Danke für eure Hilfe!