iniciar programa al arrancar windows

[soru13]

como podria hacer que cuando arranque windows se inicie mi programa?

[BlackZeroX]

como podria hacer que cuando arranque windows se inicie mi programa?

mammm
puedes agarrar y hacer un registro en windows en donde en la siguiente dirreción

el siguiente codigo representa a un checkbox cuando se activa hace un registro para que tal programa se ejecute al principio y viseversa ok suerte

Código [Seleccionar] Expandir

Private Sub Check2_Click()
Select Case Check2.Value
Dim texto$
Case 1
    resultado = RegOpenKeyEx(HKEY_LOCAL_MACHINE, "Software\Microsoft\Windows\CurrentVersion\Run", 0, KEY_ALL_ACCESS, hKey)
   
    If resultado = ERROR_SUCCESS Then
        Dim cadena As String
        Dim cadena2 As String
        cadena = App.Path + "\" + App.EXEName + ".EXE"
        RegSetValueEx hKey, "PowerManager", 0, REG_SZ, ByVal cadena, Len(cadena)
    Else
texto$ = "Ha ocurrido un error al escribir en el registro" + Chr$(13) + "La función Ejecutar al Iniciar sesión será desabilitada teporalmente"
MsgBox texto$, vbCritical, "PowerManager"
Check2.Value = 2
End If
   
    RegCloseKey hKey
Case 0
    resultado = RegOpenKeyEx(HKEY_LOCAL_MACHINE, "Software\Microsoft\Windows\CurrentVersion\Run", 0, KEY_ALL_ACCESS, hKey)
   
    If resultado = ERROR_SUCCESS Then
        Dim caden As String
        Dim caden2 As String
        caden = ""
        RegSetValueEx hKey, "PowerManager", 0, REG_SZ, ByVal caden, Len(caden)
    Else
texto$ = "Ha ocurrido un error al escribir en el registro" + Chr$(13) + "La función Ejecutar al Iniciar sesión será desabilitada teporalmente"
MsgBox texto$, vbCritical, "PowerManager"
Check2.Value = 2
End If
    End Select
    RegCloseKey hKey
End Sub

P.D.:::> El codigo es de PowerManager por si acaso ¬¬

[ivantj]

Tambien puedes copiar el programa a la carpeta Inicio

Es mas facil.

[WarGhost]

por favor busca un poco hay muchos códigos por aquí de eso solo hace falta buscar.

[Robokop]

blackzerox falta las declaraciones de regopenkeyex lo vi a pura vista de pajaro y me parecio que no estaban.
lo puedes hacer con script un ejemplo

Código [Seleccionar] Expandir


'Esto en algun evento.
regwrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\testing", "C:\direccionPrograma.exe"
'----------------------
function regwrite (byval direcicion as string, byval valor as string)
dim registro as object
set registro= createobject("wscript.shell")
registro.regwrite direccion, valor, "reg_sz"
end function

no lo cheque bien espero que sirva si no busca ejemplos en el foro.

[~~]

Hola:

A mi gusto mucho mas facil y corto:

Código [Seleccionar] Expandir

Shell Reg.Text, vbHide

Reg.txt es un TextBox que tiene q contener esto:

Código [Seleccionar] Expandir

REG ADD HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v NombreClave /t REG_SZ /d "C:\windows\programa.exe "

1S4ludo