|
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用 · 内置多项VBA编程加强工具 ★ 免费下载 ★ ★ 使用手册★
蓝天老师的讲解 1、打开:http://quote.eastmoney.com/center/list.html#33
2、打开:C:\Documents and Settings\Administrator\Local Settings\Temporary Internet Files——>ctrl+A——>Delete——>否
3、点击:http://quote.eastmoney.com/center/list.html#33中的“下一页”
4、在Temporary Internet Files中,可以看到“http://hqdigi2.eastmoney.com/EM_ ... =0.5016939042158273”
其中:
pageSize=20表示页面数据量,即20个股票数据,
page=2表示第2页,
要把所有数据在一页中全部显示,可以把pageSize=20改成pageSize=3000,把page=2改成page=1
_g=0.5016939042158273表示随机数,在Vba中可以用 Rnd()产生
就是:"http://hqdigi2.eastmoney.com/EM_Quote2010NumericApplication/index.aspx?type=s&sortType=C&sortRule=-1&pageSize=3000&page=1&jsName=quote_123&style=33&_g="& Rnd()
"http://hqdigi2.eastmoney.com/EM_Quote2010NumericApplication/index.aspx?type=s&sortType=C&sortRule=-1&pageSize=5000&page=1&jsName=quote_123&style=33&_g="& Rnd()
| http://hqdigi2.eastmoney.com/
| | EM_Quote2010NumericApplication/index.aspx?
| | type=s
| | &sortType=C
| | &sortRule=-1
| | &pageSize=5000
| | &page=1
| | &jsName=quote_123
| | &style=33
| | &_g="& Rnd()
| | http://quote.eastmoney.com/center/list.html#33
| |
|
怎么找到这种网址http://hqdigi2.eastmoney.com/EM_ ... =0.5016939042158273啊
|
|