SetDWordValue issues

[minoad]

I am attempting to use a script to enable rdp on xp pro. I have written two reg files that do the trick yet i need to convert these to a vbs file. This is the code:

regVal = 0
Set objReg = GetObject("winmgmts:\\" & strCompName & "\root\default:StdRegProv")
intRc = objReg.SetDWORDValue(HKLM, strKeyPath, "fDenyTSConnections", regVal)

If i turn on rdp and look in the registry, the dword value is ox00000000 . However when i use my script to set this it simply shows as 0.
For this reason my script is not working. Any ideas on how to convert this to hex. if i try and input 0x00000000 i get a type mismatch error.

Thanks

 

[minoad]

OK. I have lost my mind. I created the problem with a typo. Sorry for the post.