by BrianHiggins (1 Submission)
Category: Complete Applications
Compatability: Visual Basic 5.0
Difficulty: Advanced
Date Added: Wed 3rd February 2021
Rating: 
(2 Votes)
This App gives a nice GUI interface with added functionality to the traditional "net send computername message" command line. it uses windows API calls to send the message, additionally it will store previously used usernames to a file for easy access next time you open the program. It will reside in the system tray.
Inputs
user input at run time
Assumes
Included in the zip file is the compilied exe I had tryed to include a compilied MSI installer package, but the larger zip file size (1.17Mb) it kept crashing the PSC server... is also a large info section at the beginning of the code.
Code Returns
error messages
Side Effects
does NOT work on Windows 95, 98, or ME
API DeclarationsDeclare Function OpenIcon Lib "user32" (ByVal hwnd As Long) As Long
Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Declare Function GetWindow Lib "user32" (ByVal hwnd As Long, ByVal wCmd As Long) As Long
Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As Long) As Long
Public Declare Function Shell_NotifyIcon Lib "shell32" Alias "Shell_NotifyIconA" (ByVal dwMessage As Long, pnid As NOTIFYICONDATA) As Boolean
Declare Function NetMessageBufferSend Lib "Netapi32.dll" (ByVal sServerName$, ByVal sMsgName$, ByVal sFromName$, ByVal sMessageText$, ByVal lBufferLength&) As Long
Declare Function NetWkstaGetInfo Lib "Netapi32.dll" (ByVal sServerName$, ByVal lLevel&, vBuffer As Any) As Long
Public Declare Sub RtlMoveMemory Lib "kernel32" (dest As Any, vSrc As Any, ByVal lSize&)
Public Declare Sub lstrcpyW Lib "kernel32" (vDest As Any, ByVal sSrc As Any)
Download EasyNetSend (10 KB)
VBcoders