Hallo Com,
ich habe folgendes Problem mit meinem Script:
Spoiler anzeigen
Dim $ver = "1.0.0"
InetGet("http://www.trap-making.bplaced.net/Update.txt",@TempDir & "\update.txt", 1, 0)
$file = FileOpen(@TempDir & "\update.txt", 0)
$line = FileReadLine($file, 1)
$line2= FileReadLine($file, 2)
If $line = $ver Then
MsgBox(64, "Kein Update", "Du hast die neuste Version: (" & $ver & ")")
FileClose($file)
FileDelete(@TempDir & "\update.txt")
Else
MsgBox(64, "Update!", "Es ist eine Neue Version verfügbar!")
$fg = MsgBox(4, "Updaten?", "Möchtest du jetzt Updaten?")
If $fg = 6 Then
InetGet("http://www.trap-making.bplaced.net/Test.ini" & $line2, $line2, 1, 0)
FileClose($file)
FileDelete(@TempDir & "\update.txt")
Exit 0
EndIf
EndIf
Egal was ich bei der Variablen $var eingebe , er gibt mir immer wieder in einer MsgBox zurück :
"Update!"
"Es ist eine Neue Version verfügbar!"
$var ist für die aktuelle Version des Scriptes und in der .txt Datei auf dem Server steht 1.0.1 .
Es ändert sich nichts !
Ich habe schon mal probiert InetGet allein stehen zu lassen um dann die Datei runterzuladen , das funktioniert ebenfalls nicht !
Schnelle Zusammenfassung:
1. er gibt mir immer das gleiche in einer MsgBox zurück egal wie die Version ist
2. er lädt nichts aus dem Internet egal ob InetGet allein steht oder mit dem Script zusamm
3. er liest bzw er lädt noch nicht mal die update.txt aus dem Netz und liest sie bzw löscht sie ...
€1: update.txt die auf dem Server liegt im Download hinzugefügt