
| |||
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) |