VBscript service control compile error

[Guest_imported]

I am trying to write code so the end result would be turning off a service that has failed.

I keep getting a compile error when I try compiling in VB. It highlights Set and states invalid outside procedure.


Can anyone help?

Thanks

 

[FengShui1998]

bk1031,

Set objService = GetObject("WinNT://" & Server & "/" & ServiceName)
objService.Stop



fengshui_1998

 

[jonscott8]

The Set statement is an executable line of code and must fall within a procedure (Sub,Function,etc..). Jon Hawkins