Section One BBS

Welcome, Guest.


Subject: Bulletin MPL program Date: Fri Jan 21 2022 02:55 pm
From: Dennis Katsonis To: All

  Re: Bulletin MPL program
  By: Dennis Katsonis to All on Fri Jan 21 2022 01:13 pm

 >   FindFirst (Root + PreFix + '*.*', 63);

 >   While DosError = 0 Do Begin
 >     If DirTime > UserLastOn And Upper(Copy(DirName, 1, Pos('.', DirName) - 1
 > <
 > > 'BULLETIN' Then Begin
 >       InStr := Copy(DirName, 7, Pos('.', DirName) - 7) + ' '

I have found that changing "UserLastOn" to "DateU2D(UserLastON)" seems to bring
about the desired behaiviour.
--- SBBSecho 3.10-Win32
 * Origin: MS & RD BBS bbsweb.mozysswamp.org (3:633/384)

Previous Message       Next Message
In Reply To: Bulletin MPL program (Dennis Katsonis)