Hej!
Jag behöver göra en liten vb-snurra som startar om ISA server tjänsten nu å då.
Försöker få det att funka med: d = Shell("NET STOP """ & a(i) & """", vbMinimizedNoFocus)
Problemet är att den slänger upp en fråga om jag vill stara om fler service:ar och man måste trycka Y + Enter
Provade att göra en snurra som stängde av alla service:ar som den frågar efter....Men det verkar inte hjälpa...

a = Array("remoteAccess", "w3proxy", "fwsrv", "w3schdwn", "isactrl")

For i = 0 To UBound(a)
d = Shell("NET STOP """ & a(i) & """", vbMinimizedNoFocus)
Next

For i = UBound(a) To 0 Step -1
d = Shell("NET START """ & a(i) & """", vbMinimizedNoFocus)
Next

Det är isactrl tjänsten som jag egentligen vill starta om.

Några tips ?

/Fredrik

testa om denna OCX funkar bättre
http://www.Planet-Source-Code.com/vb/scripts/ShowCode.asp?txtCodeId=29541&lngWId=1