I need a little help.

[Camden]

Hello, I am in need of assistance in converting this partial vb script to .au3 format...

i can convert the variables, Ubound, and the arrays and such... it's just the GetObject that seems to be giving me trouble

strComputer = "."

dim iValues()

Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\default:StdRegProv")

oReg.GetBinaryValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,iValues

Dim arrDPID

arrDPID = Array()

For i = 52 to 66

ReDim Preserve arrDPID( UBound(arrDPID) + 1 )

arrDPID( UBound(arrDPID) ) = iValues(i)

Next

ANY help will be appreciated

[Zedna]

I think AutoIt RegRead() function will do the same job as your VB 

Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\default:StdRegProv")
oReg.GetBinaryValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,iValues

Edited January 6, 2008 by Zedna