home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Carsten's PPE Collection
/
Carstens_PPE_Collection_2007.zip
/
T
/
THTCK12B.ZIP
/
VIRUS.BAT
< prev
Wrap
DOS Batch File
|
1994-06-11
|
763b
|
34 lines
@echo off
loadbtm on
if exist %PCBDRIVE%%PCBDIR%\FILELIST.ARC DEL %PCBDRIVE%%PCBDIR%\FILELIST.ARC /Q
:SCAN
REM *** Scanning for Virus's ***
TBSCAN C:\TEMP%PCBNODE% af in se co nb nm nh ba II=4 >nul
IF ERRORLEVEL 4 GOTO VIRUS_FOUND
IF ERRORLEVEL 5 GOTO VIRUS_FOUND
GOTO ENDE
:virus_found
echo virus_found> %pcbdrive%%pcbdir%\work\pcbfail.txt
REM 4DOS's Move file Command
move %1 l:\bad.vir /q
REM DOS's Move File Command
REM MOVE /Y %1 l:\bad.vir
:ende
gosub del_temp
goto end_program
:del_temp
REM 4DOS'S REMOVE WORK DIRECTORY COMMAND
IF EXIST C:\TEMP%PCBNODE%\*.* DEL C:\TEMP%PCBNODE% /Y/S/X /Q
REM *** DOS REMOVE WORK DIRECTORY COMMAND
REM IF EXIST C:\TEMP%PCBNODE%\*.* DELTREE /Y C:\TEMP%PCBNODE%
RETURN
:end_program