Windows Task-Manager ausschalten

    • VB6

      Windows Task-Manager ausschalten

      Hallo zusammen !
      Mit die Code könnts Ihr den Task-Manager ausschalten, das Funktioniert solange das Projekt läuft !


      Visual Basic-Quellcode

      1. Option Explicit
      2. Private Const WM_CLOSE = &H10
      3. Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
      4. Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
      5. Private Sub Timer1_Timer()
      6. Dim hWnd As Long
      7. hWnd = FindWindow(vbNullString, "Windows Task-Manager")
      8. If hWnd <> 0 Then
      9. Call SendMessage(hWnd, WM_CLOSE, 0, 0)
      10. End If
      11. End Sub



      Mfg Alex