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