以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]如何应用Foxtable实现网络数据导入更新? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=37490) |
||||
-- 作者:西联哥 -- 发布时间:2013/7/4 22:53:00 -- [求助]如何应用Foxtable实现网络数据导入更新? 如何应用Foxtable实现网络数据导入更新?效果就像Excel连接网站数据那样的,如下面的Excel图示,Foxtable能实现同样的效果吗? 附:1、电子表格是Office2007的Excel 2、需导入的网络数据(网址):http://zst.cjcp.com.cn/cjwssc/view/ssc_zonghe-zonghe-5-ssc-0-3-50.html
(图1)
图1:在Excel的“获取外部数据——自网站”中可以定义需要查询的网址,如http://zst.cjcp.com.cn/cjwssc/view/ssc_zonghe-zonghe-5-ssc-0-3-50.html
(图2)
图2:这里输入地址,转入后,在选中导入区域后直接导入有效数据。
(图3)
图3:网页数据导入Excel表格的初始阶段:正在获取数据中。。。
(图4)
图4:Excel表格完成网页数据导入,这样的数据就可以在其他表或其他列进行不同要求的利用了。
(图5)
图5:而且,还可以设置连接数据的刷新频率,如图设为1分钟,即是1分钟刷新1次网站数据并更新到Excel表格中,这样的目的就是,确保文件能自动更新最新数据,以便于相关表格的统计分析。
至此,Excel获取并导入外部数据的基本操作就完成了,相信Foxtable在这方面绝对比Excel给力,但由于初学Foxtable,帮助也浏览几次了,就是没有找到关于这方面的帮助,因此不怕冷笑,大胆到论坛上求助,请老师们就上例,结合Foxtable给予指导,谢谢!
(在线等。。。) [此贴子已经被作者于2013-7-4 22:55:28编辑过]
|
||||
-- 作者:西联哥 -- 发布时间:2013/7/4 23:18:00 -- 难道,没有狐友可以帮帮我吗??? |
||||
-- 作者:西联哥 -- 发布时间:2013/7/5 1:24:00 -- 以下是引用飞在2012-5-29 22:05:00的发言:
按照图片建一个名为"号码查询"的表,然后把以下代码放到立即窗口或者按钮中执行
Dim ObjIE As Object = CreateObject("InternetExplorer.Application")
Dim Tbl As Table = Tables("号码查询")
Dim R As Row
\'Tbl.DataTable.DataRows.Clear
StatusBar.Message1 = "正在前往网页..."
ObjIE.Navigate("http://video.shishicai.cn/haoma/cqssc/list/120.aspx")
Do Until ObjIE.ReadyState = 4
Application.Doevents
Loop
Dim Dom As Object = ObjIE.Document
Dim HTMLTbl As Object = Dom.GetElementById("bonusNumberData")
Dim RowCnt As Integer = HTMLTbl.Rows.Length
\'Tbl.StopRedraw \'取消注释此行以提高效率
For i As Integer = 0 To RowCnt - 1
R = Tbl.Rows.AddNew
R("期号") = HTMLTbl.Rows(i).Cells(0).InnerText
R("开奖号码") = HTMLTbl.Rows(i).Cells(1).InnerText
R("开奖时间") = HTMLTbl.Rows(i).Cells(2).InnerText
StatusBar.Message1 = "正在获取第 " & i + 1 & "/" & RowCnt & "行数据..."
Next
\'Tbl.ResumeRedraw \'取消注释此行以提高效率
StatusBar.Message1 = "数据获取完成..."
ObjIE.Quit
Msgbox("OK")
StatusBar.Reset
|
||||
-- 作者:西联哥 -- 发布时间:2013/7/5 1:29:00 -- 这个是在论坛上看到的——《获取网页数据》用Excel2007做的效果,求大师根据这个Excel效果帮我做一个Foxtable项目,谢谢。
|
||||
-- 作者:Bin -- 发布时间:2013/7/5 8:37:00 -- 论坛上有个例子 http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=19543 |
||||
-- 作者:西联哥 -- 发布时间:2013/7/5 11:50:00 -- 我知道有这个例子,也下载了,可是我们试用版的看不了,格式不支持啊
留上 Bin老师,可以帮帮我吗 [此贴子已经被作者于2013-7-5 11:50:21编辑过]
|
||||
-- 作者:Bin -- 发布时间:2013/7/5 11:55:00 -- 那就参考这个 http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=32808 |
||||
-- 作者:西联哥 -- 发布时间:2013/7/5 12:02:00 --
Bin老师,下载打开文件后,出现这个提示,点确定可以打开文件,但不明白这里提示的是什么 |
||||
-- 作者:Bin -- 发布时间:2013/7/5 12:05:00 -- 重新打开 或者看看这个是否能解决你的问题 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=29816&replyID=&skin=1#
|
||||
-- 作者:西联哥 -- 发布时间:2013/7/5 12:10:00 --
Bin老师介绍的例子我打开了,并修改了网址。 但是,如何实现我要从该网页上采集的数据到Foxtable表里面去?(红框部分,或全部) |