یه سوال در مورد Process

[shedayat]

راستش من مي خوام يه ويروس بنويسم که حاوي دو تا فايل باشه.هر کدوم اون يکي رو چک کنه که اگه اون فايل نبود دوباره اجراش کنه حالا مي خوام بدونم که چجوري بايد بفهمم يعني با چه تابعي بفهمم که برنامه مورد نظر من در ليست Process هست يا نه. ( امیدوارم که متوجه شده باشی)

سلام.
بهتر بود ابتدا مشکلت رو به همین صورت مطرح میکردی و بحث رو منحرف نمیکردی.
در مورد این مشکل شما اصلا روشی که انتخاب کردی منطقی و اصولی نیست. فرض 2 تا پروسه با نام های a.exe و b.exe داری که در هر کدوم در هر ثانیه 10 بار هم دیگه رو چک میکنن. درسته سرعت عمل انسان اون قدر نیست که در تسک منیجر این 2 پروسه در میلی ثانیه ببنده. ولی به راحتی با مراجعه به command prompt و استفاده از دستور tskill میشه 2 پروسه رو در میلی ثانیه بست. پس این روش رو به راحتی میشه دور زد.

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

در مورد روش خودت. چک کردن پروسس لیست منطقی نیست. چون در اون صورت باید یه اسم تابلو بذاری که تکراری نباشه. شما بهتره از روش چک کردن برنامه از روی کپشنش استفاده کنی. یه کپشن تک برای برنامت بذار و همین کپشن رو با findwindow چک کن. اگه نبود برنامت رو دوباره اجرا کن.
البته هر کپشنی بذاری میتونه تکراری بشه و راه بهتر باز هم روشیه که مبین جان اشاره کردن. چک کردن از روی هندل ها که 100% یکتاست.
ولی شما بهتره از همین روش کپشن استفاده کنی. میتونی کپشنی بذاری که احتمال تکراری بودن رو بیاری پایین.

این هم کد چک کردن وجود داشتن پنجره مورد نظرت.

کد:

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Dim lngRes As Long
lngRes = FindWindow(vbNullString, "Windows Task Manager")
If lngRes = 0 Then Shell "FileAdrs"

میشه روش های اینجکت و .... رو که در بالا بهش اشاره کردی رو توضیح بدی؟