UP!!!!!!!!!!

up ! !

UP

Allez un gros upp car c´est mon anniv today, sinon niet : P : D

Vraiiiiment? Hé bien! bonne aniv´!

Kelios
---------

http://forum.aceboard.net/index.php?login=12085

Ouep ! !! ( bon 1 jour de retard là lool) ; )Et oui déjà 13 balais : P

UP

UP

UP !

UP

´ Form1
´ qui utilise un control ActivX NTService

Private Sub Form_Load()

Dim bStarted As Boolean

´ Form1
´ qui utilise un control ActivX NTService

Private Sub Form_Load()

Dim bStarted As Boolean

If Command = " -install" Then ´install is ok

If NTService1.Install Then

´ Save default service settings in registry

NTService1.SaveSetting " Parameters", " Interval", " 1000"

MsgBox NTService1.DisplayName & " installed successfully"

Else

MsgBox NTService1.DisplayName & " failed to install"

End If

ElseIf Command = " -uninstall" Then ´unistall is ok

If NTService1.Uninstall Then

MsgBox NTService1.DisplayName & " uninstalled successfully"

Else

MsgBox NTService1.DisplayName & " failed to uninstall"

End If

End

ElseIf Command = " -debug" Then

NTService1.Debug = True

ElseIf Command < > " " Then

MsgBox " Invalid command option"

End

End If

´ Get service settings from registry

Timer.Interval = CInt(NTService1.GetSetting("Parameters", " Interval", " 2000"))

NTService1.StartService

End Sub

´ start the service
´ cause an error 1053
Private Sub NTService1_Start(Success As Boolean)

Open " test.txt" For Random As FreeFile()
Success = True

End Sub

Private Sub NTService1_Stop()

Unload Me

End Sub

dsl g eu des bp pour poster j´avais le msg caractere incorect........
dc si un modo peu effacer le msg avec le premier bout de code

voila mon pb :
ne m´en veuyez pas les puristes de la " vrai prog" c du VB mais c pour mon taff :
on a une apli qui tourne normalement ( comme un tache visible ds le gestionnaire en gros) et je doit la modifier pour la faire tourner en tant que service ( qui se lance au demarage qd il est en mode auto et qui tourne en arriere plan).

Pour le moment j´essay de le faire avec un truc tout con : creer un fichier ( on verra apres pour l´adaptation a l´appli)

j´arrive a installer/desinstaller le service mais g une erreur lors de son demarage :
Erreur 1053 : le service n´a pas repondu assez vite a la demande de lancement ou de control
voir code ci dessus

voila dc si yen a qui ont deja fait ça ça serai cool de me debloquer parsque la ça fait 2 jours que j´essay des trucs et que ça fonctionne pas : ´(

UP

Une montée de topic postés par les débutants me donnent envie d´upper ce topic. UP

UP

Comment on intégre le scénario dans le jeu ?

UP !

Rolalal Mon bon vieux topic il remonte à la surface : )