Re: !!NETWORKED!!

> > Here is what mine says.
> > 112/117      [4] Networked VBBS Hints & Tips
> > I run DOS 7.00.02
> It will put the network name in the "Change Message Base" screen.  Not when
> you are doing a Quick Scan for NEW MESSAGES, which seems to be what you guys
> are talking about.  Mine says "Networked" too.  You need a mod, as someone
> mentioned earlier, to include the actual net in the Quick Scan.

I mentioned that mod.  I've gone to my source code and found it.  Hopefully
this is all of it:

'---------------------------------- Cut --------------------------------------
' This mod puts the network names at the top of the subs when you do a
' newscan messages in VBBS 7.x.  Sorry... original author info has been
' lost.  If I had to guess I'd say it's by Dennis Matteson.  

' In VBBS4.BAS, find the subroutine "writehdr";

= SUB writehdr (z$)
+ DIM b$(numnets), b2$(numnets)
= serwrt norm$ + ylw$ + z$ + red$ + "[" + norm$ + num1$(dbdef) + red$ + "] "
= chkfile dbpath$ + "\" + cdf$ + ".NET", g&
= IF g& > 0 THEN ext 217 ELSE ext 216
+ q$ = blu$ + "Local       ": n = 0
+ IF mc1.dispnet THEN
+   netdbconfig dbpath$ + "\" + cdf$ + ".NET", b$()
+   FOR j = 1 TO numnets
+     IF LEN(b$(j)) THEN ncf = ncf + 1: b2$(ncf) = net$(j)
+   NEXT
+   IF ncf > 0 THEN q$ = b2$(1): n = 1
+ ELSE
+   chkfile dbpath$ + "\" + cdf$ + ".NET", g&
+   IF g& > 0 THEN q$ = red$ + "Networked   ": n = 1
+ END IF
+ IF n = 1 THEN
+   extvar$ = q$
+   ext 217
+ ELSE
+   extvar$ = q$
+   ext 216
+ END IF
= serwrt norm$ + sv$(55) + ylw$
= END SUB
'---------------------------------- Cut --------------------------------------

      --- KoZmiK KaTman ---
              <VPI>

                EMERALDnet(RC) VPInet(NC) Fidonet VirtualNET SGA-Net(RC)
  �y�r��ti��   Dallas, TX  110 Doors / 3 gig  Home of V-Pro Industries <VPI>
                DM/F! V.34 (214)394-8021 for networks, (214)394-4837 for users