标题: 指教:2个文本读取替换的批处理 [打印本页]
作者: FBOAR 时间: 2007-1-9 20:43 标题: 指教: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
依次类推
各位达人看看 怎么实现这个批处理?
感觉不是很难
作者: ccwan 时间: 2007-1-9 21:17
最好能把文本内容列出，并把结果说明白，不然很难得到好的代码。
作者: FBOAR 时间: 2007-1-9 21:30
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 ]
作者: ccwan 时间: 2007-1-9 21:59
汗！还要检测批处理是第几次运行啊！还是请高手来解决吧。
作者: FBOAR 时间: 2007-1-9 22:01
实现从上到下 依次替换的效果就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 ]
作者: ccwan 时间: 2007-1-9 23:53
这样的话，下面的代码应该可以了：
@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!
)
)
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!
)
)
作者: FBOAR 时间: 2007-1-10 00:18
谢谢!! 第二种效果实现了
作者: lxmxn 时间: 2007-1-10 01:24
@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
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