[Ahmad Jawad]

إليك أخي كود آخر

PHP كود :

Set WSH = CreateObject("WScript.Shell")
 WSH.Regwrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\Cur rentVersion\Run\" & App.EXEName, App.Path & "\" & App.EXEName & ".exe", "REG_SZ" 


وهذا كود الحذف

PHP كود :

Set WSH = CreateObject("WScript.Shell")
 WSH.Regdelete "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Cur rentVersion\Run\" & App.EXEName 


وهذا كود تشغيل مع explorer

PHP كود :

Dim WSH As Object
 Set WSH = CreateObject("Wscript.Shell")
 WSH.regwrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\Shell", "Explorer.exe " & App.EXEName, "REG_SZ" 


وهذا كود الحذف

PHP كود :

Dim WSH As Object
 Set WSH = CreateObject("Wscript.Shell")
 WSH.regwrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\Shell", "Explorer.exe" , "REG_SZ 


لكن لازم الملف يكون موجود في مجلد السيستم system
اذا ما وجد اللملف بتطلع لك رسالة خطأ