原帖由 xiagq 于 2007-6-12 10:00 发表
批處理:
@ECHO OFF
REM WRITTEN BY JIANXIN CEN , 2002
REM FOR WINNT/WIN2000
SET NCDIR=C:\CimPost
SET MULTI=1
REN PRINT0.TXT PRINT0.BAT
CALL PRINT0.BAT
IF "%CMNT%" == "" G ...
批處理:
@ECHO OFF
REM WRITTEN BY JIANXIN CEN , 2002
REM FOR WINNT/WIN2000
SET NCDIR=C:\CimPost
SET MULTI=1
REN PRINT0.TXT PRINT0.BAT
CALL PRINT0.BAT
IF "%CMNT%" == "" GOTO DEFAULT
COPY PRINT00.TXT %CMNT% > NUL || GOTO DEFAULT
DEL %CMNT%
GOTO COPYFILE EFAULT
ECHO --- FILENAME OF "%CMNT%" IS INVALID
SET CMNT=%TP%
:COPYFILE
IF NOT EXIST "%NCDIR%\%PART%" MD %NCDIR%\%PART%
COPY %PART%.%TP%.%POST% %NCDIR%\%PART%\%CMNT%.nc > NUL
ECHO --- CHANGE INTO %NCDIR%\%PART%\%CMNT%.nc
DEL %PART%.%TP%.%POST% OOPCOPY
IF NOT EXIST "%PART%.%TP%.%POST%_%MULTI%" GOTO CHKPNUM
COPY %PART%.%TP%.%POST%_%MULTI% %NCDIR%\%PART%\%CMNT%.nc.%MULTI% > NUL
ECHO --- CHANGE INTO %NCDIR%\%PART%\%CMNT%.nc.%MULTI%
DEL %PART%.%TP%.%POST%_%MULTI%
SET /A MULTI=MULTI+1
GOTO LOOPCOPY
:CHKPNUM
IF "%PNUM%" == "1" GOTO CHKTNUM
ECHO --- IT INCLUDES %PNUM% PROCEDURES
:CHKTNUM
IF "%TNUM%" == "1" GOTO END
ECHO --- IT INCLUDES %TNUM% TOOLS
:END
DEL PRINT00.TXT
IF EXIST "%PART%.%TP%.%POST%.MSG" DEL %PART%.%TP%.%POST%.MSG
DEL PRINT0.BAT
ECHO *