[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

批处理纪录软件运行

本帖最后由 lxzzr 于 2011-9-19 12:34 编辑
  1. @echo off&setlocal EnableDelayedExpansion
  2. ::测试方法:
  3. ::当窗口显示  开始延时20秒............  的时候,运行一个新的程序...
  4. ::cmd结束后,查看运行纪录.txt可以看到新程序的路径.
  5. set "var=wmic process get Caption^,ExecutablePath"
  6. echo %date%>运行纪录.txt
  7. echo %time%>>运行纪录.txt
  8. echo.>>运行纪录.txt
  9. cd.>样本.txt
  10. for /f "skip=3 tokens=2* delims= " %%i in ('%var%') do (
  11.   call :lis %%i %%j
  12.   echo !num!>>样本.txt
  13.   )
  14.   echo 开始延时20秒............
  15.   ping 127.1 -n 20 >nul 2>nul
  16.   for /f "delims=" %%a in ('type 样本.txt') do (
  17.   set num=%%a
  18.   set num=!num: =!
  19.   set !num!=a
  20.   )
  21. ::检测,比对
  22.   for /f "skip=3 tokens=2* delims= " %%a in ('%var%') do (
  23.   call :lis %%a %%b
  24.   set num=!num: =!
  25.   if not defined !num! echo %%a %%b>>运行纪录.txt
  26.   )
  27. exit
  28. :lis
  29. set num=%1 %2
  30. :loop
  31. if "!num:~-1!"==" " set num=!num:~0,-1!&goto loop
  32. goto :eof
复制代码

返回列表