FileWrite geht nicht!!

1. offizieller Beitrag

    Schaut euch mal diesen Code-Schnippsel an und sagt mir bitte, warum am Ende nix in der Datei meineMods.txt steht.

    Spoiler anzeigen
    Code
    $mod = FileOpenDialog("OMUC - Mod wählen", "C:\" , "PlugIn (*.esp)")
$version = InputBox("OMUC - Mod hinzufügen", "Bitte Version eingeben.")
$webseite = InputBox("OMUC - Mod hinzufügen", "Bitte Webseite eingeben.")
$file = FileOpen(@WorkingDir & "\meineMods.txt", 9)
If $file = -1 Then
   MsgBox(64, "OMUC-Fehler", "Die Datei meineMods.txt konnte im OMUC-Verzeichnis nicht gefunden werden!")
Else
   FileWrite(@WorkingDir & "\meineMods.txt", $mod & "," & $version & "," & $webseite)
   FileClose(@WorkingDir & "\meineMods.txt")
EndIf

    Einmal editiert, zuletzt von penta.phoenix (18. Juli 2008 um 14:18)

    Toll, so was hab ich mir gedacht. Und was mach ich jetzt? AutoIt neu installieren? Gibt wohl keine andere Lösung.

    Edit: Kann es sein, dass AutoIt mit diesem Pfad "F:\selbst programmierte programme\scripts\omuc"(=@WorkingDir) Probleme hat?
    Wenn ich anstatt @WorkingDir einfach "C:" nehme geht's nämlich.

    Einmal editiert, zuletzt von penta.phoenix (18. Juli 2008 um 13:24)

    Danke, damit geht auch der genannte Pfad ohne Probleme.

    Bevor jemand fragt, ja @WorkingDir war wirklich der angegebene Pfad.

    • Offizieller Beitrag

    Dein Fehler liegt aber darin, dass Du den Dateinamen anstatt des Handle benutzt:

    [autoit]


    $mod = FileOpenDialog("OMUC - Mod wählen", "C:\" , "PlugIn (*.esp)")
    $version = InputBox("OMUC - Mod hinzufügen", "Bitte Version eingeben.")
    $webseite = InputBox("OMUC - Mod hinzufügen", "Bitte Webseite eingeben.")
    $file = FileOpen(@WorkingDir & "\meineMods.txt", 9)
    If $file = -1 Then
    MsgBox(64, "OMUC-Fehler", "Die Datei meineMods.txt konnte im OMUC-Verzeichnis nicht gefunden werden!")
    Else
    FileWrite($file, $mod & "," & $version & "," & $webseite)
    FileClose($file)
    EndIf

    [/autoit]