VB reboot script

[Buildboy]

Hi,
I have a VB script to force reboot depending on the Error code I get back from my executable, it works on 2K3 and XP but it fails on 2K with the following error,

Error in Run Script (VBScript) script code at Line 2, Column 1 (Generic failure)


here is the script, any idea why?

Set OpSysSet = GetObject("winmgmts:{(Shutdown)}//./root/cimv2").ExecQuery("select * from Win32_OperatingSystem where Primary=true")

for each OpSys in OpSysSet
OpSys.Reboot()
next


Thanks :)

[kinook]

Not really, but here are some possibilities:
http://www.google.com/search?q=winmgmts%20%22generic%20failure%22

That code (and the Shut Down (http://www.visualbuild.com/Manual/shutdownaction.htm) action) works ok in our tests on a clean W2K SP4 box.

[Buildboy]

Thanks for the quick reply, the interesting part is when I just run this script some times it fails and some times it manages to reboot the system, is there a better way to write this?