Hi Leute,
ich bekomm es einfach nicht hin. Habe jetzt von hier: http://www.autoitscript.com/forum/index.php?showtopic=80201
die Service.au3 und die ServiceExample.au3 runtergeladen. Habe versucht die ServiceExample in mein Script einzubetten aber es will einfach nicht.
Folgendes habe ich vor:
Ich möchte aus einem Script einen Dienst für eine kompilierte Exe installieren und starten, sodass die Anwenundung beim nächsten hochlaufen des Systems vor der Anmeldung des Systems gestartet wird.
Folgendes Konzept habe ich mir überlegt:
- Funktion zur Installation und Start des Dienstes.
- Script wird beendet und das System neugestartet.
- System läuft hoch, die Exe wird gestartet und ausgeführt.
Folgendes habe ich aus der Example übernommen:
Funktion eingebettet in meinem Script:
[autoit]
Func Service()
_Service_Create("", $sServiceName, "Autoit Service Test", '"' & $sServiceFile & '"')
If @error Then
XSkinTrayBox( "Status", @error & @CRLF & " message : " & _WinAPI_GetLastErrorMessage())
Else
XSkinTrayBox( "Status", @CRLF & "Der Service konnte installiert werden."& @CRLF &"Der Computer wird in 5 Sekunden neugestartet" )
EndIf
Sleep(5)
;Restart the Computer
;Shutdown(2)
;exit
EndFunc
Main funktion:
[autoit]
_Service_init($sServiceName)
func main()
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Bt_Beenden
Exit
Case $Bt_Install
XML()
Service()
EndSwitch
WEnd
EndFunc
Includes und defines:
[autoit]
;Service Include File
#include "Includes\Service.au3"
$sServiceName = "InST-Service"
$sServiceFile = @ScriptDir & "..\InST-XP-Install.exe"