vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#

https://www.vbarchiv.net
Rubrik: Allgemein13.03.02
Einen Prozess beenden

VB-Version:  VB5, VB6
 Views:  39.238 

Einen Prozess gezielt beenden - wenn die TaskId bekannt ist - geht so:

Private Declare Function CloseHandle Lib "kernel32" ( _
  ByVal hObject As Long) As Long
 
Private Declare Function OpenProcess Lib "kernel32" ( _
  ByVal dwDesiredAccess As Long, _
  ByVal bInheritHandle As Long, _
  ByVal dwProcessId As Long) As Long
 
Private Declare Function TerminateProcess Lib "kernel32" ( _
  ByVal hProcess As Long, _
  ByVal uExitCode As Long) As Long
 
Const PROCESS_TERMINATE = &H1
 
Public lTaskID as Long
 
Private Sub cmdTerminate_Click()
   Dim hTask As Long
   Dim lResult As Long
   hTask = OpenProcess(PROCESS_TERMINATE, 0&, lTaskID)
   lResult = TerminateProcess(hTask, 1&)
   lResult = CloseHandle(hTask)
End Sub

Ein Beispiel wie man alle laufenden Anwendungen und auch die TaskID der Anwendungen ermitteln kann finden Sie in unserem Tipp  Alle laufenden Programme ermitteln .

 
 
Copyright ©2000-2024 vb@rchiv Dieter OtterAlle Rechte vorbehalten.


Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.