خوبه.gif)
من هیچ وقت از اون تابع api خوشم نیومده و واسه همین سورسش رو می زارم
و بقیه اش با خودت.
(راستی می تونی اسم فایل اجرایی رو موقتا تغییر بدی
و وقتی کارت تموم شد اسمش رو به حالت اول برگردونی.)
ControlProcessor

کد:
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
Kill IT
This Kill IT application, when started will run in the systray,.. When the User presses Ctrl + Alt + Bkspace, it goes into Kill Mode and your cursor will change.. If u click on any window.. when the applicaion is in the kill mode, it terminates that process...
کد:
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
Kill process as easy as 1-2-3
Dim Process
For Each Process In GetObject("winmgmts:"). _
ExecQuery("select name from Win32_Process where name='notepad.exe'")
Process.Terminate (0)
Next
Detect Windows Shutdow/Restart/Logoff

کد:
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید