OSDN Git Service

Version 3.00
[vbslib/main.git] / _src / TestByFCBatAuto / TestScript / test / Call_and_Log / T_ALL_5_do_test.bat
1 @echo off \r
2 REM\r
3 REM  Test by comparing stdout and stderr (FCBat style)\r
4 REM\r
5 if "%1"=="" cmd /K "%0" /wnd\r
6 \r
7 if exist T_ALL_result.txt  del T_ALL_result.txt\r
8 \r
9 set T=T_Pass\r
10 echo ((( [%T%] )))\r
11 ( cscript //nologo %T%.vbs 2>&1 ) > %T%_log.txt\r
12 fc %T%_ans.txt %T%_log.txt\r
13 if errorlevel 1  echo Fail in %T%.vbs>> T_ALL_result.txt&goto :last_of_test\r
14 \r
15 fc Test_sub_log.txt %T%_log.txt\r
16 if errorlevel 1  echo Fail in %T%.vbs>> T_ALL_result.txt&goto :last_of_test\r
17 \r
18 set T=T_Fail\r
19 echo ((( [%T%] )))\r
20 ( cscript //nologo %T%.vbs 2>&1 ) > %T%_log.txt\r
21 fc %T%_ans.txt %T%_log.txt\r
22 if errorlevel 1  echo Fail in %T%.vbs>> T_ALL_result.txt&goto :last_of_test\r
23 \r
24 fc Test_sub_log.txt %T%_log.txt\r
25 if errorlevel 1  echo Fail in %T%.vbs>> T_ALL_result.txt&goto :last_of_test\r
26 \r
27 set T=T_CurDir\r
28 echo ((( [%T%] )))\r
29 ( cscript //nologo %T%.vbs 2>&1 ) > %T%_log.txt\r
30 fc %T%_ans.txt %T%_log.txt\r
31 if errorlevel 1  echo Fail in %T%.vbs>> T_ALL_result.txt&goto :last_of_test\r
32 \r
33 fc Test_sub_log.txt %T%_log.txt\r
34 if errorlevel 1  echo Fail in %T%.vbs>> T_ALL_result.txt&goto :last_of_test\r
35 \r
36 set T=T_Debug\r
37 echo ((( [%T%] )))\r
38 echo [ManualTest] %T% >> T_ALL_result.txt\r
39 \r
40 :last_of_test\r
41 set T=\r
42 echo Test log compare ...>> T_ALL_result.txt\r
43 if not errorlevel 1 echo Pass.>> T_ALL_result.txt\r
44 if     errorlevel 1 echo Fail.>> T_ALL_result.txt\r
45 type T_ALL_result.txt\r
46 \r
47  \r