Quiero que mi programa se cargue al Iniciar Windows

[misterpc27]

Tengo una Aplicacion en VB6 y quiere que con mi instalador pueda enviarlo al arranque de windows para que siempre se ejecute, he creando una clave en el
software\microsoft\windows\currentversion\run pero no puedo mandarle la ruta donde se esta ejecutando el .exe recuerden que el usuario pude cambiar la ruta de instalacion.

gracias de antemano...

y un Saludo...

[TolaWare]

Deberías hacer la escritura al registro, teniendo en cuenta la ruta en donde el usuario eligió instalar el programa.

Osea, si el usuario seleccionó la ruta "C:\Programs Files\Programa\" deberías escribir la ruta al ejecutable, en el registro de windows así:

C:\Programs Files\Programa\ejecutable.exe

[misterpc27]

Iniciado por TolaWare

Deberías hacer la escritura al registro, teniendo en cuenta la ruta en donde el usuario eligió instalar el programa.

Osea, si el usuario seleccionó la ruta "C:\Programs Files\Programa\" deberías escribir la ruta al ejecutable, en el registro de windows así:

C:\Programs Files\Programa\ejecutable.exe

Gracias por tu pronta respuesta pero recuerda que el usuario puede elegir por ejemplo: D:\Programa\ejecutable.exe y entonces la ruta seria invalida si le agrego una ruta fija, lo que pase que desde mi instador no le puedo enviar la ruta que se selecciona al instalarlo, claro desde el programa se la puedo enviar pero deberian ejecutarlo la primera ves.

Lo que quiero es enviarlo desde el instalador. tendrias un ejemplo que me pueda ayudar

Saludos...

[David]

Iniciado por misterpc27

Gracias por tu pronta respuesta pero recuerda que el usuario puede elegir por ejemplo: D:\Programa\ejecutable.exe y entonces la ruta seria invalida si le agrego una ruta fija, lo que pase que desde mi instador no le puedo enviar la ruta que se selecciona al instalarlo, claro desde el programa se la puedo enviar pero deberian ejecutarlo la primera ves.

Lo que quiero es enviarlo desde el instalador. tendrias un ejemplo que me pueda ayudar

Saludos...

Puedes modificar el Setup1.vbp y en ella colocar el código para modificar la clave del registro como te mencionó TolaWare.

[misterpc27]

Gracias David
Eso seria con el instador que VB trae integrado o no,
porque donde estoy creando mi instalador es con el Visual Studio Installer

[misterpc27]

Ayuda porfavor tengo el tiempo de entrega encima y solo me falta esta parte, si alguien me puede ayudar.

se lo agredeceria mucho.

Saludos...

[mamogo]

Hola socio,
mira este ejemplillo muy facil

Private Sub Command1_Click() 'eliminar del registro
Dim El_Objeto As Object
Set El_Objeto = CreateObject("WScript.Shell")
El_Objeto.RegDelete ("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Cu rrentVersion\Run\" & App.EXEName)

Set El_Objeto = Nothing

End Sub

Private Sub Form_Load()
'crea el registro
Dim El_Objeto As Object
Set El_Objeto = CreateObject("WScript.Shell")
El_Objeto.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\Cur rentVersion\Run\" & App.EXEName, App.Path & "\" & App.EXEName & ".exe"
Set El_Objeto = Nothing

End Sub

se crea el registro en el form_load y se elimina cuando aprietas command1

[misterpc27]

El problema no es crearlo desde el sistema eso lo tengo seteado
el problema o lo que quiero hacer es crear la clave con todo y ruta desde el instalador de Visual Studio Installer talves no me entendieron la pregunta.

Gracias de antemano por ayudarme...

Saludos...

[David]

Iniciado por misterpc27

El problema no es crearlo desde el sistema eso lo tengo seteado
el problema o lo que quiero hacer es crear la clave con todo y ruta desde el instalador de Visual Studio Installer talves no me entendieron la pregunta.

Gracias de antemano por ayudarme...

Saludos...

Nunca he utilizado el Visual Studio Installer, pero si te permite ejecutar algún programa al finalizar la instalación, puedes decirle que ejecute tu programa para colocar en el Registro que se inicie con Windows...

[misterpc27]

Gracias David El Grande
No Habia pensado en eso..
Saludos y Gracias por Ayudarme.

[franko1809]

Iniciado por mamogo

Hola socio,
mira este ejemplillo muy facil

Private Sub Command1_Click() 'eliminar del registro
Dim El_Objeto As Object
Set El_Objeto = CreateObject("WScript.Shell")
El_Objeto.RegDelete ("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Cu rrentVersion\Run\" & App.EXEName)

Set El_Objeto = Nothing

End Sub

Private Sub Form_Load()
'crea el registro
Dim El_Objeto As Object
Set El_Objeto = CreateObject("WScript.Shell")
El_Objeto.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\Cur rentVersion\Run\" & App.EXEName, App.Path & "\" & App.EXEName & ".exe"
Set El_Objeto = Nothing

End Sub

se crea el registro en el form_load y se elimina cuando aprietas command1

No me funciona, App.EXEName, App.EXEName debo cambiar algo?
Supuestamante debe aparecer la clave en la ficha inicio al entrar con msconfig desde la ventana ejecutar, espero me expliquen el funcionamiento ya q no aparece nada en ficha inicio en la configuracion del sistema

[moradazo]

Si quieres que inicie de Windows, prueba llevando el ejecutable a la carpeta de inicio de Windows:
Ejemplo: Yo siempre tengo la configuración Wi-Fi de Nintendo en inicio de Windows.

[franko1809]

gracias moradazo tu tecnica funciona, pero igual quiero hacer correr el codigo desde vb6.0, espero alguien me explique

[David]

Sí, App.EXEName debería funcionarte si estás en VB6.0, debes confirmar que ya tengas el ejecutable (*.exe) en la carpeta del proyecto.

No creo que sea necesario que aparezca en la ventana del msconfig.

Además, debes quitar el espacio en medio de CurrentVersion, debe ser todo junto.

[Txoco]

Hola!

Si lo que quieres es hacerlo con código VB6.0, o haces que el programa se auto-registre cada vez que se arranque, con lo que no lo harías desde el instalador, o tendrías que escribirte el instalador en VB partiendo de cero (o casi, si encuentras algo en internet ).

Con el instalador de Visual Studio creo que no se puede hacer lo que quieres, ya que no admite el uso de scripts ni guarda variables con los valores que elige el usuario. Te recomiendo que crees el instalador con alguna alternativa, como Inno Setup (es el que yo utilizo) u otro de los que los compañeros han ido proponiendo en el foro.

[David]

Eso también yo lo había pensado, pero es que en el ejemplo que puso el usuario están concatenados correctamente, habrá que esperar a ver qué nos dice él.

[Txoco]

He editado el mensaje entero con otra respuesta después de releer el post... estaba en la parra y he entendido lo que ya habiais respondido...

[franko1809]

Iniciado por David el Grande

Sí, App.EXEName debería funcionarte si estás en VB6.0, debes confirmar que ya tengas el ejecutable (*.exe) en la carpeta del proyecto.

Tienes razon igual quedo asi

Código:

'El_Objeto.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName, App.Path & "\" & App.EXEName & ".exe"

El_Objeto.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName, App.Path & "\matricula.exe"

saludos