ControlService这个API如何使用？

Question

你用openservice得到句炳时用没有SERVICE_ALL_ACCESS这个参数啊？
在ControlService中要终止一个服务，The hService handle must have SERVICE_STOP access.

Answer 1

我是这样写的：OpenService(a, "W3SVC", &H10)
a是前个函数得到的值。你最后一句话是什么意思，你是指那些服务停止？？？

Answer 2

hService是你得到的句柄，要想终止必须有stop的权限。

Answer 3

停止我已经实现了，但是我想让它停止以后又马上重新启动，但不能实现。我已经把它的权限改成了启动，start。但还是不能实现，下面的代码，请指点！
Private Sub Command3_Click()
Dim a1, b1 As Long
Dim a, b, c, d As Long
a = OpenSCManager(vbNullString, vbNullString, &HF0000)
b = OpenService(a, "W3SVC", &H20)
'MsgBox (b)
d = ControlService(b, &H1, kk)
a1 = OpenSCManager(vbNullString, vbNullString, &HF0000)
b1 = OpenService(a, "W3SVC", &H10)
'MsgBox (b)
c = StartService(b, 0, 0)
MsgBox (d)
MsgBox (c)
End Sub