فایل های رو که ویروس تولید می کنه را بچه ها معرفی کردن.
اگه کسی نخواست ویندوزش رو هم عوض کنه
1-با ERD commander سیستم رو بوت کنید
بعد فایلها (Virus.exe , FSP32.exe, Service.exe)رو پاک کنید.نحوه پاک کردن رجیستری هم بچه ها براتون نوشته بودن.
2-به مسیر زیر برید
کد:
http://iran-eng.com/showthread.php?p=596989#post596989
و آنتی رو بر دارید.
این آنتی به صورت مرحله ای ویروس را براتون پاک می کنه.
اینم سورس آنتی ویروس.
//---------------------------------------------------------------------
Function EnumWindowsProc2 (wnd: HWND; List: TStrings) : boolean ;stdcall;
var Caption: array[0..256] of Char;
begin
if GetWindowText (wnd, Caption, SizeOf(Caption)-1) <> 0 then
begin
if not IsWindowVisible(wnd) then
List.AddObject( caption, TObject( Wnd ));
end;
Result :=True;
end;
//----
Function GetProcessListTStringList;
begin
Result:=TStringList.Create;
EnumWindows(@EnumWindowsProc2, Integer(result));
end;
//----
Function EndTaskV(TaskName:String;TaskHWND:Hwnd):Boolean;
var hProcess,i : HWND;
pid : DWORD;
begin
Result:=false;
i := TaskHWND;
PostMessage(i,wm_close,0,0);
GetWindowThreadProcessID( i, @pid );
hProcess := OpenProcess(PROCESS_ALL_ACCESS, TRUE, pid);
Result:=TerminateProcess(hProcess, 0);
end;
//ProcessName:='service'; Ver2
// ProcessName:=' kazme_gheyz'; Ver1 Attention kazme_gheyz Not kazme__gheyz !
;ProcessList1:=GetProcessList
if EndTaskV(ProcessList1[j],HWND(ProcessList1.Objects[j])) Then
Memo1.Lines.Add('Kill Process '+ProcessList1[j]+' KGH Ver '+IntToStr(Ver) +' OK');
لطفا اگر اين نوشته به شما کمک کرد فقط بگوييد خدا پدرش را بيامرزد(هم پدر حجت....).
