Website Design United States, Website Design California, Website Designing United States, Website Designing California

Net Send - Visual Basic 6

Net Send Utility - A simple way to use the Shell command, and send a message to a user on your network, using the Net Send function.

This function does NOT return any result back from the Net Send command.

Option Explicit

Private Sub CMD_Net_Send_Click()

Dim User As String
Dim Message As String
Dim x As Double

User = TXT_User.Text
Message = TXT_Message.Text

x = Shell("CMD.exe /c net send " & User & " " & Message)
TXT_User.Text = ""
TXT_Message.Text = ""

End Sub

42 B Malviya Nagar , New Delhi-110017

Skype: manmeetsi
Tel: 91-011-40502005, 9810067295



© 2008-2009