Send Network Message

  • Thread starter Thread starter Steven
  • Start date Start date
S

Steven

I am trying to send a network message to myself without success.

Sub SendNetorkMessage()
Dim machinename As String
machinename = "Acct010_XP"
Shell "NET SEND " & machinename & " 'Good Morning'"
End Sub

I do not get anything. That is my machine name I am sure. What is incorrect?

Thank you,

Steven
 
you need to shell a command window with "cmd.exe" , then with that in focus
use SENDKEYS with the text you want to type into the command window
 
Back
Top