最近看到坛子里有人在问webtable控件获取数据后,存储和使用的便捷方式。
这里我就献丑写一下我在这块上的处理方式,我自己做了个简单的页面,来演示一些使用:
比如上面这个页面,取数据不难,主要是直观,所以我用的方法是用数组与字典结合的方式:
dim otable
set otable = browser("无标题文档").page("无标题文档").webtable("表格")
dim orow, ocol
orow = otable.rowcount
ocol = otable.columncount(1)
dim arrdata()
redim arrdata(orow)
dim i , j
for i = 1 to orow-1
set arrdata(i)=createobject("scripting.dictionary")
for j = 1 to ocol
arrdata(i).add trim(otable.getcelldata(1,j)) , otable.getcelldata(i+1,j)
next
print arrdata(3)("姓名")
print arrdata(9)("数据3")
下面的是使用和打印的效果。
ok,算是抛砖引玉吧。
最新内容请见作者的github页:http://qaseven.github.io/