VBcoders Browse New Submit Contact Sign In

No account? Register free

Forgot password?

EasyNetSend

BrianHiggins  (1 Submission)   Complete Applications   Visual Basic 5.0   Advanced   Wed 3rd February 2021

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.

Returns
error messages

Side Effects
does NOT work on Windows 95, 98, or ME

API Declarations
Declare 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)

Rate EasyNetSend (2(2 Vote))

Download EasyNetSend

EasyNetSend Comments

No comments yet — be the first to post one!

Post a Comment

0/1000 characters