RegisterServiceProcess

Question

j'utilise la fct API RegisterServiceProcess pour d&#233;marrer un service mais elle n'est pas compatible avec WIN XP.
il y'a une autre fct que je peut utiliser sous WIN XP ?
il y'a un autre code pour d&#233;marrer un service?
Voici le code utilis&#233; (t&#233;l&#233;charger de vb france)
'Module service
Private Const RSP_SIMPLE_SERVICE = 1
Private Const RSP_UNREGISTER_SERVICE = 0

Private Declare Function GetCurrentProcessId Lib "kernel32.dll" () As Long
Private Declare Function GetCurrentProcess Lib "kernel32.dll" () As Long
Private Declare Function RegisterServiceProcess Lib "kernel32.dll" (ByVal _
dwProcessID As Long, ByVal dwType As Long) As Long
Public Sub MakeMeService()
    Dim pid As Long
    Dim regserv As Long

    pid = GetCurrentProcessId()
    regserv = RegisterServiceProcess(pid, RSP_SIMPLE_SERVICE)
End Sub
Public Sub UnMakeMeService()
    Dim pid As Long
    Dim regserv As Long

    pid = GetCurrentProcessId()
    regserv = RegisterServiceProcess(pid, RSP_UNREGISTER_SERVICE)
End Sub

'form
Private Sub Form_Load()
MakeMeService
End Sub

cs_Willi · Answer

Bonsoir,
Un petit tour sur google est http://www.andreavb.com/tip060002.html