中国DOS联盟

我有一个文件如下，我想通过实现对文件查找false，来提取false行的NAME=""，并将name=""中的内容设置变量，再用echo显示变量。

<?xml version="1.0" encoding="GB2312"?><ROOT>
<CLIENT NAME="A001" IP="192.168.0.1" ERRORTIME="1264034350" LASTRIGHTTIME="1264034350" IsCheckMatch="false">
<FILES/>
</CLIENT>
<CLIENT NAME="A002" IP="192.168.0.2" ERRORTIME="1264034518" LASTRIGHTTIME="1264034518" IsCheckMatch="true">
<FILES/>
</CLIENT>
<CLIENT NAME="A003" IP="192.168.0.3" ERRORTIME="1264036520" LASTRIGHTTIME="1264036520" IsCheckMatch="false">
<FILES/>
</CLIENT>
<CLIENT NAME="A005" IP="192.168.0.4" ERRORTIME="1264029084" LASTRIGHTTIME="1264029084" IsCheckMatch="true">
<FILES/>
</CLIENT>
<CLIENT NAME="A006" IP="192.168.0.5" ERRORTIME="1264034340" LASTRIGHTTIME="1264034340" IsCheckMatch="true">
<FILES/>
</CLIENT>
</ROOT>

@echo off
set /a n=1
for /f "tokens=3 delims== " %%i in ('findstr /i "false" a.xml') do call :Sub %%i
pause
goto :eof

:Sub
echo 第%n%个Name:%~1
set /a n+=1
goto :eof

    str = ""
Set oXML = CreateObject("Microsoft.XMLDOM")
    oXML.Load "a.xml"
For Each x In oXML.getElementsByTagName("CLIENT")
    if Lcase(x.getAttribute("IsCheckMatch")) = "false" Then
        str = str & x.getAttribute("NAME") & vbCrLf
    end if
Next
WScript.Echo str

呵呵 我自己也弄了一下，可以是可以了，但是要2次生成txt文件....
SETLOCAL ENABLEDELAYEDEXPANSION

type CheckResult.xml | find "false" >> 1.txt

for /f "delims=" %%i in (1.txt) do (
set var=%%i
>>2.txt set/p=!var:~14,4! <nul
)

for /f "delims=" %%a in (2.txt) do (
set msg=%%a
)

senmail %msg%"

pause

Originally posted by mountvol at 2010-2-1 23:37:

@echo off
set /a n=1
for /f "tokens=3 delims== " %%i in ('findstr /i "false" a.xml') do call :Sub %%i
pause
goto :eof

:Sub
echo 第%n%个Name:%~1
set /a n+=1
g ... 


感谢你的回复，哎....这个就是差距啊！

还有点问题，因为我需要把得到的的变量用curl通过飞信发送，可是飞信不支持空格等符号，可否把三个变量改为一个变量A001,A003...这样显示？

我自己弄了一下，可是怎么让echo %std1%自加呢？

@echo off
set /a n=1
for /f "tokens=3 delims== " %%i in ('findstr /i "false" CheckResult.xml') do call :Sub %%i

echo %std1%,%std2%
pause
goto :eof

:Sub
set std%n%=%~1
set /a n+=1
goto :eof

@echo off
for /f "tokens=3 delims== " %%i in ('findstr /i "false" a.txt') do call set "str=%%i,%%str%%"
set "str=%str:"=%"
echo %str:~0,-1%
pause