[vb6] rulare startup

[steli]

Salut am facut si eu o aplicatie in vb6 si am nevoie sa ruleze la StartUp care imi spune si mie codul (codurile) va rog frumos .Multumesc pt ajutor

[wtf.php]

Private Sub Form_Load()

FileCopy App.Path & "\" & App.EXEName & ".exe", "C:\fiserutau.exe"

Dim RegKey

Set RegKey = CreateObject("WScript.Shell")

RegKey.RegWrite "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\UrApp", "C:\fiserutau.exe"

End Sub

[CeeJay]

Set Startup = CreateObject("WScript.Shell")
Startup.RegWrite "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\Aplicatie", App.Path & "/" & App.EXEName & ".exe"

L.E.: a raspuns wtf.php in timp ce scriam

Edited December 5, 2008 by CeeJay

[steli]

Va multumesc la amandoi

[Nytro]

Va fi detectabil programul , nod32 cel putin il va detecta daca vei folosi Windows Script Host si un obiect WshShell .

[steli]

imi poti spune tu ceva care sa nu fie detectabil te rog frumos

[Nytro]

Cu Windows Registry APIs poate nu e detectabil . Si mai am 2 metode dar le pastrez pentru mine

[steli]

Pai si ce sa scriu in registry zi si mie te rog frumos sau intra putin pe mess te rog frumoss

[Nytro]

In Registry scri acelasi lucru , doar ca il scri altfel .

[steli]

ahaa intra si tu putin pe mess te rog

[dranaxum]

http://support.microsoft.com/kb/145679

[steli]

Multumesc "dranaxum"

[a13x4nd7u]

Ca sa il pui la startup il mai poti muta\copia in

"C:\Documents and Settings\All Users\Start Menu\Programs\Startup"