|
zb1007zb
初级用户
 
积分 88
发帖 39
注册 2008-8-16
状态 离线
|
『楼 主』:
[已解决] 关于网页转换成文本 以及文本相同内容的删除.
请教大家2个问题
1.网页上的内容我想转化成文本,应该怎么写
(通过网址复制内容进文本)
2.文本内 相同数值的删除(例如IP)又该怎么写?
谢谢大家了
[ Last edited by zb1007zb on 2008-9-19 at 04:55 PM ]
|

/? 永远是你最好的老师 |
|
2008-9-14 20:23 |
|
|
HAT
版主
       
积分 9023
发帖 5017
注册 2007-5-31
状态 离线
|
『第
2 楼』:
1.
curl -s http://www.baidu.cn/>a.txt 2. 把文本内容贴出来看看?
|

 |
|
2008-9-14 21:16 |
|
|
zb1007zb
初级用户
 
积分 88
发帖 39
注册 2008-8-16
状态 离线
|
『第
3 楼』:
比如一些IP咯
随便吧
127.0.0.1:1199
127.0.0.1:1237
127.0.0.1:4040
127.0.0.1:4043
209.85.173.127:80
220.162.238.229:80
60.187.220.110:8000
218.88.220.19:8000
60.187.220.110:8000
218.88.220.19:8000
从卡巴里拿的大家不要乱来哦 哈哈
怎么删除重复的
|

/? 永远是你最好的老师 |
|
2008-9-14 21:18 |
|
|
HAT
版主
       
积分 9023
发帖 5017
注册 2007-5-31
状态 离线
|
『第
4 楼』:
@echo off
type nul>b.txt
for /f "tokens=1-2 delims=:" %%a in (a.txt) do (
findstr "%%a" b.txt>nul 2>nul||echo %%a:%%b>>b.txt
)
|

 |
|
2008-9-14 21:24 |
|
|
zb1007zb
初级用户
 
积分 88
发帖 39
注册 2008-8-16
状态 离线
|
『第
5 楼』:
Quote: | Originally posted by HAT at 2008-9-14 09:24 PM:
@echo off
type nul>b.txt
for /f "tokens=1-2 delims=:" %%a in (a.txt) do (
findstr "%%a" b.txt>nul 2>nul||echo %%a:%%b>>b.txt
) |
|
方法很好,怪我没描述清楚 我指的重复也包括端口
端口不同也算不同的哦
|

/? 永远是你最好的老师 |
|
2008-9-14 21:45 |
|
|
HAT
版主
       
积分 9023
发帖 5017
注册 2007-5-31
状态 离线
|
『第
6 楼』:
@echo off
type nul>b.txt
for /f "delims=" %%a in (a.txt) do (
findstr /x /c:"%%a" b.txt>nul 2>nul||echo %%a>>b.txt
)
|

 |
|
2008-9-14 21:51 |
|
|
zb1007zb
初级用户
 
积分 88
发帖 39
注册 2008-8-16
状态 离线
|
『第
7 楼』:
@echo off
type nul>b.txt
for /f "tokens=1-2 delims= " %%a in (a.txt) do (
findstr "%%a" b.txt>nul 2>nul||echo %%a>>b.txt
)
|

/? 永远是你最好的老师 |
|
2008-9-14 21:53 |
|
|
HAT
版主
       
积分 9023
发帖 5017
注册 2007-5-31
状态 离线
|
『第
8 楼』:
转帖
1. 下载得到网页源代码
@echo off
<"%~f0" more +5 >tmp.vbs
cscript //NoLogo /e:vbscript tmp.vbs %1
del tmp.vbs
goto:eof
Set oDOM = WScript.GetObject(WScript.Arguments(0))
do until oDOM.readyState = "complete"
WScript.sleep 200
loop
WScript.echo oDOM.documentElement.outerHTML 2. 下载得到网页文本
@echo off
<"%~f0" more +5 >tmp.vbs
cscript //NoLogo /e:vbscript tmp.vbs %1
del tmp.vbs
goto:eof
Set oDOM = WScript.GetObject(WScript.Arguments(0))
do until oDOM.readyState = "complete"
WScript.sleep 200
loop
WScript.echo oDOM.documentElement.outerText
|

 |
|
2008-9-14 22:01 |
|
|
zb1007zb
初级用户
 
积分 88
发帖 39
注册 2008-8-16
状态 离线
|
『第
9 楼』:
好人............
|

/? 永远是你最好的老师 |
|
2008-9-14 22:40 |
|
|
zb1007zb
初级用户
 
积分 88
发帖 39
注册 2008-8-16
状态 离线
|
『第
10 楼』:
如果我的FOR循环里面像刚才一样有函数了
我想加一个数字变量怎么加
就是比如XXX>2.TXT执行一次就自己加1
|

/? 永远是你最好的老师 |
|
2008-9-14 22:51 |
|
|
zb1007zb
初级用户
 
积分 88
发帖 39
注册 2008-8-16
状态 离线
|
『第
11 楼』:
@echo off
type nul>b.txt
for /f "tokens=1-5 delims==| " %%a in (a.txt) do (
findstr "%%d:%%e" b.txt>nul 2>nul||(echo ServerXX=%%a>>b.txt
echo IpXX=%%d:%%e>>b.txt
echo.>>b.txt
))
b.txt
pause>nul
goto :all
我想在FOR里面加一个可以自加的变量
每查一个IP就+1
然后用在代码中XX处
望高人帮我解答 谢谢~
|

/? 永远是你最好的老师 |
|
2008-9-15 00:03 |
|
|
HAT
版主
       
积分 9023
发帖 5017
注册 2007-5-31
状态 离线
|
『第
12 楼』:
@echo off
setlocal enabledelayedexpansion
set count=0
type nul>b.txt
for /f "tokens=1-5 delims==| " %%a in (a.txt) do (
set /a count+=1
findstr "%%d:%%e" b.txt>nul 2>nul||(echo ServerXX=%%a>>b.txt
echo Ip!count!=%%d:%%e>>b.txt
echo.>>b.txt
))
b.txt
pause>nul
goto :all
|

 |
|
2008-9-15 00:26 |
|
|
zb1007zb
初级用户
 
积分 88
发帖 39
注册 2008-8-16
状态 离线
|
『第
13 楼』:
依然感谢 HAT
|

/? 永远是你最好的老师 |
|
2008-9-15 14:16 |
|
|
zb1007zb
初级用户
 
积分 88
发帖 39
注册 2008-8-16
状态 离线
|
『第
14 楼』:
8楼用不了
请问findstr "%%d:%%e" b.txt>nul 2>nul||(echo ServerXX=%%a>>b.txt
中 2>nul 是什么意思?
|

/? 永远是你最好的老师 |
|
2008-9-15 15:35 |
|
|
HAT
版主
       
积分 9023
发帖 5017
注册 2007-5-31
状态 离线
|
|
2008-9-15 15:37 |
|