19/07/2005, 16:15
|
| | | Fecha de Ingreso: enero-2004
Mensajes: 310
Antigüedad: 21 años, 2 meses Puntos: 0 | |
| para crear una entrada en el registro:
Public Const rutaClave As String = "SOFTWARE\Microsoft\Windows\CurrentVersion\Run "
(es la ruta donde quieres crearla)
Dim clave As RegistryKey
clave = Registry.LocalMachine.OpenSubKey(rutaClave, True)
If IsNothing(clave)
'crear la clave
clave = Registry.CurrentUser.CreateSubKey(rutaClave)
clave .SetValue(NombreDeLaClave, Valor)
clave .Close()
clave = Nothing
Si existe:
clave.SetValue(NombreDeLaClave, Valor) |