Metropoli BBS
VIEWER: de.bat MODE: TEXT (ASCII)
@ECHO OFF
IF "%1"=="" GOTO Err
IF NOT EXIST %1 GOTO err1
COPY %1 D:\TRASH\%1 > NUL
IF NOT EXIST D:\TRASH\%1 GOTO Err2
REM doesn't work with pathname in %%1
SET LDF=%1
DEL %1
GOTO End
:Err
ECHO I need a file specification please ...
GOTO End
:Err1
ECHO %1 not found
GOTO End
:Err2
ECHO ^G
ECHO Deletion halted... please check D:\TRASH
ECHO Press Ctrl-C to exit or any key to permanently delete %1.
PAUSE > NUL
DEL %1
:End
[ RETURN TO DIRECTORY ]