home *** CD-ROM | disk | FTP | other *** search
/ ftp.wwiv.com / ftp.wwiv.com.zip / ftp.wwiv.com / pub / BBS / BDAYMAX1.ZIP / FINDBDAY.BAT < prev    next >
DOS Batch File  |  1995-06-25  |  1KB  |  48 lines

  1. @echo off
  2. set G$$=1
  3. if "%1"=="nocredit" goto nocredit
  4. cls
  5. Echo.
  6. Echo  BDAY_MAX (c) 1994 by John Medland 1:250/840 
  7. Echo.
  8. :nocredit
  9. \max\bday\onpath fdate.exe
  10. if errorlevel 5 goto :badfdate
  11. goto :next
  12. :badfdate
  13. echo Can't locate FDATE.EXE on your PATH. Aborting!>\max\bday\noshow
  14. goto :noshow
  15. :next
  16. \max\bday\onpath get.exe
  17. if errorlevel 5 goto :badget
  18. goto 2next
  19. :badget
  20. echo Can't locate GET.EXE on your PATH. Aborting!>\max\bday\noshow
  21. goto :noshow
  22. :2next
  23. Echo Searching for Birthdays...
  24. fdate /Ff /Omm-dd-CCYY /P"set bday=" > \max\bday\setb.bat
  25. call \max\bday\setb.bat
  26. get Z "%BDAY%" /S /W6
  27. \max\bday\textfind "%GET%" < \max\bday\birthday.dat > \max\bday\today.bbs
  28. if errorlevel 1 goto havenone
  29. echo Today is a Birthday for a caller!
  30. goto :bday
  31. :havenone
  32. echo None found today.
  33. del \max\bday\today.bbs
  34. :bday
  35. echo Cleaning up...
  36. \max\bday\textfind "-" <\max\bday\birthday.dat > \max\bday\birthday.tmp
  37. del \max\bday\birthday.dat
  38. ren \max\bday\birthday.tmp birthday.dat
  39. del \max\bday\setb.bat
  40. set bday=
  41. set GET=
  42. set G$$=
  43. echo Done!
  44. echo 
  45. :noshow
  46. if exist \max\bday\noshow if "%1"=="" type \max\bday\noshow
  47. if exist \max\bday\noshow if "%1"=="" del \max\bday\noshow
  48.