- Offizieller Beitrag
Spoiler anzeigen
$default = Default
Global $ftp = "http://www.google.de/"
_InternetDateienDownloaden($ftp)
;Dateien die aus dem Internet herruntergeladen werden sollen, werden in dieser Funktion eingebettet.
Func _InternetDateienDownloaden($ftp)
;Prüft ob Verbindung zum Internet besteht
$default = Ping($ftp,500)
If Not @error Then
;Fortsetzen des Programmes ohne weitere Einstellungen
sleep(1)
Else
;Fehlermeldung für User
MsgBox(48,"Fehler","Sie haben keine Verbindung zum Internet!" & @CRLF & "Deshalb sind wir gezwungen das Programm zu beenden.")
;Exit Code Tabelle Nr. 10
Exit 10
EndIf
;Dateien werden herruntergeladen
[/autoit] [autoit][/autoit] [autoit];data.txt wird heruntergeladen
$default = InetGet($ftp & 'data.txt',@TempDir & "/data.txt",1)
;Prüft ob die Datei herruntergeladen wurde
If $default = 0 Then
;Fehlermeldung für User
MsgBox(48,"Fehler","Wichtige Dateien konnten nicht herruntergeladen werden!" & @CRLF & "Deshalb sind wir gezwungen das Programm zu beenden.")
;Exit Code Tabelle Nr. 11
Exit 11
EndIf
EndFunc
[/autoit]