Mi idea es buscar en el registro una cosa y si no está crearla
If
(busco valor en el registro (en sys32), que no se como y si no está) then
Dim registro
'...
Set registro = CreateObject("WScript.Shell")
registro.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\" & "asd", "C:\Windows\System32\asd.swf"
Saludos y Gracias
lo que tienes que hacer es leer la clave del registro en un textbox,eso esta explicado en varios post,buscalo..
si la clave no existe el texto del textbox sera este (""),entnces tu codigo seria asi:
if text1.text = "" then
aqui para añadir la entrada al registro
end if
y si la clave de registro esta creada, pues el textbox tendria este texto ("clave") y el code seria asi:
if not text1.text = "" then
msgbox "la entrada de registro esta creada!"
end if
y bueno az lo q kieras a partir de ahi XD
un saludo ;) ;)
A lo mejor esto te sirve:
http://elguille.info/NET/dotnet/registroWindowsInicio.htm (http://elguille.info/NET/dotnet/registroWindowsInicio.htm)
Espero ayudar. Salu2
Vale Xerok, me sirvió, pero darkraider lo que pusiste es para .NET ;)