[其他] [已解决]请教比对同名进程的路径是否相同的批处理每行代码起什么作用？

mstsc

@echo off&setlocal EnableDelayedExpansion
::测试方法:
::当窗口显示  开始延时20秒............  的时候,运行一个新的程序...
::cmd结束后,查看运行纪录.txt可以看到新程序的路径.


set "var=wmic process get Caption^,ExecutablePath"
echo %date%>运行纪录.txt
echo %time%>>运行纪录.txt
echo.>>运行纪录.txt
cd.>样本.txt
for /f "skip=3 tokens=2* delims= " %%i in ('%var%') do (
  call :lis %%i %%j
  echo !num!>>样本.txt
  )
  echo 开始延时20秒............
  ping 127.1 -n 20 >nul 2>nul
  for /f "delims=" %%a in ('type 样本.txt') do (
  set num=%%a
  set num=!num: =!
  set !num!=a
  )
::检测，比对
  for /f "skip=3 tokens=2* delims= " %%a in ('%var%') do (
  call :lis %%a %%b
  set num=!num: =!
  if not defined !num! echo %%a %%b>>运行纪录.txt
  )
exit
:lis
set num=%1 %2
:loop
if "!num:~-1!"==" " set num=!num:~0,-1!&goto loop
goto :eof 
复制代码

请各位大大  帮忙解释一下没行代码的意思   
     谢谢

Batcher

回复 6# mstsc


基本都不懂的话，应该去看教程，而不是看代码。

lxzzr

回复 8# mstsc
加油学！

@echo off&setlocal EnableDelayedExpansion
REM 开启变量延迟
::测试方法:
::当窗口显示  开始延时20秒............  的时候,运行一个新的程序...
::cmd结束后,查看运行纪录.txt可以看到新程序的路径.

set "var=wmic process get Caption^,ExecutablePath"
echo %date%>运行纪录.txt
echo %time%>>运行纪录.txt
echo.>>运行纪录.txt
cd.>样本.txt
REM 创建临时文件

for /f "skip=3 tokens=2* delims= " %%i in ('%var%') do (
	call :lis %%i %%j
	REM CALL 调用子过程"lis"（跳转到标签":lis"）,%%i 做为第一个参数，%%j做为第二个参数
	REM 不过这里的代码不严谨，可执行文件路径有空格呢？
	echo !num!>>样本.txt
)

echo 开始延时20秒............
ping 127.1 -n 20 >nul 2>nul

for /f "delims=" %%a in ('type 样本.txt') do (
	set num=%%a
	set num=!num: =!
	REM 删除样本中每行的空格
	set !num!=a
	REM 给每行做个“标签”，即赋值
)

REM 检测，比对
for /f "skip=3 tokens=2* delims= " %%a in ('%var%') do (
	call :lis %%a %%b
	REM CALL 调用子过程"lis"（跳转到标签":lis"）
	
	set num=!num: =!
	REM 删除样本中每行的空格
	
	if not defined !num! echo %%a %%b>>运行纪录.txt
	REM 如果没有做过“标签”，即为新进程
)
exit

:lis
set num=%1 %2
:loop
if "!num:~-1!"==" " set num=!num:~0,-1!&goto loop
REM 这句我没看懂，不明白原作者的用意，不知是不是想删除WMIC产生的空格？
goto :eof
 
复制代码

mstsc

回复 5# Batcher


    请问能帮忙解释一下吗

mstsc

回复 5# Batcher


    谢谢 帮助修改标题

mstsc

回复 5# Batcher


    我基本都不懂   就是想请教高手 帮忙解释一下每行代码的作用  自己也可以保存来作为笔记看

Batcher

回复 3# mstsc


哪一行看不懂，直接问不行吗？何必解释每一行呢

mstsc

回复 2# CrLf


    这段代码好像是你说的这个意思   
  可是我是想知道这段代码每行的意思

mstsc

if "%1"=="h" goto loop
rem 检测当前脚本运行的第一个参数是否为"h"

mshta vbscript:createobject("wscript.shell").run("""%~nx0""h",0)(window.close)&&exit
rem 如果不是h调用mshta运行带参数的脚本（自身，参数h）%~nx0扩展到文件名和扩展名,引号用引号转义（""%~nxo""），0，隐藏运行，运行后退出

:loop
rem ...

请帮忙像这样解释      非常谢谢

CrLf

粗看感觉是比对同名进程的路径是否相同