Eingehende NetSend Nachrichten automatisch löschen

[hummer]

Hi

Ich programmier ein Netsend Programm, mit dem ich über shellexecute Netsend aufrufe Funktion Nachrichten verschicken kann.

Gibt es denn auch eine Funktion mit der ich eingehende Nachrichten sofort löschen oder aber ignorieren kann.

Vielen Dank schonmal

ist leider in die falsche kategorie gelandet, also bitte verschieben in die Netzwerk kategorie

[iaby]

das hier wurde mal irgenwo hier im forum gepostet:

Code:

var
 hWnd, hButton: Cardinal;
begin
 hWnd := FindWindow(nil, 'Nachrichtendienst ');
 if hWnd = 0 then
  exit;
 hButton := GetDlgItem(hWnd, $2);
 SendMessage(hButton, BM_CLICK, 0, 0);
 SendMessage(hButton, BM_CLICK, 0, 0);
end;

ich hab das jetzt aus dem zusammenhang rausgerissen, glaube aber, das es noch geht :wink:
gruss,
iaby

[hummer]

Bei mir kommt immer bei exit ein Fehler.

[Fehler] Unit1.pas(161): Ungültiges Zeichen in Eingabedatei: '*' ($A0)

Kann mir da jemand helfen?
Danke

[Christian Seehase]

Moin Manuel,

also ich hab' kein Problem, wenn ich das hier herauskopiere.
Ganz zur Not müsstest Du es wohl abtippen.

[Tom]

Zitat:

Zitat von hummer

Kann mir da jemand helfen?

Du Dir selber. Ersetze das entsprechende Zeichen (Cursor steht an ja an der Stelle) durch ein Leerzeichen.

[hitzi]

Wenn du administrativen Zugriff auf den Computer hast und wirklich keine NetSend's mehr willst, beende doch einfach den Nachrichtendienst auf dem entsprechenden Computer.

MfG Hitzi

[The-X]

Damit werden aber nicht schon empfangene Messages geschlossen ... hab ich selber schon ausprobiert

[hitzi]

Ziemlich alter Thread hier!

Wenn du den NAchrichtendienst beendest und deaktivierst. Dann empfängst du gar nicht erst irgendwelches NAchrichten.

MfG Hitzi

[Assarbad]

Also, daß beim Deaktivierten Messenger-Service noch irgendwo Nachrichten gespeichert sind, bezweifele ich doch stark. Bei Mailslots (nix anderes ist der Empfangsmechanismus vom Messenger) gibt es nicht mal die Sicherheit, daß überhaupt was ankommt.

[Brüggendiek]

Hall!

Zitat:

Zitat von Assarbad

Also, daß beim Deaktivierten Messenger-Service noch irgendwo Nachrichten gespeichert sind, bezweifele ich doch stark.

Die Aussage von The-X interpretiere ich so: Ein Nachrichtendienst-Spammer hat gleich 50 Nachrichten geschickt. Da will einer den Nachrichtendienst deaktivieren. Klappt auch, nur sind die 50 Fenster immer noch auf dem Bildschirm und müssen manuell (oder nach dem Motto: "Boot tut gut") geschlossen werden.

Naja, wir wissen ja, daß man 100 Windows-Anwender braucht, um eine Glühlampe zu wecheln: einer schraubt, und 99 klicken die Fehlermeldungen weg :mrgreen:

Gruß

Dietmar Brüggendiek

[Assarbad]

Ah so ... na dann wie oben beschrieben ... FindWindow()

[hitzi]

50 Nachrichten auf einmal? Windows empfängt doch nur etwa 10 Stück aufeinmal der Rest verschwindet im Nirvana. Jedenfalls bei uns in der Firma (Win2000) ;)

MfG Hitzi

[BungeeBug]

HI,

bei mir kommen soviele an wie ich schicke ....

aber evl. hilft das hier :)

Delphi-Quellcode:

procedure close_netsend_msg;
begin
 while findwindow(nil, 'Nachrichtendienst ') <> 0 do
  begin
   SendMessage(findwindow(nil, 'Nachrichtendienst '),WM_Close,0,0);
  end;
end;

Damit sollten wirkliche alle Fenster ins Nichts geschickt werden.