Regedit desde visual basic

[Lone]

Hola, estoy creando una aplicacion y cuando la ejecuto (le e puesot el manifiesto en administrador). Cuando la abres te tiene que crear en el regedit en x carpeta una clave con y valor. Alguien sabe cual seria el codigo necesario ? aparte de lo que abria que "importar" ?

Uso la version 2008

gracias

[thecirujano]

Averigua sobre:
Windows Script Host
Dim ObjWsh As Object
Set ObjWsh = CreateObject("Wscript.Shell")

[seba123neo]

Hola, hacelo con apis, para escribir en el registro,aca tenes eejmplos:

Módulo para utilizar las funciones Api para el registro

saludos.

[Lone]

Bueno ya lo he conseguido poner solo, pongo el codigo por si alguien lo buscaba:

1º en el manifiesto le decimos que lo ejecute como admin

2º codigo:

Código [Seleccionar] Expandir


'Variable para el nombre de nuestro Exe

       Dim Np As String

       'variable para la Ruta de nuestra aplicación

       Dim Ruta As String

       'Variable de objeto

       Dim MiObjeto As Object

       'Seteamos la variable y creamos la referencia

       MiObjeto = CreateObject("Wscript.Shell")

       Np = "notepad.exe" 'nuestro programa junto con su extensión

       Ruta = "C:\Windows\notepad.exe" ' la ruta de nuestro programa

       'Escribimos el valor en el registro

       MiObjeto.RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & np, Ruta)

       'Eliminamos la variable

       MiObjeto = Nothing