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 >
Wrap
DOS Batch File
|
1995-06-25
|
1KB
|
48 lines
@echo off
set G$$=1
if "%1"=="nocredit" goto nocredit
cls
Echo.
Echo
BDAY_MAX (c) 1994 by John Medland 1:250/840
Echo.
:nocredit
\max\bday\onpath fdate.exe
if errorlevel 5 goto :badfdate
goto :next
:badfdate
echo Can't locate FDATE.EXE on your PATH. Aborting!>\max\bday\noshow
goto :noshow
:next
\max\bday\onpath get.exe
if errorlevel 5 goto :badget
goto 2next
:badget
echo Can't locate GET.EXE on your PATH. Aborting!>\max\bday\noshow
goto :noshow
:2next
Echo
Searching for Birthdays...
fdate /Ff /Omm-dd-CCYY /P"set bday=" > \max\bday\setb.bat
call \max\bday\setb.bat
get Z "%BDAY%" /S /W6
\max\bday\textfind "%GET%" < \max\bday\birthday.dat > \max\bday\today.bbs
if errorlevel 1 goto havenone
echo
Today is a Birthday for a caller!
goto :bday
:havenone
echo
None found today.
del \max\bday\today.bbs
:bday
echo
Cleaning up...
\max\bday\textfind "-" <\max\bday\birthday.dat > \max\bday\birthday.tmp
del \max\bday\birthday.dat
ren \max\bday\birthday.tmp birthday.dat
del \max\bday\setb.bat
set bday=
set GET=
set G$$=
echo
Done!
echo
:noshow
if exist \max\bday\noshow if "%1"=="" type \max\bday\noshow
if exist \max\bday\noshow if "%1"=="" del \max\bday\noshow