home *** CD-ROM | disk | FTP | other *** search
- ECHO OFF
- IF "%1==" GOTO FILENAME
- IF NOT EXIST DELBNOT.BAT GOTO WARN
- ATTRIB DELBNOT.BAT +R >NUL
- :WARN
- ECHO *** WARNING - THIS UTILITY WILL ERASE ALL FILES EXCEPT
- ECHO THOSE SPECIFIED: AFTER ITS OPERATION RESET ANY "READ
- ECHO ONLY" ATTRIBUTES DESIRED WITHIN THIS DIRECTORY. ***
- IF NOT EXIST COMMAND.COM GOTO LOOP
- ECHO *** WARNING - YOU MAY BE IN THE ROOT DIRECTORY OF
- ECHO YOUR DISK: WE WILL NOT DELETE "COMMAND.COM" ***
- ATTRIB COMMAND.COM +R >NUL
- :LOOP
- IF "%1==" GOTO COMPLETE
- IF NOT EXIST %1 GOTO NOFILE
- ATTRIB %1 +R >NUL
- SHIFT
- GOTO LOOP
- GOTO COMPLETE
- :FILENAME
- ECHO No filename specified.
- ECHO Syntax is: DELBNOT filename filename...
- GOTO END
- :NOFILE
- ECHO %1 does not exist. Check file
- GOTO END
- :COMPLETE
- DEL *.*
- ATTRIB *.* -R
- ECHO *** REQUEST COMPLETE ***
- :END
-
-