Hallo ich bin ein AutoIt Newbie habe mir allerdings die Deutsche Englische Hilfe durchgelesen einige Tutorials gemacht usw. aber nun...
Ich arbeite im Moment in einer Firma und diese Fragten mich ob es möglich wäre eine bestimmten ablauf zu automatisieren da hab ich mich umgeschaut und bin auf AutoIt gestossen. Ansonsten habe ich nur noch Ahnung von HTML & BATCH
Mein Script hier funktioniert Tadellos allerdings nur wenn es per RemotedesktopVerbindung aufgerufen wird da dies natürlich nicht der Sinn dieses Unternehmens ist (Datei liegt auf einem Server) muss das Script auch ablaufen wenn kein Benutzer angemeldet ist.
Es scheint wohl daran zu liegen das er im abgemeldeten zustand die Console für die Befehle (DOS ähnliche Umgebung) nicht öffnen kann
gibts für sowas noch irgendwelche tollen Tricks?`
Wäre schön wenn mir jemand helfen könnte
MFG FireFlyer
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Allow_Decompile=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <date.au3>
dim $var1 = 7
while $var1 = 7
$var1 = MsgBox( 4, "PC Blockiert", "SINHTSM1 möchte die Kassetten des Roboters überprüfen. Überprüfung jetzt starten?", 60)
if $var1 = 7 then
MsgBox( 0, "PC Blockiert", "Nächste Abfrage ist in 5 Minuten.")
sleep(300000)
EndIf
WEnd
BlockInput(1)
AutoItSetOption("MouseCoordMode", 1)
MouseMove( 0, 0)
sleep(2000)
$a1 = FileGetShortName( "C:\Programme\Tivoli\tsm\saclient\dsmadmc.exe")
$a2 = FileGetShortName( "C:\Programme\Tivoli\tsm\saclient\")
$a3 = FileGetShortName( "C:\Programme\Tivoli\tsm\saclient\check3.txt")
$a4 = FileGetShortName( "C:\Programme\Tivoli\tsm\saclient\check3_log.txt")
run($a1, $a2)
winwait( "IBM Tivoli Storage Manager","", 20 )
sleep (2000)
If Not WinActive( "IBM Tivoli Storage Manager") Then
FileWriteLine( ""& $a4, & _Now() " |Kann die Console nicht öffnen (TSM)")
FileWriteLine( ""& $a4, & _Now() " |END------------------------------------------------->")
FileWriteLine( ""& $a4, "")
Exit
EndIf
sleep(5000)
send( "xxxxxx" )
sleep(500)
send( "{Enter}" )
sleep(1000)
send( "xxxxx")
sleep(500)
send( "{Enter}" )
sleep(1000)
send( "macro check3.cmd > "& $a3 )
sleep(1000)
send( "{Enter}" )
sleep(1000)
;Lies Anzahl Kassetten
$k1 = FileReadLine( ""& $a3, 5)
$g1 = StringRight( ""& $k1, 2)
;Lies Kassette 1
$k2 = FileReadLine( ""& $a3, 9)
$g2 = StringLeft( ""& $k2, 6)
;Lies Kassette 2
$k3 = FileReadLine( ""& $a3, 11)
$g3 = StringLeft( ""& $k3, 6)
;Lies Kassette 3
$k4 = FileReadLine( ""& $a3, 13)
$g4 = StringLeft( ""& $k4, 6)
sleep(500)
If $g1 < 4 Then
FileWriteLine( ""& $a4, & _Now() " |Zu wenig Kassetten, es sind nur "& $g1 &" vorhanden.")
FileWriteLine( ""& $a4, & _Now() " |END------------------------------------------------->")
FileWriteLine( ""& $a4, "")
send( "quit" )
sleep(500)
send( "{Enter}")
Exit
EndIf
FileWriteLine( ""& $a4, & _Now() " |macros check3.cmd ausgeführt, "& $g1 &" Kassetten vorhanden.")
sleep(500)
send( "run moda3 "& $g2 &" "& $g3 &" "& $g4)
sleep(1000)
send( "{Enter}" )
FileWriteLine( ""& $a4, & _Now() " |run moda3 ausgeführt mit Kassetten: "& $g2 &", "& $g3 &", "& $g4)
FileWriteLine( ""& $a4, & _Now() " |END------------------------------------------------->")
FileWriteLine( ""& $a4, "")
sleep(10000)
send( "quit" )
Sleep(500)
send( "{Enter}" )
BlockInput(0)
Alles anzeigen