[文本处理] [已解决]根据mac地址获取IP并写入指定文件的批处理

@echo off & setlocal enabledelayedexpansion
(for /f %%a in ('arp -a ^| find  /i a4-4c-c8-17-97-c6"') do (
     for /f "delims=:" %%b in ('findstr  /inbc:"url=" "c:\test\producer.properties"') do (
          for /f  "tokens=1* delims=:" %%i in ('findstr /n .* "c:\test\producer.properties"') do (
                set "str=%%j"
                if %%i equ %%b (echo;!str:*\=url=%%a\!) else echo;%%j  
           )
     )
))>tem.t
move tem.t  "c:\test\producer.properties"
pause
复制代码

锘縗#Update=value
复制代码

1>1/* :
@echo off
set mac=a4-4c-c8-17-97-c6
for /f %%i in ('arp -a ^| find  /i "%mac%"') do set ip=%%~i
for /f "delims=:" %%i in ('findstr  /inbc:"url=" "c:\test\producer.properties"') do set i=%%i
setlocal enabledelayedexpansion
cscript.exe -nologo -e:jscript "%~0" "c:\test\producer.properties" "!i!" "!ip!" 
pause & exit
*/

function adoText(file, len, ip) {
       var t,stream,lines = [];
       var re = /^(url=)?(\d{1,3}\.){3}(\d{1,3})/;
       stream = new ActiveXObject("ADODB.Stream");
       stream.type = 2;
       stream.charset = 'utf-8';
       stream.open();
       stream.loadFromFile(file);
       while (!stream.EOS) {
             t = stream.readText(-2);
             if (lines.length == len) {t = t.replace(re, '$1' + ip)};
             lines.push(t);
       }
       stream.Position = 0;
       stream.writeText(lines.join('\r\n'));
       stream.saveToFile(file, 2);
       stream.close();
}

adoText(WSH.Arguments.Item(0),WSH.Arguments.Item(1)-1,  WSH.Arguments(2));
复制代码

@set @i=0 /*
复制代码