+- Parsi Coders (http://parsicoders.com)
+-- انجمن: Software Development Programming (http://parsicoders.com/forumdisplay.php?fid=37)
+--- انجمن: Visual Basic Programming (http://parsicoders.com/forumdisplay.php?fid=39)
+---- انجمن: Visual Basic 6 (http://parsicoders.com/forumdisplay.php?fid=44)
+---- موضوع: سورس کد بستن پروسه نرم افزار (ویژوال بیسیک 6) (/showthread.php?tid=3201)
سورس کد بستن پروسه نرم افزار (ویژوال بیسیک 6) - Amin_Mansouri - 06-05-2013
در سورس زیر نحوه پستن پروسه notepad.exe رو یاد میگیرید.
هر برنامه ای که میخواهید پروسه ان رو ببندید فقط کافیه جای notepad.exe اسم پروسه مورد نظر رو بنویسید:
سورس کد:
کد پی‌اچ‌پی:
Private Sub Command1_Click()
TerminateProcess ("notepad.exe")
End Sub
Private Sub TerminateProcess(app_exe As String)
Dim Process As Object
For Each Process In GetObject("winmgmts:").ExecQuery("Select Name from Win32_Process Where Name = '" & app_exe & "'")
Process.Terminate
Next
End Sub