Hi!

Ich spiel grade mit VBScript rum und hab mal ein Tool für das klassische "Net Send" gemacht.

Set objShell = Wscript.CreateObject("WScript.Shell")

Comp2Reach = InputBox("Name or IP of the computer:")

Message2Send = InputBox("Your message:")

objShell.Run "net send " & Comp2Reach & " " & Message2Send

Das klappt auch, allerdings will ich jetzt am Ende noch eine If-Abfrage dranhängen, die bei erfolgreichem bzw. fehlerhaftem Senden eine Meldung ausgibt.