Simply:-

ED BP MOTD
I <Enter>
OPEN 'file' TO file THEN
        READ MOTD FROM file,'MOTD' THEN
                    CNT=DCOUNT(MOTD,@FM)
                    FOR X=1 TO CNT; CRT MOTD<X>; EXT X
CRT; CRT 'Read and Press Enter To Continue'; INPUT WHATEVER:
                    STOP
         END ELSE
                    CRT; CRT 'No Message Of The Day'; CRT; STOP
         END
END ELSE
         CRT; CRT 'No MOTD File'; CRT; STOP
END
<Enter>
FI

"file" is whatever file you wish to use even &TEMP& or CTL (general control file)?

Compile and include line

RUN BP MOTD

in your LOGIN paragraph

To create the message:-

ED file MOTD  (or wED or whatever editor)
I
Type whatever message you want to display here
<Enter>
FI

To delete the message

ED file MOTD
FD

Like I said it is simple. Assumes the message is less than a screen full and each line is less than screen width.

No flames please - I said it is simple.

Louis

----- Original Message ----- From: "Gabriel Green" <[EMAIL PROTECTED]>
To: <u2-users@listserver.u2ug.org>
Sent: Sunday, March 25, 2007 12:38 PM
Subject: [U2] New to UV/PICK, programming a banner


Hello,

I am new to PICK/UniVerse and was wondering if someone could help me with
some BASIC code or a PROC instructions to get me going on a banner program
that will display before, or after, the "Logon Please:" prompt (but after
the initial telnet server login).

Preferrably I'd like a unix style /etc/motd type thing (we're on Windows of course so that is not available, UV 10.2.) that I could update periodically
with wED and update for our users to see.

Can anyone help with this?

Thanks,
Gabe
-------
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

Reply via email to