求助批处理日志生成

cattan

1. @echo off
   
2. 
   
3. rem
   
4. 
   
5. set AppName=MTC_OUT.exe
   
6. 
   
7. set AppPath=D:\fjeit\MTC_OUT\
   
8. 
   
9. title 出口收费软件看门狗程序
   
10. 
    
11. cls
    
12. 
    
13. 
    
14. echo.
    
15. 
    
16. echo 看门狗程序每隔15分钟监控一次……
    
17. echo 该软件用于内部交流和学习
    
18. 
    
19. echo.
    
20. 
    
21. rem 定义循环体
    
22. 
    
23. :startjc
    
24. 
    
25.    rem 从进程列表中查找指定进程
    
26. 
    
27.    rem  下面语句也可写成 qprocess %AppName% >nul
    
28.    qprocess|findstr /i %AppName% >nul
    
29. 
    
30.    rem
    
31. 
    
32.    if %errorlevel%==0 (
    
33. 
    
34.          echo ^>%date:~0,10% %time:~0,8% 软件正在运行……
    
35. 
    
36.     )else (
    
37. 
    
38.            echo ^>%date:~0,10% %time:~0,8% 没有发现软件进程
    
39. 
    
40.            echo ^>%date:~0,10% %time:~0,8% 正在重新启动软件
    
41. 
    
42.            start %AppPath%%AppName% 2>nul && echo ^>%date:~0,10% %time:~0,8% 启动软件
    
43. 
    
44.    )
    
45. 
    
46.    rem 用ping命令来实现延时运行
    
47. 
    
48.    for /l %%i in (1,1,10) do ping -n 1 -w 1000 168.20.0.1>nul
    
49. 
    
50. 
    
51. 
    
52.    goto startjc
    
53. 
    
54. echo on

复制代码

如何让这个批处理文件生成日志.txt。 不要CMD窗口啊？

yakeyun

@echo off
::隐藏窗口
if "%1" neq "1" (
>"%temp%\tmp.vbs" echo set WshShell = WScript.CreateObject^(^"WScript.Shell^"^)
>>"%temp%\tmp.vbs" echo WshShell.Run chr^(34^) ^& %0 ^& chr^(34^) ^& ^" 1^",0
start /d "%temp%" tmp.vbs
exit
)
::执行代码
title 出口收费软件看门狗程序
::从进程列表中查找指定进程
:start
tasklist /nh>C:\kill.ini
@find /I /C "MTC_OUT.exe" C:\kill.ini > nul
if %ERRORLEVEL% == 0 (
  ping 127.1 -n 10 >nul
  goto start
) else (
  goto END
)
:END
start D:\fjeit\MTC_OUT\MTC_OUT.exe
echo %date%%time%   程序已退出，将重新启动！ >>c:\log.ini
ping 127.1 -n 10 >nul
goto start
)
exit

cattan

你这个只生成了前面（软件已退出，将重新启动。）这个日志啊
并没有生成软件运行状态的日志啊 已经测试了

yakeyun

回复 3# cattan


   重新写了一个新的，试下看看。日志只会记录进程结束后重新启动的过程，本身每10秒检测一次进程，达到了实时检测，所以正常状态不用记录。

yakeyun

回复 3# cattan


如果一定要都记录，就用这个15分钟检测一次进程：

@echo off
::隐藏窗口
if "%1" neq "1" (
>"%temp%\tmp.vbs" echo set WshShell = WScript.CreateObject^(^"WScript.Shell^"^)
>>"%temp%\tmp.vbs" echo WshShell.Run chr^(34^) ^& %0 ^& chr^(34^) ^& ^" 1^",0
start /d "%temp%" tmp.vbs
exit
)
::执行代码
title 出口收费软件看门狗程序
::从进程列表中查找指定进程
:start
tasklist /nh>C:\kill.ini
@find /I /C "MTC_OUT.exe" C:\kill.ini > nul
if %ERRORLEVEL% == 0 (
echo %date%%time%   当前程序进程正常运行。 >>c:\log.ini
ping 127.1 -n 900 >nul
goto start
) else (
goto END
)
:END
start D:\fjeit\MTC_OUT\MTC_OUT.exe
echo %date%%time%   程序已退出，将重新启动！ >>c:\log.ini
ping 127.1 -n 900 >nul
goto start
)
exit