Buat Autoload Dan Invisible Program

[dekzorro 0]

aku rasa isu pasal autoload tu dah ader sblm ni.. tapi aku tak dapat carikk..kalu korang tau... post la kat aku.

autload tu camni.. aku nak program yg aku buat tu (cthnye) akan diaktifkan bila komputer reboot (start win). jadi tak yah la aku nak klik ikon bila nak bukak program tuh.

yg kedua nih mungkin takde lagi dlm forum...

aku nak program nih jadi mcm invisible program..mcm spamware tu la.. (tp ni bkn utk spamware..ni auto shutdown).

maknanyer..bila ON PC..autoshutdown akan aktif automatik dan org tak tau yg program tu dah aktif.

[mohdfadly 24]

ko nak buat dalam language aper ni?

[dekzorro 0]

guna VB6.0 -- cenang skit

[alternat0r 0]

Berikut adalah sample VB Project:

Project1:

Download 1

Description: Project 1 ni menunjukan contoh bagaimana hendak membuat Windows Startup menggunakan Registry. So, tentukan kedudukan dan nama file dan run the program.

Project2:

Download 2

Description: Project 2 ni menunjukan bagaimana hendak mengaktifkan program secara invisible dan akan serta merta shutdown apabila program di execute.

[Ancient One 3]

invisible program

dalam konteks aper?? gui nyer yang invisible ker, process nyer yang invisible ker..

[dekzorro 0]

dalam konteks aper?? gui nyer yang invisible ker, process nyer yang invisible ker..

←

[alternat0r 0]

mcm ni.. bila program tu dah outoload masa Win start, skrin program tu tak akan keluar kat monitor..tapi program tu mmg sdg run.

Kalau macam ni kau boleh download macam aku bagi link kat atas tu. Tapi sekiranya kau nak hide program tu dari program task manager bolehlah menggunakan call API RegisterServiceProcess pada 'Kernel32.dll'. Walaubagaimanapun ia hanya sesuai untuk Win9x/Me. Sekiranya program tu running pada Windows XP adalah sesuai sekiranya guna function CreateService. Rujuk MSDN untuk maklumat lanjut. Other way to hide is using illegal way - Memory Injection (not recommend).

satu lagi, walaupun program tu tak nampak, tapi ikon program tu ada kat tepi bar yg ada jam tu (tak ingat lak nama bar tu). jadi, bila admin ke, atau sesapa yg nak edit time kat TIMER tu, dia bole klik kat ikon tu dan edit time. tu jeee

errr.. camne lak nak buat supaya ikon pi duduk kat tepi jam tu??? need help again..

tq all   

Untuk letakan icon pada SystemTray bolehlah rujuk pada link berikut: PSC

Kat situ byk contoh code so, rajin2lah mencarik.

[dekzorro 0]

Alternator, tq bebanyak sbb Bantu aku buat visible program tuh. Aku skang ni Tanya kat ko aper fungsi coding² ni? Apakah tujuannya? Tu jeeee…

Apa fungsi coding ni…ada update kat registry ke?

Private Sub Form_Load()

SetKeyValue HKEY_LOCAL_MACHINE, "Software\Microsoft\Windows\CurrentVersion\Run", "KuihRaya", "C:\kuihraya.exe", REG_SZ

End Sub

ni pulak utk aper???

Public Sub SetKeyValue(ByVal hKey As Long, sKeyName As String, sValueName As String, vValueSetting As Variant, lValueType As Long)

Dim lRetVal As Long

lRetVal = RegOpenKeyEx(hKey, sKeyName, 0, KEY_ALL_ACCESS, hKey)

lRetVal = SetValueEx(hKey, sValueName, lValueType, vValueSetting)

RegCloseKey (hKey)

End Sub

Public Function SetValueEx(ByVal hKey As Long, sValueName As String, lType As Long, vValue As Variant) As Long

Dim lValue As Long

Dim sValue As String

Select Case lType

Case REG_SZ

sValue = vValue & Chr$(0)

SetValueEx = RegSetValueExString(hKey, sValueName, 0&, lType, sValue, Len(sValue))

Case REG_DWORD

lValue = vValue

SetValueEx = RegSetValueExLong(hKey, sValueName, 0&, lType, lValue, 4)

End Select

End Function

From modules

Yang ini mmg kena ada ker kalau nak coding registery

Public Const REG_SZ As Long = 1

Public Declare Function RegOpenKeyEx Lib "advapi32.dll" Alias "RegOpenKeyExA" (ByVal hKey As Long, ByVal lpSubKey As String, ByVal ulOptions As Long, ByVal samDesired As Long, phkResult As Long) As Long

Public Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long

Public Declare Function RegSetValueExString Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, ByVal lpValue As String, ByVal cbData As Long) As Long

Public Declare Function RegSetValueExLong Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, lpValue As Long, ByVal cbData As Long) As Long

Public Const HKEY_LOCAL_MACHINE = &H80000002

Public Const KEY_ALL_ACCESS = &H3F

[Ancient One 3]

Private Sub Form_Load()
SetKeyValue HKEY_LOCAL_MACHINE, "Software\Microsoft\Windows\CurrentVersion\Run", "KuihRaya", "C:\kuihraya.exe", REG_SZ
End Sub

generally, tambah entry ke registry. contoh kat atas tambah entry kepada windows startup list so program C:\kuihraya.exe akan run maser windows start. yang kaat bawah pun sama gak.. akses registry..

Public Const REG_SZ As Long = 1
Public Declare Function RegOpenKeyEx Lib "advapi32.dll" Alias "RegOpenKeyExA" (ByVal hKey As Long, ByVal lpSubKey As String, ByVal ulOptions As Long, ByVal samDesired As Long, phkResult As Long) As Long
Public Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long
Public Declare Function RegSetValueExString Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, ByVal lpValue As String, ByVal cbData As Long) As Long
Public Declare Function RegSetValueExLong Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, lpValue As Long, ByVal cbData As Long) As Long
Public Const HKEY_LOCAL_MACHINE = &H80000002
Public Const KEY_ALL_ACCESS = &H3F 

tu constants dan declaration yang kena ader kalau nak guner win32 api (in this case registry functions from advapi32.dll) dalam vb programs.