Hi Kathy,

Kathy wrote:
That was not working - I do not understand the comand you sent

Public Sub NetSend(rsUsername As String, _
rsMessage As String)
Shell "net send " & rsUsername & " " & Chr$(34) _
& rsMessage & Chr$(34)
End Sub

would I set it up like this
Public Sub NetSend(rsUsername As String, _
rsMessage As String)
Shell "net send " & rsUsername & "157.159.12.123 " &
& rsMessage & "hi there"
End Sub

Not quite - I gave an example of using a subroutine to accomplish the task
in order to make the code more reusable. You would leave the subroutine
alone, but you would use it in your code like this:

NetSend "157.159.12.123", "hi there"

That would send the message "hi there" to the computer on the IP address
157.159.12.123.

--
Regards,

Jake Marx
MS MVP - Excel
www.longhead.com

[please keep replies in the newsgroup - email address unmonitored]