VBScript XP activation error:

[moktar]

for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2").InstancesOf ("win32_WindowsProductActivation")

if Obj.ActivationRequired <> 0 then Obj.ActivateOnline()

next

I'm pretty darn sure it's not the script. I've tried multiple variations, installed Windows Scripting Host 5.6, checked my namespace, SetProxy, fully updated SP2 copy of WinXP, etc, etc, and yet every time I try to call the ActivateOnline method, I get:

SWbemObjectEx: Invalid operation

Code: 80041016

The machine I'm working on right now is already activated, but I've tried this many times on the systems that I haven't activated yet. I've seen a handful of people with this problem but zero fixes.

Can anybody help me?

EDIT:

Nevermind. The system I was testing against wouldn't go cleanly through online activation, I got annoyed with the script and did it manually and had to call in.

ARGH.

Edited May 1, 2008 by moktar