PDA

View Full Version : سوال: بستن explorer.exe



maminb
پنج شنبه 15 اسفند 1387, 21:07 عصر
سلام. چطور میتونم پروسس explorer.exe رو ببندم بطوری که اتوماتیک باز نشه؟ خواستم با روشی که یکی از دوستان تو این تاپیک (http://barnamenevis.org/forum/showthread.php?t=147012) ذکر کردند، استفاده کنم اما بعد از یه مدت پروسس explorer اتوماتیک دوباره باز میشه. اما وقتی با تسک منیجر میبندیمش، تا موقعی که خودمون بازش نکنیم، اجرا نمیشه. ممنون میشم راهنماییم کنین.



با تشکر.

anooshiran
جمعه 16 اسفند 1387, 09:55 صبح
سلام دوست عزيز





PrivateSub KillProcesse(ByVal ProcessesName)
' به سكون در آموردن پروسس جاري
Dim CurProcess AsNew Process
CurProcess = Process.GetCurrentProcess
CurProcess.PriorityClass = ProcessPriorityClass.Idle

' حذف پروسس دلخواه
Dim AllProcesses() As Process = Process.GetProcesses
OnErrorResumeNext
ForEach _Process As Process In AllProcesses
If _Process.ProcessName = ProcessesName Then
_Process.Kill()
EndIf
Next
EndSub



در ضمن ميتوني يك تايمر هم بعد از kill قرار بدي تا كمي وقفه ايجاد كنه. چون حذف يك پروسس سريع اتفاق نمي افته و كمي زمان مي بره.
امتحان كن نتيجه را خبر بده