如何直接抓取网页上的数据

wj2368 · 发表于 2009-7-28 09:27

如这样的网页数据有45页，怎么能一次性导入到Excel表中
http://218.108.18.59:8010/lianjiayao_zizhishenhechanping.asp

winland · 发表于 2009-7-28 22:21

原帖由 wj2368 于 2009-7-28 09:27 发表
如这样的网页数据有45页，怎么能一次性导入到Excel表中
http://218.108.18.59:8010/lianjiayao_zizhishenhechanping.asp

应该没有办法一次性导入到Excel表中，你可以依次修改下面链接中的page=来获得指定页的数据。
http://218.108.18.59:8010/lianji ... amp;bider=&act=

beart2009 · 发表于 2009-7-28 23:37

为什么版主ldy的VBA,执行第2遍的时候在
.Navigate “http://yahoo.compass.cn/stock/realstock.php?code=sz002273”
处会有错误?
执行第1遍时都是正常的
烦请告知原因
谢谢!

Sub Macro1()

Dim ie As Object
Set ie = CreateObject("InternetExplorer.Application")

         With ie
            .Visible = True
            .Navigate "http://yahoo.compass.cn/stock/realstock.php?code=sz002272"
            Do Until .ReadyState = 4
            DoEvents
            Loop
            .document.body.Focus
            .document.execCommand "SelectAll"
            .document.execCommand "copy"
            .Quit
         End With

         With ie
            .Visible = True
            .Navigate "http://yahoo.compass.cn/stock/realstock.php?code=sz002273"
            Do Until .ReadyState = 4
            DoEvents
            Loop
            .document.body.Focus
            .document.execCommand "SelectAll"
            .document.execCommand "copy"
            .Quit
         End With

End Sub

wj2368 · 发表于 2009-7-29 07:39

原帖由于 2009-7-28 22:21 发表

应该没有办法一次性导入到Excel表中，你可以依次修改下面链接中的page=来获得指定页的数据。
http://218.108.18.59:8010/lianji ... amp;bider=&act=

这样啊，我是通过导入数据一页一页导入的，谢谢

beart2009 · 发表于 2009-7-29 22:18

拜托大家抄一下上面macro1的code去run一下
为什么不能run第2遍啊??

台灯 · 发表于 2009-8-8 18:51

研究了winland 版的很多代码，不得要领，愚钝！还得劳烦winland 版帮忙解决http://www.ddx.name/dde.asp的数据导入，万谢！

winland · 发表于 2009-8-8 23:54

原帖由台灯于 2009-8-8 18:51 发表
研究了winland 版的很多代码，不得要领，愚钝！还得劳烦winland 版帮忙解决http://www.ddx.name/dde.asp的数据导入，万谢！

这个网站又是用了很多脚本。其中的一个脚本已经将所有的数据下载到本地，这样翻页的时候速度很快。但是使用HTTPRequest访问这个地址只能得到空内容，不知道是不是限制了域内访问才行。
因此WebBrowser控件的方法来获取内容，你看看附件，已经可以用了。刚好我自己也可以看看。

downloadDDE.zip (151.76 KB, 下载次数: 572)

台灯 · 发表于 2009-8-9 08:02

万分万分万分的感谢winland版！
如果能把在网页上鼠标指针放在代码那里弹出的窗口内容一并弄下来更完美了，但我觉得那是不可能的，所以在求助帖也就没说。再谢！为你祈福！

[ 本帖最后由台灯于 2009-8-9 08:10 编辑 ]

winland · 发表于 2009-8-9 13:14

这个也不难，数据都在，只是字符串处理的问题。等我修改一下。

winland · 发表于 2009-8-9 13:42

原帖由台灯于 2009-8-9 08:02 发表
万分万分万分的感谢winland版！
如果能把在网页上鼠标指针放在代码那里弹出的窗口内容一并弄下来更完美了，但我觉得那是不可能的，所以在求助帖也就没说。再谢！为你祈福！

已经加好了。

downloadDDE080909.zip (240.32 KB, 下载次数: 605)

		自动登录	找回密码
密码			免费注册

[求助] 如何直接抓取网页上的数据