中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net  论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 指教:2个文本读取替换的批处理
作者:
标题: 指教:2个文本读取替换的批处理 上一主题 | 下一主题
FBOAR
初级用户





积分 86
发帖 31
注册 2007-1-9
状态 离线
『楼 主』:  指教:2个文本读取替换的批处理

2个txt ip.txt和go.txt

ip.txt中是ip列表
192.168.1.1
192.168.1.32
192.168.2.3
192.168.1.4
等等
一行一个ip

go.txt中乱78糟  含myip

第1次运行批处理 go.txt中的myip被替换成192.168.1.1

第2次运行批处理 go.txt中的192.168.1.1被替换成192.168.1.32

第3次运行批处理 go.txt中的192.168.1.32被替换成192.168.2.3

依次类推

各位达人看看 怎么实现这个批处理?
感觉不是很难

2007-1-9 20:43
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
ccwan
金牌会员




积分 2725
发帖 1160
注册 2006-9-23
来自 河北廊坊
状态 离线
『第 2 楼』:  

最好能把文本内容列出，并把结果说明白，不然很难得到好的代码。



三人行，必有吾师焉。   学然后知不足，教然后知困，然后能自强也。
2007-1-9 21:17
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
FBOAR
初级用户





积分 86
发帖 31
注册 2007-1-9
状态 离线
『第 3 楼』:  

go.txt中原始内容
set sh=WScript.CreateObject("WScript.Shell")
WScript.Sleep 1000
sh.SendKeys "myip{ENTER}"
WScript.Sleep 1000
sh.SendKeys "netstat"
WScript.Sleep 1000

第1次运行批处理  go.txt内容改为
set sh=WScript.CreateObject("WScript.Shell")
WScript.Sleep 1000
sh.SendKeys "192.168.1.1{ENTER}"
WScript.Sleep 1000
sh.SendKeys "netstat"
WScript.Sleep 1000

第2次运行批处理  go.txt内容改为
set sh=WScript.CreateObject("WScript.Shell")
WScript.Sleep 1000
sh.SendKeys "192.168.1.32{ENTER}"
WScript.Sleep 1000
sh.SendKeys "netstat"
WScript.Sleep 1000

第3次运行批处理  go.txt内容改为
set sh=WScript.CreateObject("WScript.Shell")
WScript.Sleep 1000
sh.SendKeys "192.168.2.3{ENTER}"
WScript.Sleep 1000
sh.SendKeys "netstat"
WScript.Sleep 1000

依此类推


运行一次批处理 替换一次ip

[ Last edited by FBOAR on 2007-1-9 at 08:38 AM ]

2007-1-9 21:30
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
ccwan
金牌会员




积分 2725
发帖 1160
注册 2006-9-23
来自 河北廊坊
状态 离线
『第 4 楼』:  

汗！还要检测批处理是第几次运行啊！还是请高手来解决吧。



三人行，必有吾师焉。   学然后知不足，教然后知困，然后能自强也。
2007-1-9 21:59
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
FBOAR
初级用户





积分 86
发帖 31
注册 2007-1-9
状态 离线
『第 5 楼』:  

实现从上到下 依次替换的效果就ok了

不用检测第几次

还有个思路: 根据ip数量生成相应数量的go.txt

go1.txt内容:
set sh=WScript.CreateObject("WScript.Shell"
WScript.Sleep 1000
sh.SendKeys "192.168.1.1{ENTER}"
WScript.Sleep 1000
sh.SendKeys "netstat"
WScript.Sleep 1000

go2.txt内容:
set sh=WScript.CreateObject("WScript.Shell"
WScript.Sleep 1000
sh.SendKeys "192.168.1.32{ENTER}"
WScript.Sleep 1000
sh.SendKeys "netstat"
WScript.Sleep 1000

go3.txt内容
set sh=WScript.CreateObject("WScript.Shell"
WScript.Sleep 1000
sh.SendKeys "192.168.2.3{ENTER}"
WScript.Sleep 1000
sh.SendKeys "netstat"
WScript.Sleep 1000

依此类推
实现这种效果也行

[ Last edited by FBOAR on 2007-1-9 at 09:11 AM ]

2007-1-9 22:01
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
ccwan
金牌会员




积分 2725
发帖 1160
注册 2006-9-23
来自 河北廊坊
状态 离线
『第 6 楼』:  

这样的话，下面的代码应该可以了：
@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%a in (go.txt) do (
  for /f "tokens=1,2 delims=:" %%i in ('findstr/n .* ip.txt') do (
      set "str=%%a"
      set "str=!str:myip=%%j!"
      >>go%%i.txt echo !str!
  )
)


   此帖被 +1 点积分    点击查看详情   
评分人：【 FBOAR 】分数： +1  时间：2007-1-10 00:16




三人行，必有吾师焉。   学然后知不足，教然后知困，然后能自强也。
2007-1-9 23:53
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
FBOAR
初级用户





积分 86
发帖 31
注册 2007-1-9
状态 离线
『第 7 楼』:  

谢谢!!  第二种效果实现了

2007-1-10 00:18
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
lxmxn
版主




积分 11386
发帖 4938
注册 2006-7-23
状态 离线
『第 8 楼』:  


@echo off&setlocal enabledelayedexpansion
for /f %%i in (ip.txt) do (
  for /f "delims=" %%a in (go.txt) do (
      set "str=%%a"
      set "str=!str:myip=%%i!"
      echo !str!
  )       
  echo;&echo ++++++++++++++++++&echo;
)
pause

   此帖被 +1 点积分    点击查看详情   
评分人：【 FBOAR 】分数： +1  时间：2007-1-12 04:11


2007-1-10 01:24
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转:  



[ 联系联盟系统管理团队 - 中国DOS联盟 ]

Sponsored by ifanr Inc | © 2001-2023