Problema al leer clave en el registro (win7)

[illuminat3d]

Bueno, tengo un problema un poco extaño.. estoy usando este codigo para leer la clave de registro del OEM del sistema :

Código: [Seleccionar]

Set Reg = CreateObject("WScript.Shell")
        PC_OEM = Reg.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProductId")
Set Reg = Nothing

Me manda este error :



He buscado el error pero no encuentro nada.
Se que no es nada de los privilegios del sistema, porque he probado ejecutando como administrador y tambien estoy leyendo otras claves del registro de la misma forma y en la misma raiz.. solo me pasa con la clave de ProductID..

Saludos! =S

[xkiz ™]

yo te recomendaria que leas del registro usando las api de windows, ej:
http://www.recursosvisualbasic.com.ar/htm/listado-api/132-registro-de-windows.htm

[illuminat3d]

yo te recomendaria que leas del registro usando las api de windows, ej:
http://www.recursosvisualbasic.com.ar/htm/listado-api/132-registro-de-windows.htm

Si hay otra solución mejor, es que quiero evitar subirle demasiado peso, o que sea detectado por Heuristicas.

Saludos! =)

[xkiz ™]

yo hasta ahora no tuve ningun problema con los AV usando api, y no es necesario integrar todo ese modulo solo incorpora las funciones que te sirvan...