Net send prog

[XIFT]

Das is der befehl:
Leider erkennt er meine Variablen user und text net an ! Wenn ich werte dafür einsetze gehts!!

ShellExecute(0, Nil, PChar('C:\Windows\system32\net.exe'),
Pchar('send user text'), Pchar(''), SW_NORMAL) ;

shuice!!!
Kann jemand helfen=?

[Luckie]

Hast du schon mal überlegt, was du da schreibst?

Zitat:

net send user text

Ich bezweifele, dass es den Benutzer "user" in deinem Netzwerk gibt.

Strings kann man mir dem "+" Operator verbinden, so viel als Tipp.

Und würdest du bitte das Wort "Hilfe" aus dem Topic entfernen. Hilfe braucht hier so ziemlich jder der hier postet. Danke.

[Tubos]

Willkommen in der DP!

Wenn user und text Variablen sind, dann müsste so heißen:

Delphi-Quellcode:

ShellExecute(0, Nil, PChar('C:\Windows\system32\net.exe'), 
Pchar('send '+user+' '+text), Pchar(''), SW_NORMAL) ;

[XIFT]

also ich hab das noch net ausprobiert! Aber bei deiner version wird sich das prob ergeben das 'send' den befehl abschließt...

Ich probiers aba zur sicherheit nochmal aus

[Delphi Star]

So ist es aber besser:

Delphi-Quellcode:

ShellExecute(0, Nil, PChar('net.exe'),
Pchar('send 127.0.0.1 blablabla), Pchar(''), SW_Hide);

Und mit Variablen:

Delphi-Quellcode:

ShellExecute(0, Nil, PChar('net.exe'),
Pchar('send '+edit1.text+' '+edit2.text+'), Pchar(''), SW_Hide);

[Luckie]

Was verstehst du unter "Befehl abschließen". Besser wäre es sowieso das mit der dafür vorgesehen API Funktion NetMessageBufferSend zu machen. Die Fornsuche sollte helfen.

[Luckie]

@DelphiStar: Warum sollte deine Methode besser sein? Bzw. was ist an ihr anders? Und warum übergebt ihr immer einen leeren PChar für das Verzeichnis, anstatt nil wie es üblich ist?

[XIFT]

Gelöst !

Thx an alle !