Leer clave de registro de windows con vb6.0

[zxs23]

Como hago para leer una clave del registro de windows, he visto que se puede con wmi pero necesito algo simple, quizas con alguna api o algo sencillo que funcione en cualquier windows, si se puede claro.

Por otro lado en windows vista y/o seven el codigo que tengo funcionaria o ya esta obsoleta esa ruta o como se tendria que hacer?

Aqui dejo el codigo que utilizo para crear la clave para iniciar con windows.

Código: [Seleccionar]

Public Sub Inicio_Windows()
Dim sh As Object

Set sh = CreateObject("WScript.Shell")

sh.RegWrite ("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\Proyecto1"), App.path & "\Proyecto1.exe", "REG_SZ"

Set sh = Nothing
End Sub


[cobein]

No le testie personalmente pero tengo entendido que en Vista y 7 no podes agregar datos en el run en HKLM sin permisos de administrador, el que si anda es HKCU

[zxs23]

Como vas cobein si lo que mencionas lo leí hace unos dias pero tampoco he podido probarlo por que solo tengo el WXP.
Lo que quiero hacer es comprobar si la clave existe, si no existe entonces la creo.
Encontre este codigo, aunque al intentar descargar la clase lo detecto como virus, por ahi tengo un ejemplo similar asi que no hay problema, haber si alguien lo puede descargar:
http://www.elguille.info/VB/utilidades/ExeEnCurrentVersionRun.htm

Ahora como hago para poder iniciar junto con windows vista y seven, todo debe ser transparente no intento sembrar un troyano ni nada ya que me han dicho Windows vista y seven molestan por cualquier cosa debido al UAC.

Si alguien lo pudiera probar estaria bueno.

saludos