Hi,
ich lese hier schon eine ganze Weile mit. Ich bin neu und arbeite erst seit kurzem mit AutoIT.
Ich habe dann eine ganz kleine Sache zusammengeschrieben doch so wirklich will es nicht:
Spoiler anzeigen
;#NoTrayIcon
[/autoit] [autoit][/autoit] [autoit]; Hier kann ein Hotkey zum Beenden des Programms festgelegt werden
; in Anführungszeichen vorm Komma, z. Z. ALT+SHIFT+Q
HotKeySet("+!q", "Quit")
;Ist der Ordner C:\Temp\Workflow vorhanden?
If FileExists("C:\Temp\Workflow") Then
; Alle Dateien/Ordner wo schon vorhanden sind werden vorher gelöscht
FileDelete("C:\Temp\Workflow")
DirRemove("C:\Temp\Workflow\gedruckt", 1)
Else
; Erstellen des Workflows Ordners, nachdem festgestellt wurde, das der Ordner fehlt
DirCreate("C:\Temp\Workflow")
; !Testschreiben! Schreibe in die INI, das der Ordner erstellt wurde
;IniWrite("C:\Programme\FreePDF_XP\Workflow-Druck.ini", "Ordner erstellt", "Ordner", "1")
EndIf
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit];Pfad zu Gsview
$program = "c:\Programme\Ghostgum\gsview"
; Pfad der auf neue Dateien überwacht werden soll
$source = "C:\Temp\Workflow"
; Pfad, in den die Dateien nach dem Drucken verschoben werden sollen
;$dest = "C:\Temp\Workflow\gedruckt"
; Dauer des Prüfintervalls in Millisekungen (10 Sek = 10000)
$interval = 10
While 1
Sleep($interval)
$file = FileFindFirstFile ($source & "\*.pdf")
If $file <> -1 then Print()
FileClose($file)
Wend
Func Quit()
Exit
EndFunc
Func Print()
While 1
$pdffile = FileFindNextFile($file)
If @error then ExitLoop
RunWait('"' & $program & '\gsprint.exe" "' & $source & '\' & $pdffile & '"')
FileDelete("C:\Temp\Workflow\Druck.pdf")
WEnd
EndFunc
Exit
Also um es kurz zu erklären:
Es lief auf ein paar PCs hier einwandfrei. Da wurde damals aber noch kein Ordner überprüft und nicht angelegt, wenn er nicht da ist.
Aber das hat ja nichts zur Sache zu tun, denn nun endet es immer in einer Endlosschleife...
Warum? :weinen:
Vielen Dank schon Mal für eure Hilfe...
MfG
Sascha
P.S: Vielen Dank schon Mal.
Edit GtaSpider: Bitte keine CODE Tags mehr verwenden Sondern bitte [ AUTOIT] und [ /AUTOIT] (beides ohne leerzeicehn) benutzen! Ausserdem hab ich mal SPOILER Tags eingefügt
Ich danke dir, werde mich daran halten....