ich habe vor kurzen ein kleines Radio programmiert ...
und nun wollte ich einen Updater dafür schreiben
dafür habe ich einmal gegoogelt und etwas gefunden...
diesen Script hab ich dann meinen Bedürfnissen angepasst und es funktioniert auch fast perfekt
mein Problem ist jetzt nur, dass er das eig. Programm nicht downloaded
es wäre sehr nett von euch, wenn mir jemand helfen könnte
und seid bitte nachsichtig mit mir ... ich weiß, dass mein Quelltext nicht die beste Übersicht hat^^
hab auch erst vor kurzen mit AutoIT angefangen :pinch:
Hier ist mein Quelltext
Spoiler anzeigen
#RequireAdmin
#NoTrayIcon
$Pfad = @ProgramFilesDir & "\DreamsPrograms"
$Pfad2 = @ProgramFilesDir & "\DreamsPrograms\DreamRadio"
$VersionsInfo = "http://dreamer68.funpic.de/Radioversion.ini"
$oldVersion = IniRead(@ProgramFilesDir & "\DreamsPrograms\DreamRadio\Radioupdate.ini","Version","Version","NotFound")
$NewVersion = "0.0"
If Not FileExists( $Pfad ) Then
DirCreate( $Pfad )
EndIf
If Not FileExists( $Pfad2 ) Then
DirCreate( $Pfad2 )
EndIf
$Ini = BinaryToString(InetRead( "http://dreamer68.funpic.de/Radioversion.ini" ))
FileWrite( $Pfad2 & "\Radioversion.ini", $Ini )
$NewVersion = IniRead( $Pfad2 & "\Radioversion.ini","Version","Version","")
If $NewVersion = $oldVersion Then
Else
$msg = MsgBox (4,"Update","There is a new version existing: " & $NewVersion & " ! You are using: " & $oldVersion & ". Do you want to download the new version?")
If $msg = 7 Then
Run( $Pfad2 & "\DreamRadio1.exe" )
FileDelete( $Pfad2 & "\Radioversion.ini")
ElseIf $msg = 6 Then
$downloadLink = IniRead( $Pfad2 & "\Radioversion.ini","Version","download","NotFound")
$dlhandle = InetGet( $downloadLink, $Pfad2 & "\DreamRadio1.exe", 0, 1 )
ProgressOn( "", "", "",-1,-1,16 )
$Size = InetGetSize( $downloadLink,1 )
While Not InetGetInfo( $dlhandle, 2 )
$Percent = ( InetGetInfo( $dlhandle,0 ) / $Size ) * 100
ProgressSet( $Percent, $Percent & " percent")
Sleep(1)
WEnd
ProgressSet(100 , "Done", "Complete")
sleep(500)
ProgressOff()
IniWrite( $Pfad2 & "\Radioupdate.ini","version","version",$NewVersion)
InetClose( $dlhandle )
MsgBox(-1,"Success","Download Complete!")
Run( $Pfad2 & "\DreamRadio1.exe" )
EndIf
FileDelete( $Pfad2 & "\Radioversion.ini")
Exit
EndIf
... und schoneinmal danke für alle die sich die Zeit nehmen und meinen Quelltext anschauen