Hi leute,
mich macht die While verrückt...
Versuche ein Script zu schreiben, bei dem Alle 5min nach einem Teilupdate gesucht wird sofern nicht eine Komplettversion downzuloaden ist.
Gleichzeitig soll aber das TrayMenu funktionieren. Hier mal mein bisheriger code:
Func CheckSilent()
TraySetToolTip('Updater | Suche nach neuen Teilversionen...')
If $instV=$INSTALLER Then
While 1
Switch TrayGetMsg()
Case $s_hButton
showhide()
ContinueLoop
Case $exitbutton
oNExit()
ContinueLoop
EndSwitch
TraySetState(4)
If FileExists($version&".iinst") Then
If FileGetSize($version&".iinst") <> $getnewsize Then
TrayTip("Neue Updates verfügbar","Klicken Sie Hier um die neuen Updates zu installieren",30)
$update=1
TrayItemSetState($instButton,$TRAY_ENABLE)
TrayItemSetState($instButton,$TRAY_DEFAULT)
EndIf
Else
TrayTip("Neue Updates verfügbar","Klicken Sie Hier um die neuen Updates zu installieren",30)
$update=1
TrayItemSetState($instButton,$TRAY_ENABLE)
TrayItemSetState($instButton,$TRAY_DEFAULT)
EndIf
While Sleep(300000)
TraySetState(8)
$timer=TimerInit()
AdlibEnable("Timer")
Switch TrayGetMsg()
Case $s_hButton
showhide()
ContinueLoop
Case $exitbutton
oNExit()
ContinueLoop
EndSwitch
WEnd
WEnd
Else
TrayTip("Neuigkeiten auf der Webseite",$news,500)
TrayItemSetState($instButton,$TRAY_ENABLE)
TrayItemSetState($instButton,$TRAY_DEFAULT)
While 1
Switch TrayGetMsg()
Case $instButton
ExitLoop
Case $exitbutton
oNExit()
EndSwitch
WEnd
_IECreate($UrlInfoAbout)
TrayTip("Webseite wird geöffnet...","Laden Sie dort die neueste Komplettversion herunter",500)
Exit
EndIf
EndFunc
CheckSilent()
[/autoit]$Variablen usw sind natürlich alle deklariert und Funktionen('sind auch da') wollt nur nicht den kompletten Code posten.
Bei dem Code oben Checkt das Programm nur bei der ersten Ausführung danach macht er warscheinlich statt sleep(300000) eher "while 1 sleep() WEnd" oder so
Ist warscheinlich nur n dummer Flüchtigkeitsfehler denk ich... Steigt da jemand durch?
Würd mir sehr helfen
mfg