I'll be glad to. Thanks Mike. I actually understand this! Claudine
-----Original Message----- From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of MikeB Sent: Saturday, October 25, 2008 6:56 PM To: RBASE-L Mailing List Subject: [RBASE-L] - RE: NET SEND Message to users from within R:BASE V8 Then for the "No Flicker version" you would do this: SET VAR nShowCmd Integer = 0 { SW_HIDE } SET VAR lpDirectory TEXT = NULL SET VAR lpParameters TEXT = NULL SET VAR lpFile TEXT = 'netsend.bat' SET VAR lpOperation TEXT = 'open' SET VAR HWND Integer = 0 { since it runs hidden, pass HWND as null } SET VAR vRetVal Integer = NULL IF (chkfunc('ShellExecuteA')) = 0 THEN STDCALL function 'ShellExecuteA' ALIAS 'ShellExecute' + (Integer, ptr TEXT (256), ptr TEXT (128), + ptr TEXT (128), ptr TEXT (32), Integer) : Integer ENDIF DELETE netsend.bat SET VAR vmess TEXT = ('Hello World!' & (ctxt(.#NOW))) SET VAR vnetsend = ('NET SEND *' & .vmess) OUTPUT netsend.bat WRITE .vnetsend OUTPUT SCREEN SET VAR vi = (dlcall('shell32', 'ShellExecuteA', + nShowCmd, lpDirectory, lpParameters, lpFile, lpOperation, HWND)) RETURN ----- Original Message ----- From: "Claudine Robbins" <[EMAIL PROTECTED]> To: "RBASE-L Mailing List" <[email protected]> Sent: Saturday, October 25, 2008 5:56 PM Subject: [RBASE-L] - RE: NET SEND Message to users from within R:BASE V8 > OK, I got it. Here is my baby steps routine for now: > > > > DELETE netsend.bat > > SET VAR vmess TEXT = ('Hello World!' & (ctxt(.#NOW))) > > SET VAR vnetsend = ('NET SEND *' & .vmess) > > OUTPUT netsend.bat > > WRITE .vnetsend > > OUTPUT SCREEN > > LAUNCH netsend.bat > > RETURN > > > > > > _____ > > From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of Claudine > Robbins > Sent: Saturday, October 25, 2008 12:00 PM > To: RBASE-L Mailing List > Subject: [RBASE-L] - RE: NET SEND Message to users from within R:BASE V8 > > > > Emmitt, > > > > I'm not sure I understand. Do you mean that I can: > > > > SET VAR MESSAGE = 'This is my message' > > > > And then issue NET SEND %MESSAGE%? > > > > Claudine > > > > _____ > > From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of Emmitt Dove > Sent: Saturday, October 25, 2008 11:44 AM > To: RBASE-L Mailing List > Subject: [RBASE-L] - RE: NET SEND Message to users from within R:BASE V8 > > > > Claudine, > > > > Use R:BASE to write a .CMD file, say NETMSG.CMD, and substitute for the > variables. Then: > > > > LAUNCH netmsg.cmd > > > > Emmitt Dove > > Manager, DairyPak Business Systems > > Evergreen Packaging, Inc. > > [EMAIL PROTECTED] > > (203) 214-5683 m > > (203) 643-8022 o > > (203) 643-8086 f > > [EMAIL PROTECTED] > > > > From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of Claudine > Robbins > Sent: Saturday, October 25, 2008 11:05 AM > To: RBASE-L Mailing List > Subject: [RBASE-L] - NET SEND Message to users from within R:BASE V8 > > > > Frank Taylor got me good and started on this path and I have setup my three > users to receive NET SEND messages and have tested them -real easy. > > > > My question now is how do I customize the message by using R:BASE variables > in the NET SEND command? > > > > NET SEND %RECIPIENT% From %FULLNAME%, %MESSAGE% > > > > Any ideas? > > > > Thank you! > > > > Claudine > >
