中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-03 00:57
48,038 主题排行 / 350,123 发帖 / 今日 1 篇 / 48,251 会员排行
DOS批处理 & 脚本技术(批处理室) » 指教:2个文本读取替换的批处理
可打印版本  1,012 / 7
第1楼 FBOAR 发表于 2007-01-09 20:43
初级用户 发帖 31 积分 86
指教: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

依次类推

各位达人看看 怎么实现这个批处理?
感觉不是很难
第2楼 ccwan 发表于 2007-01-09 21:17
金牌会员 发帖 1,160 积分 2,725 来自 河北廊坊
最好能把文本内容列出,并把结果说明白,不然很难得到好的代码。
第3楼 FBOAR 发表于 2007-01-09 21:30
初级用户 发帖 31 积分 86
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 ]
第4楼 ccwan 发表于 2007-01-09 21:59
金牌会员 发帖 1,160 积分 2,725 来自 河北廊坊
汗!还要检测批处理是第几次运行啊!还是请高手来解决吧。
第5楼 FBOAR 发表于 2007-01-09 22:01
初级用户 发帖 31 积分 86
实现从上到下 依次替换的效果就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 ]
第6楼 ccwan 发表于 2007-01-09 23:53
金牌会员 发帖 1,160 积分 2,725 来自 河北廊坊
这样的话,下面的代码应该可以了:
第7楼 FBOAR 发表于 2007-01-10 00:18
初级用户 发帖 31 积分 86
谢谢!! 第二种效果实现了
第8楼 lxmxn 发表于 2007-01-10 01:24
版主 发帖 4,938 积分 11,386
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023