批处理之家 - Powered by Discuz! Board

标题: 批处理如何打开网页并获取内容？ [打印本页]

作者: wh1234567 时间: 2012-8-4 13:53 标题: 批处理如何打开网页并获取内容？

wget -i url.txt
ren *.* *.html
htox32c /IP *.html
在坛里看到同样的问题的答案，但这个代码好像不对，运行后就将当前路径下的全部文件的后缀修改了。哎，希望帮帮忙，我要打开的网址网页里的内容很少（只有一行纯文本内容，且无图片以及无其他乱七八糟的链接），想将网页里面的内容获取到文本里，不知道如何实现？最好不要下载*.html之类的临时文件和第三方程序，直接获取并输出即可。

作者: 522235677 时间: 2012-8-4 15:20

以前在一个批处理群共享里面看到一个命令，就是利用iexplore.exe来获取网页源码的，
好像是iexplore 0，0，0，0 地址，反正有好多个0
当时忘了保存，一行命令直接就可以获取网页源码了。

现在有个VBS源码，打开后直接就保存

url="http://huaian.w011.35in.com/2345/bat.htm"
Set html = CreateObject("microsoft.xmlhttp")
html.open "GET",url,False
html.send
txt = GB2312(html.responseBody)

'写入文本
set fso=CreateObject("Scripting.FileSystemObject")
set file=fso.OpenTextFile("htm.bat",2,True)
file.WriteLine txt
file.Close

function GB2312(val0)
   dim i,op,t,t1
   op = ""
   for i = 1 to lenB(val0)
         t = AscB(MidB(val0,i,1))
         if t < &H80 Then
            op = op & chr(t)
         else
            t1 = ascB(midB(val0,i+1,1))
            op = op & chr(clng(t) * &H100 + cint(t1))
            i = i + 1
         end If
   next
   GB2312 = op
end Function

作者: 522235677 时间: 2012-8-4 15:22

真后悔没有把那个命令给记下来，现在怎么都找不到这个命令了，不知道是怎么写的了。那个是最简单了的。
等待高手。

作者: wh1234567 时间: 2012-8-4 15:33

curl -o page.html "http://weibo.com/signup/signup.php?ps=u3&lang=zh"
for /f tokens^=6^ delims^=^" %%i in ('findstr /c:"input name=\"fromip\"" page.html') do echo,%%i
没办法的情况下，刚看到这么段代码，不知道如果修改下实现获取网页内容到txt文本里，
另外请高手解释下这段代码的含义

作者: wh1234567 时间: 2012-8-4 16:02

回复 2# 522235677
你这弄下来的中文都是乱码啊

作者: wh1234567 时间: 2012-8-4 16:15

如果没好的方法的话，利用第三方命令行工具也行，在线等.............

欢迎光临批处理之家 (http://bbs.bathome.net/)