[第26期]网页数据提取（已结）

agstick

说明：
从网页中获取数据在工作中经常遇到，如果是整个表搞过来那太简单了，最笨的方法复制粘贴就OK了，可是有时候是要筛选后的数据。此题就考察大家灵活提取数据的能力。要求从雅虎财经http://cn.finance.yahoo.com/提取出对应股票代码200个交易日的历史日收盘价。如：http://cn.finance.yahoo.com/q/hp?s=000300.ss是沪深300指数的历史数据地址，可以输入股票代码并选择起始日期进行查询。
要求：
1、点击“获取数据”按钮，将B、C两列（为出题方便，只要两列，代码应具有通用性）对应股票代码的对应日期的收盘价从网站上导入到Excel里。
2、如果对应日期改股票没有数据（可能停盘）则留空，日期一定要对应。
3、注意网页表格不够200行，需要翻页。
4、可以使用控件，不用最好，此题方法应该有很多种，大家尽情发挥吧！
评分：
答案正确得3分，精彩答案另加分。
答案发送到：agstick@126.com，并跟一贴占位。

特别说明： 本题主要考察直接在网页中筛选数据，然后再导入到EXCEL（不能把不要的数据下载下来），所以如果通过辅助表先把整个表格下载下来，再到辅助表里筛选数据并不是本题目的，那样太简单了。为了更多朋友参与，如果想不出其他方法，只能用这种方法，也可以得2分。

[此贴子已经被作者于2007-8-27 22:37:31编辑过]

ldy888

沙发，邮件已发agstick@126.com

ldy888

【26期VBA】网页数据提取WebBrowser

用WebBrowser控件又作了一个

请教版主

因为WebBrowser控件简单灵活，所以一直用来提取网页数据。

原以为WebBrowser有页面刷新，会影响速度。 一直想找一个比WebBrowser控件更快的方法。

对网页方面的知识还相当匮乏。花了不少时间精力就是找不到。

看了httpRequest范例 觉得速度上不尽人意。

版主能不能 释疑 

1. 就速度而言 WebBrowser控件提取网页数据是不是最快。

2. 有没有更快的方法或控件

 

谢谢

[此贴子已经被作者于2007-8-28 11:12:18编辑过]

chylhr

已发至指定邮箱，请版主审验。

已发至指定邮箱，请版主审验。

通过下载csv文件提取数据，并不是从网页上下载数据，另000002.ss是Ａ股指数，而不是万科A（000002.sz）。

[此贴子已经被agstick于2007-8-25 21:51:46编辑过]

winland

已发邮件，请查收。

这个我以前其实已经做过了，不过用的是下载CSV文件，内容是一样的，只是CSV文件比较方便处理点。

所以我用了个提示要求选择下载CSV文件还是网页内容。另外开始的时候是用QueryTable做的，版主说不可以，所以改成用网页内容来获取数据。QueryTable的代码被注释保留在里面。

没有用到控件，用HttpRequest做的。

winland

忘记上传文件了。

 

winland兄对网页操作很熟练，对截取数据部分用正则表达式更简洁些，另直接上传答案了，违反规定扣1分。

[此贴子已经被agstick于2007-8-25 22:03:59编辑过]

ldy888

昨天买了台新电脑，2G内存，速度很快, 发现一个BUG

所返回的数据不全，增加了一个判断，修正了这个BUG

新文件已发至agstick@126.com

  

答案正确，WebBrowser控件方法，谢谢参与！

[此贴子已经被agstick于2007-8-25 21:41:51编辑过]

 

jacksonzeng

好久没有来过正式竞争专区了。占位先。

跟一帖占位，这样应该可以了吧？初次报道。不知可以否。

 

下载csv文件方法，与题意不符，另收盘价提错了，提成了已调整收盘价*。

[此贴子已经被agstick于2007-8-25 22:06:26编辑过]

willin2000

答案已发送到：agstick@126.com，跟贴占位。

 

答案正确，ie控件方法，谢谢参与！

[此贴子已经被agstick于2007-8-25 22:16:31编辑过]

leeyong

整点简单的嘛,我的时间还要上班班,光做题,不吃饭饭啊

 

 

QueryTables方法，另使用了csv文件。

[此贴子已经被agstick于2007-8-25 22:19:33编辑过]