latoonne Posted February 15, 2006 Share Posted February 15, 2006 hello everybody,My script call a function for message waiting with a permanent loop, how to continue my script.I join my script. AutoItSetOption("TrayIconHide", 1)$x=1$FileMsi = @Windowsdir & "\Temp\VPN\"$FileActiv= @Windowsdir & "\Temp\VPN\Setup\"_Cleanup("Installation VPN en cours.. Merci de Patienter.")_waiting()RunWait("msiexec /i " & chr(34) & $FileMsi & "vpnclient_setup.msi" & chr(34) & " /qn /norestart","",@SW_HIDE) _Cleanup("Fin de l'installation VPN.")Sleep(2000)_Cleanup("Installation d'ActivCard Gold.") RunWait("msiexec /i " & chr(34) & $FileActiv & "isscript.msi" & chr(34) & " /qn /norestart","",@SW_HIDE) RunWait("msiexec /qn /i " & chr(34) & $FileActiv & "ActivCard Gold.msi" & chr(34) & " ARUSBREQ=-1 ACTIVKEYREQ=1 GUILREQ=-1 ","",@SW_HIDE) RunWait("Regedit /s " & chr(34) & $FileMsi & "\OCE_Gold_registry_setup.reg" & chr(34),"",@SW_HIDE)RunWait("Regedit /s " & chr(34) & $FileMsi & "\QuickFill_predefinition.reg" & chr(34),"",@SW_HIDE)_Cleanup("Fin de l'installation d'ActivCard Gold.. Merci de Patienter.")_Cleanup("Reboot du Pc dans 5 Secondes")Sleep(5000)msgbox(16,"Reboot désactivé pour test","");~ Shutdown(2)Func _Cleanup($message) If $message <> '' Then If WinExists("Installation du Client VPN.") Then ControlSetText("Installation du Client VPN.", "", "Static1", $message & @TAB & "") Else SplashTextOn("Installation du Client VPN.", $message & @TAB & "", 400, 50, (@DesktopWidth-400)/2, (@DesktopHeight-@DesktopHeight)/2, 4, "") EndIf Else SplashOff() EndIf Sleep(2000) $x = $x + 1EndFuncFunc _Waiting ();~ AutoItSetOption('trayIconDebug', 0)AutoItWinSetTitle('BulletBar') Dim $ProgressArray[24] ; empty box = c, filled box = g $ProgressArray[0] = 'g g g g g c c c c c c c c c c c c c c c c c c c' $ProgressArray[1] = 'c g g g g g c c c c c c c c c c c c c c c c c c' $ProgressArray[2] = 'c c g g g g g c c c c c c c c c c c c c c c c c' $ProgressArray[3] = 'c c c g g g g g c c c c c c c c c c c c c c c c' $ProgressArray[4] = 'c c c c g g g g g c c c c c c c c c c c c c c c' $ProgressArray[5] = 'c c c c c g g g g g c c c c c c c c c c c c c c' $ProgressArray[6] = 'c c c c c c g g g g g c c c c c c c c c c c c c' $ProgressArray[7] = 'c c c c c c c g g g g g c c c c c c c c c c c c' $ProgressArray[8] = 'c c c c c c c c g g g g g c c c c c c c c c c c' $ProgressArray[9] = 'c c c c c c c c c g g g g g c c c c c c c c c c' $ProgressArray[10] = 'c c c c c c c c c c g g g g g c c c c c c c c c' $ProgressArray[11] = 'c c c c c c c c c c c g g g g g c c c c c c c c' $ProgressArray[12] = 'c c c c c c c c c c c c g g g g g c c c c c c c' $ProgressArray[13] = 'c c c c c c c c c c c c c g g g g g c c c c c c' $ProgressArray[14] = 'c c c c c c c c c c c c c c g g g g g c c c c c' $ProgressArray[15] = 'c c c c c c c c c c c c c c c g g g g g c c c c' $ProgressArray[16] = 'c c c c c c c c c c c c c c c c g g g g g c c c' $ProgressArray[17] = 'c c c c c c c c c c c c c c c c c g g g g g c c' $ProgressArray[18] = 'c c c c c c c c c c c c c c c c c c g g g g g c' $ProgressArray[19] = 'c c c c c c c c c c c c c c c c c c c g g g g g' $ProgressArray[20] = 'g c c c c c c c c c c c c c c c c c c c g g g g' $ProgressArray[21] = 'g g c c c c c c c c c c c c c c c c c c c g g g' $ProgressArray[22] = 'g g g c c c c c c c c c c c c c c c c c c c g g' $ProgressArray[23] = 'g g g g c c c c c c c c c c c c c c c c c c c g' SplashTextOn ('Please Wait, Process in Progress.', '-',300,60,-1,-1,0,'Webdings', '6') $i=0 While 1 ControlSetText('Please Wait, Process in Progress.', '','Static1', @LF & $ProgressArray[$i]) $i=$i+1 if $i = 24 then $i = 0 sleep(100) WendEndFunc Link to comment Share on other sites More sharing options...
Nuffilein805 Posted February 15, 2006 Share Posted February 15, 2006 maybe you should call your function in a seperate script with this all your problems will be solved just 1 more 150k diskspace needed my little chatmy little encryption toolmy little hidermy unsafe clickbot Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now