Net send mit Delphi

[hummer]

Hallo
Ich möchte eine Delphi Programm schreiben mit dem ich per net send Nachrichten verschicken. Dazu brauche ich ja wahrscheinlich eine Batch Datei.
Eine net send Zeile würde ja so aussehen.

net send {computername} {Nachricht}

Mein Problem ist mit einer Procedur eine Batch Datei mit den Parametern für Nachricht und Computername zu erstellen und zu öffnen.

Danke schon mal im Vorraus.

[kaemmi]

nimmste dir ein memo, fügst da alles ein
und speicherst es mit
memo.lines.savetofile('filename.bat') ab.
dann kursiert hier im forum eine funktion der shellapi,
mit der du das dann öffnen kannst.
http://www.delphipraxis.net/internal...t=shellapi+exe

Viel Spass noch, Kaemmi

[hummer]

Danke werd ich gleich mal ausprobieren.

[Luckie]

Na ja, man kann es bestimmt noch umständlicher machen. Ich müßte dazu nur etwas nachdenken.

Warum startest du nicht das Programm net mit Shellexecute und übergibst als Parameter "send" "Computername" "Nachricht"?

Oder noch besser: Nutz die von Microsoft dafür bereitgestellte API-Funktion: NetMessageBufferSend.

[kaemmi]

Hast ja recht. Hab mal wieder nich nachgedacht.
danke für die korrektur.

CU, Kammi

P.S.
hab hier noch was:

Zitat:

Der Präsident von Lotus betritt einen Fahrstuhl mit einer Waffe in der Hand. Im Fahrstuhl befinden sich Saddam Hussein, Erich Honecker und Bill Gates. In der Waffe sind aber nur zwei Patronen. Wen erschießt er?
Bill Gates doppelt, nur um sicher zu gehen.

[Luckie]

Dein PS gehört hier wohl nicht hin. Zu dem ist es auch, wie ich finde, nicht sehr lustig und geschmacklos, da alle drei Personenn nichts miteinander zu tun haben.

[hummer]

Danke für deinen Vorlschlag Luckie.
Funktioniert wirklich besser so.

Hab aber noch mal ne Frage.
Kann ich mit deinem Vorlschlag, denn auch an mehrere Computer eine Nachricht gleichzeitig schicken, ohne alles zweimal schreiben zu müssen?

[kaemmi]

Oh, Gott. Hab dich nicht so.
Machs auch nie wieder. Versprochen.

[xpmstos]

gibt es auch eine möglichkeit die "net send"-funktionalität ohne ein "shell execute" zu benutzten?

gruß xpmstos

p.s. @ kaemmi: bill gates hat bewundernswertes geleistet, auch wenn es in deinen augen nicht so scheint, schließlich hat er einen weltweiten standard geschaffen durch denen viele (sehr sehr viele) menschen heutzutage ihren lebensunterhalt verdienen, leider ist er dafür auch der große buhmann, wäge selber beide sachen auf und denk mal drüber nach was wäre wenn es nicht soeinen software-standard geben würde und wenn jede firma ihr eigenes ding durchziehen würde... (das gehört hier nicht her, aber ich musste das einfach mal loswerden wo ich soein sch**ß hier lesen muss)

[Luckie]

Zitat von xpmstos:

gibt es auch eine möglichkeit die "net send"-funktionalität ohne ein "shell execute" zu benutzten?

Wer lesen kann ist klar im Vorteil. Kuck mal was ich in meinem ersten Beitrag geschreiben habe.