Click here to Skip to main content
11,584,443 members (63,990 online)
Click here to Skip to main content

Simple Send using Net Send

, 24 May 2004 97.3K 2.3K 34
Rate this:
Please Sign up or sign in to vote.
Simple front end for sending text messages over LAN

Introduction

This article shows a basic front-end for Net Send that allows sending messages to multiple recipients.

Using the code

The heart of the whole operation lies below :-

 If lstnames.SelectedItems.Count > 0 Then
   For Each strSeleted As String In lstnames.SelectedItems 
     'somehow a list item is in fact a string
      Dim strname As String = " " & strSeleted
      Dim lngPos As Long = 1
      Do
          Dim lretval As Long = Shell("net send " & strname & _
     " """ & Mid(strMessage, lngPos, iChunk) & """", vbHide)
          lngPos += iChunk
          'pause to stop out of sequence message chunks
          Sleep(100)
      Loop Until lngPos > Len(strMessage)
      strStatus &= strname.ToString
   Next strSeleted
 End If

Points of Interest

Very useful for sending error messages to nearby developers.

License

This article has no explicit license attached to it but may contain usage terms in the article text or the download files themselves. If in doubt please contact the author via the discussion board below.

A list of licenses authors might use can be found here

Share

About the Author

gordonchristie
United States United States
No Biography provided

You may also be interested in...

Comments and Discussions

 
GeneralMessenger Seervice is obsolete in XP SP2 and Vista Pin
VF14-Oct-07 1:29
memberVF14-Oct-07 1:29 
GeneralReceive message. Pin
Tailana31-May-05 22:39
memberTailana31-May-05 22:39 
GeneralThere's a much better article about this Pin
juanchosc25-May-04 8:47
sussjuanchosc25-May-04 8:47 
GeneralIt works but... Pin
Anonymous25-May-04 2:42
sussAnonymous25-May-04 2:42 
GeneralRe: It works but... Pin
Jason McBurney25-May-04 8:42
memberJason McBurney25-May-04 8:42 
GeneralRe: It works but... Pin
Anonymous18-Jan-05 6:19
sussAnonymous18-Jan-05 6:19 
GeneralRe: It works but... Pin
BodyGlove19-Jan-06 7:16
memberBodyGlove19-Jan-06 7:16 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.

| Advertise | Privacy | Terms of Use | Mobile
Web03 | 2.8.150603.1 | Last Updated 25 May 2004
Article Copyright 2004 by gordonchristie
Everything else Copyright © CodeProject, 1999-2015
Layout: fixed | fluid