My program start on boot ?

[pro2]

I want to make my program start on the windows start ...
I didn't want it to start in the "start" menu or in the "Run " key in regedit ..
I need to start VERY soon..
like g6 FTP , Novel , norton , mc afee ....
How I can do that ??
I make a security program and I can't start it soon enought ..

[Yonatan]

I didn't test this.
But, try putting it in the run= thing in win.ini under [windows].

Something like this:

[windows]
.....
run=my_program.exe
.....

[PsyVision]

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run - To make it run every time you start ur pc insert a string value under this key

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\RunOnce - To make it run once when u start ur pc (i think it then removes itself from this key)

Failing eveything else - Just link it to the Start-up folder.

Although I would recoomed the win.ini and registry entry.

Programs like Novell, Norton and McAfee use the registry to startup.

Sunny

Try this, I think it's from Aaron Young:

Public Const HKEY_CLASSES_ROOT = &H80000000
Public Const HKEY_CURRENT_USER = &H80000001
Public Const HKEY_LOCAL_MACHINE = &H80000002
Public Const HKEY_USERS = &H80000003
Public Const HKEY_PERFORMANCE_DATA = &H80000004

Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hkey As Long) As Long
Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal hkey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal hkey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA" (ByVal hkey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, lpType As Long, lpData As Any, lpcbData As Long) As Long
Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hkey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, lpData As Any, ByVal cbData As Long) As Long

Function RegQueryStringValue(ByVal hkey As Long, ByVal strValueName As String)
    
    Dim lResult As Long
    Dim lValueType As Long
    Dim strBuf As String
    Dim lDataBufSize As Long
    
    On Error GoTo 0
    lResult = RegQueryValueEx(hkey, strValueName, 0&, lValueType, ByVal 0&, lDataBufSize)
    If lResult = ERROR_SUCCESS Then
        If lValueType = REG_SZ Then
            strBuf = String(lDataBufSize, " ")
            lResult = RegQueryValueEx(hkey, strValueName, 0&, 0&, ByVal strBuf, lDataBufSize)
            If lResult = ERROR_SUCCESS Then
                RegQueryStringValue = StripTerminator(strBuf)
            End If
        End If
    End If
    
End Function

Public Function GetString(hkey As Long, strpath As String, strvalue As String)

    Dim keyhand&
    Dim datatype&
    r = RegOpenKey(hkey, strpath, keyhand&)
    GetString = RegQueryStringValue(keyhand&, strvalue)
    r = RegCloseKey(keyhand&)

End Function

Function StripTerminator(ByVal strString As String) As String
    Dim intZeroPos As Integer

    intZeroPos = InStr(strString, Chr$(0))
    If intZeroPos > 0 Then
        StripTerminator = Left$(strString, intZeroPos - 1)
    Else
        StripTerminator = strString
    End If
End Function


Public Sub savestring(hkey As Long, strpath As String, strvalue As String, strdata As String)

    Dim keyhand&
    r = RegCreateKey(hkey, strpath, keyhand&)
    r = RegSetValueEx(keyhand&, strvalue, 0, REG_SZ, ByVal strdata, Len(strdata))
    r = RegCloseKey(keyhand&)

End Sub



Private Sub Form_Load()

    'Save a Value to the Registry
savestring _
HKEY_LOCAL_MACHINE, "Software\Microsoft\Windows\CurrentVersion\Run", "MyApp", "C:\MyApp.exe"
End Sub

[pro2]

All the way U show me are too slow..
I make a security program..
and the program must start SOON ..
like g6 .. or Novel .. or any other anti-virus ..
The program must start BEFORE the desktop icons
are visible..

is it possible ??

[dsy5]

If you put it in the RunServices in the registry it will run before the Windows bootup.
The Run key and RunOnce key in the registry causes the program to load after Windows boots.

Try adding a line to autoexec.bat:

Open "c:\autoexec.bat" For Append As #1
Print #1, "PATH=C:\MyProgram\Program.exe"
'or is it:
PATH C:\MyProgram\Program.exe ?
Close #1

[dsy5]

Originally posted by Matthew Gates
Try adding a line to autoexec.bat:

A VB program cannot run in DOS. Autoexec.bat is run before Windows loads.

Originally posted by dsy5

Originally posted by Matthew Gates
Try adding a line to autoexec.bat:

A VB program cannot run in DOS. Autoexec.bat is run before Windows loads.

I knew that...I was just testing you .
Guess the Registry is your best bet pro2.