2008-06-25 10:29:24
/ [QuickTest Professional]
Set res = createobject("ADODB.recordset")DBConnect()sql="selectf_crt_user_org , f_scif_name,f_scif_type,f_scif_kind,f_authorfrom tqms_scif_t where f_active='1'"Dim sqlresultExecuteSql(sql)Dim i,cell,j,aai=2Do while not res.eofIf i =10Theni=2Browser("browser").Page("page").Frame("contentMain").Image("下页").ClickEnd IfFor j =1 to 5Dim kk= 0cell=browser("browser").Page("page").Frame("contentMain").WebTable("机构").GetCellData(i,j).
查看(1037)
评论(1)