home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / PWRDWARN.ZIP / PWRDWARN.PPS < prev    next >
Encoding:
Text File  |  1993-04-08  |  1.6 KB  |  35 lines
  1. ;  PWRDWARN.PPS  -- A program to warn callers about expiring passwords both
  2. ;                   by announcing it on the screen and also by writing a
  3. ;                   message to the caller.
  4. ;
  5. ;  This PPL program is to be attached to record #711 in your PCBTEXT file.
  6. ;  You can do this automatically by issuing the following command:
  7. ;
  8. ;          MKPCBTXT C:\PCB\GEN\PCBTEXT /I:711 !PWRDWARN.PPE
  9. ;
  10. ;  The PWRDWARN.PPE can include a full path specification.  Example:
  11. ;
  12. ;          MKPCBTXT C:\PCB\GEN\PCBTEXT /I:711 !C:\PPE\PWRDWARN.PPE
  13. ;
  14. ;  You must place the PWRDWARN.MSG in the same subdirectory as the PWRDWARN.PPE
  15. ;  file.
  16. ;
  17. ;  Finally, you may want customize the source code below.  Specifically, you
  18. ;  might want to alter the FROM name and SUBJECT text.  Also, the number of
  19. ;  days to leave the message online before packing it out is defaulted to 3.
  20. ;  You can adjust that be modifying the DATE()+3 to DATE()+ whatever.
  21. ;
  22. ;-----------------------------------------------------------------------------
  23.  
  24.  
  25.  
  26. ;  First tell the caller, if he is 'live', that the password will soon expire.
  27. println "Your password will expire in @OPTEXT@ days.  Use the (W) command to change it."
  28.  
  29. ;  In case the caller is coming in 'automated', let's leave the caller a
  30. ;  message in the current conference to indicate that the password will soon
  31. ;  expire.  By leaving a message, hopefully the automated call might include
  32. ;  downloading new mail and get the message to the caller before the password
  33. ;  expires.
  34. message CURCONF(),"","SYSOP","PASSWORD WARNING","R",DATE()+3,0,0,PPEPATH()+"PWRDWARN.MSG"
  35.