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

[文本处理] 求显示文本中第30行冒号后面字符的批处理

假如文本内容如下:
  1. Windows IP Configuration
  2.         Host Name . . . . . . . . . . . . : wudi
  3.         Primary Dns Suffix  . . . . . . . :
  4.         Node Type . . . . . . . . . . . . : Unknown
  5.         IP Routing Enabled. . . . . . . . : No
  6.         WINS Proxy Enabled. . . . . . . . : No
  7. Ethernet adapter 本地连接:
  8.         Connection-specific DNS Suffix  . :
  9.         Description . . . . . . . . . . . : Realtek RTL8168/8111 PCI-E Gigabit Ethernet NIC
  10.         Physical Address. . . . . . . . . : 00-30-18-A1-5D-A1
  11.         Dhcp Enabled. . . . . . . . . . . : No
  12.         IP Address. . . . . . . . . . . . : 192.168.1.151
  13.         Subnet Mask . . . . . . . . . . . : 255.255.255.0
  14.         Default Gateway . . . . . . . . . : 192.168.1.1
  15.         DNS Servers . . . . . . . . . . . : 202.96.64.68
  16.                                             202.96.69.38
  17. PPP adapter 宽带连接:
  18.         Connection-specific DNS Suffix  . :
  19.         Description . . . . . . . . . . . : WAN (PPP/SLIP) Interface
  20.         Physical Address. . . . . . . . . : 00-53-45-00-00-00
  21.         Dhcp Enabled. . . . . . . . . . . : No
  22.         IP Address. . . . . . . . . . . . : 119.119.183.168
  23.         Subnet Mask . . . . . . . . . . . : 255.255.255.255
  24.         Default Gateway . . . . . . . . . : 119.119.183.168
  25.         DNS Servers . . . . . . . . . . . : 202.96.64.68
  26.                                             202.96.69.38
  27.         NetBIOS over Tcpip. . . . . . . . : Disabled
复制代码

需要显示"Default Gateway . . . . . . . . . : 119.119.183.168"中的"119.119.183.168"
我看了FOR/?
我做完显示的内容是这样的:
119.119.183.168
202.96.64.68
202.96.69.38
Disabled
不知道怎么弄了
请高手帮忙!!!!

下面还有一个问题注:和上面的没有关系)
利用批处理显示当前外网IP并复制到剪切版
如果有路由器,不要显示路由器的地址哦
帮助别人是快乐
被人帮助是幸福

回复 7楼 的帖子

我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

  1. @echo off
  2. for /f "tokens=15" %%a in ('ipconfig^|findstr /i /c:"ip address"') do set "ip=%%a"&goto :next
  3. :next
  4. for /f "delims={}" %%a in ('wmic nicconfig get ipaddress^|findstr /i /v "ipaddress %ip% 0.0"') do if %%~a geq 0 echo %%~a|winclip -c
  5. pause
复制代码
复制到剪切板。
心绪平和,眼藏静谧。

TOP

哈哈 我弄好了:
  1. @echo off
  2. ipconfig/all>ip.txt
  3. for /f "skip=29 tokens=2 delims=:" %%i in (ip.txt) do set "str=%%i"&goto next
  4. :next
  5. del ip.txt
  6. start mshta vbscript:msgbox("您的IP为%str:~1% 已复制到剪切板中",32,"提示")(window.close)
  7. echo Set WshShell=wscript.createobject("Wscript.Shell") >%n%.vbs
  8. echo Set objIE = CreateObject("InternetExplorer.Application") >>%n%.vbs
  9. echo objIE.Navigate("about:blank") >>%n%.vbs
  10. echo objIE.document.parentwindow.clipboardData.SetData "text","%str:~1%">>%n%.vbs
  11. echo Set fso = CreateObject("Scripting.FileSystemObject")>>%n%.vbs
  12. echo fso.DeleteFile(WScript.ScriptName)>>%n%.vbs
  13. START %n%.vbs
复制代码
帮助别人是快乐
被人帮助是幸福

TOP

怎么复制到剪切版呢?
帮助别人是快乐
被人帮助是幸福

TOP

  1. @echo off
  2. findstr /i "Gateway" "a.txt"|findstr /v ".1$">"%temp%\b.txt"
  3. set /p ip=<"%temp%\b.txt"
  4. set ip=%ip:*: =%
  5. echo %ip%
复制代码
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

如果你能把自己的代码贴出来,让别人指出你的代码中的问题,这样效果更更好。
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

  1. @echo off
  2. for /f "skip=29 tokens=2 delims=:" %%i in (a.txt) do set "str=%%i"&goto next
  3. :next
  4. echo %str:~1%&pause>nul
复制代码

[ 本帖最后由 batman 于 2008-9-6 18:04 编辑 ]
***共同提高***

TOP

返回列表