home *** CD-ROM | disk | FTP | other *** search
- @echo off
- IF %1.==-?. GOTO help
- IF %1.==/?. GOTO help
-
- IF %p%.==. GOTO noPathSet
- :pathSet
- echo %p%
- IF NOT exist *.bak GOTO e
- :: ^test if there are any files *.bak in the current directory
- echo %d%%p% >>%1
- :: ^ c.exe sets %d% to the drive, %p% to the path (without drive)
- dir *.bak |find " BAK">>%1
- echo.>>%1
- GOTO e
-
- :noPathSet
- IF exist *.BAK dir *.BAK >>%1
-
- GOTO :e
- :help
- echo.
- echo This file is exlusively to be used by allbak.bat
- echo Requires a dos-version where FIND sets errorlevels
- echo.
-
- :e
-