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

Rank: 4

帖子
88 
积分
399 
技术
0  
捐助
0  
注册时间
2008-1-13 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2008-9-6 17:49 | 只看该作者

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

假如文本内容如下:
  1. Windows IP Configuration

  2.  

  3.         Host Name . . . . . . . . . . . . : wudi

  4.         Primary Dns Suffix  . . . . . . . : 

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

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

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

  8.  

  9. Ethernet adapter 本地连接:

  10.  

  11.         Connection-specific DNS Suffix  . : 

  12.         Description . . . . . . . . . . . : Realtek RTL8168/8111 PCI-E Gigabit Ethernet NIC

  13.         Physical Address. . . . . . . . . : 00-30-18-A1-5D-A1

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

  15.         IP Address. . . . . . . . . . . . : 192.168.1.151

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

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

  18.         DNS Servers . . . . . . . . . . . : 202.96.64.68

  19.                                             202.96.69.38

  20.  

  21. PPP adapter 宽带连接:

  22.  

  23.         Connection-specific DNS Suffix  . : 

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

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

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

  27.         IP Address. . . . . . . . . . . . : 119.119.183.168

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

  29.         Default Gateway . . . . . . . . . : 119.119.183.168

  30.         DNS Servers . . . . . . . . . . . : 202.96.64.68

  31.                                             202.96.69.38

  32.         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并复制到剪切版
如果有路由器,不要显示路由器的地址哦
收藏 分享
帮助别人是快乐
被人帮助是幸福

batman

Rank: 8Rank: 8

帖子
2702 
积分
14559 
技术
176  
捐助
630  
注册时间
2008-6-16 
2楼
发表于 2008-9-6 18:02 | 只看该作者 
  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

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14816 
积分
45993 
技术
848  
捐助
745  
注册时间
2008-6-9 
3楼
发表于 2008-9-6 18:04 | 只看该作者
如果你能把自己的代码贴出来，让别人指出你的代码中的问题，这样效果更更好。
我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14816 
积分
45993 
技术
848  
捐助
745  
注册时间
2008-6-9 
4楼
发表于 2008-9-6 18:09 | 只看该作者 
  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

lzwudi

Rank: 4

帖子
88 
积分
399 
技术
0  
捐助
0  
注册时间
2008-1-13 
5楼
发表于 2008-9-6 18:12 | 只看该作者
怎么复制到剪切版呢?
帮助别人是快乐
被人帮助是幸福

TOP

lzwudi

Rank: 4

帖子
88 
积分
399 
技术
0  
捐助
0  
注册时间
2008-1-13 
6楼
发表于 2008-9-6 18:36 | 只看该作者
哈哈 我弄好了:
  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

pusofalse

Rank: 8Rank: 8

帖子
1166 
积分
5174 
技术
13  
捐助
0  
注册时间
2008-3-11 
7楼
发表于 2008-9-6 19:33 | 只看该作者 
  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

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14816 
积分
45993 
技术
848  
捐助
745  
注册时间
2008-6-9 
8楼
发表于 2008-9-6 20:21 | 只看该作者

回复 7楼 的帖子

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

TOP

返回列表