|
本帖最后由 tangxiaomei123 于 2011-7-28 10:43 编辑
datastr="d:\ceshi.xls"
datatable.AddSheet("testdata")
datatable.ImportSheet datastr,"sheet1","testdata"
wait 1
For i=1 to datatable.GetSheet("testdata").GetRowCount
datatable.GetCurrentRow i
mylink=datatable.Value("link","testdata")file:///C:/DOCUME~1/ADMINI~1/LOCALS~1/Temp/FZKSQYKUEFT3AY0(WL(RJ2Y.jpg
Browser("远控物业报修系统").Page("远控物业报修系统").Frame("left").Link("name:="&mylink).Click
wait 1
Next
Browser("远控物业报修系统").Page("远控物业报修系统").Frame("right").WebList("ctl00$ContentPlaceHolder1$ddl_").Select DataTable("p_Item", dtGlobalSheet)
Browser("远控物业报修系统").Page("远控物业报修系统").Frame("right").WebButton("统 计").Click
Browser("远控物业报修系统").Page("远控物业报修系统").Sync
'Browser("远控物业报修系统").Close
为什么这段代码不能打开那个连接呢,循环语句中有什么错误呢!!!麻烦那位大侠看看 |
|