BAT如何将当前本地连接IP地址输出替换.ini文件的某一行？

花开花落

请教各位高手，如何将.ini文件中“HOST=”后面的“192.168.1.6”，替换为“HOST=我当前机器本地连接的IP地址”

[Hosts]
Host=192.168.1.6
Standby=192.168.1.7

DAIC

你的静态IP地址是什么？花多少钱买的？

花开花落

回复 2# DAIC


    就是我机器当前的IP地址，IPV4的那个

DAIC

回复 3# 花开花落


Win7系统吗？
把 ipconfig /all 的结果贴出来看看

花开花落

回复 4# DAIC


    我是要用在XP系统上的，Win7也可以的话最好

DAIC

回复 5# 花开花落


    请看4楼第2行

花开花落

Windows IP Configuration



        Host Name . . . . . . . . . . . . : IHGIV-07231520

        Primary Dns Suffix  . . . . . . . : test.com

        Node Type . . . . . . . . . . . . : Unknown

        IP Routing Enabled. . . . . . . . : No

        WINS Proxy Enabled. . . . . . . . : No

        DNS Suffix Search List. . . . . . : test.com



Ethernet adapter 本地连接:



        Connection-specific DNS Suffix  . :

        Description . . . . . . . . . . . : NVIDIA nForce 10/100 Mbps Ethernet

        Physical Address. . . . . . . . . : 00-1F-D0-DE-CB-F9

        Dhcp Enabled. . . . . . . . . . . : No

        IP Address. . . . . . . . . . . . : 192.168.1.202

        Subnet Mask . . . . . . . . . . . : 255.255.255.0

        Default Gateway . . . . . . . . . : 192.168.1.1

        DNS Servers . . . . . . . . . . . : 192.168.1.1



PPP adapter Aventail VPN Connection:



        Connection-specific DNS Suffix  . : test.com

        Description . . . . . . . . . . . : WAN (PPP/SLIP) Interface

        Physical Address. . . . . . . . . : 00-53-45-00-00-00

        Dhcp Enabled. . . . . . . . . . . : No

        IP Address. . . . . . . . . . . . : 2.0.50.230

        Subnet Mask . . . . . . . . . . . : 255.255.255.255

        Default Gateway . . . . . . . . . :

        DNS Servers . . . . . . . . . . . : 202.106.0.20

                                            8.8.8.8


这个是XP的，我只想去本地连接的IP地址：192.168.1.202 ，其它的都不要

batman

1. 
   
2. @echo off&setlocal enabledelayedexpansion
   
3. for /f "delims=" %%a in ('ipconfig /all') do (
   
4.   set "str=%%a"
   
5.   if defined flag if "!str:IP Address=!" neq "!str!" set "ip=!str:*:=!"&goto next
   
6.   if "!str:本地连接=!" neq "!str!" set "flag=a"
   
7. )
   
8. :next
   
9. (for /f "delims=" %%a in (a.ini) do (
   
10.   set "str=%%a"
    
11.   if "!str:~,5!" equ "Host=" (
    
12.     echo,Host=%ip:~1%
    
13.     ) else (
    
14.     echo,%%a
    
15.   )
    
16. ))>$
    
17. move $ a.ini&start a.ini
    

复制代码

花开花落

回复 8# batman


    好强！学习了~~~不过文件中的空行都没有了，下面是文件内容，如果我想保留空行要怎么写呢？另外如果我想把“addr=192.168.1.6”这一行也一起改了，要怎么写？

1. [directory]
   
2. datadir=d:\trace\data
   
3. backdir=d:\trace\back
   
4. 
   
5. [system]
   
6. oilgunno=088
   
7. StationID=
   
8. SaleNo=
   
9. 
   
10. [ICPreSell]
    
11. addr=192.168.1.6
    
12. port=1235
    
13. 
    
14. [Hosts]
    
15. Host=192.168.1.6
    
16. Standby=192.168.1.7
    

复制代码

花开花落

回复 9# 花开花落


    我改了这个地方，结果每行前面都输出了一个行号，还是不对，求指点
    (for /f "delims=" %%a in ('findstr /n .* a.ini')

weichenxiehou

回复 10# 花开花落
改一下batman的代码就是这样咯：

1. 
   
2. @echo off&setlocal enabledelayedexpansion
   
3. for /f "delims=" %%a in ('ipconfig /all') do (
   
4.   set "str=%%a"
   
5.   if defined flag if "!str:IP Address=!" neq "!str!" set "ip=!str:*:=!"&goto next
   
6.   if "!str:本地连接=!" neq "!str!" set "flag=a"
   
7. )
   
8. :next
   
9. (for /f "tokens=1* delims=:" %%a in ('findstr /n .* a.ini') do (
   
10.   set "str=%%b"
    
11.   if /i "!str:~,5!"=="Host=" set "str=Host=%ip%"
    
12.   if /i "!str:~,5!"=="addr=" set "str=addr=%ip%"
    
13.   echo,!str!
    
14. ))>$
    
15. move /y $ a.ini&start a.ini

复制代码

不过，呵呵，获取IP地址和修改ini文件，我还是倾向于使用现成的函数，如au3里两行代码即可：

1. 
   
2. IniWrite("a.ini","ICPreSell","addr",@IPAddress1)
   
3. IniWrite("a.ini","Hosts","Host",@IPAddress1)
   

复制代码

花开花落

回复 11# weichenxiehou


    恩，OK了，不过最后这部分还是要这样写Host=%ip:~1%"，不然前面会多一个空格，呵呵，非常感谢，学习了！