nihaoyijing 发表于 2013-3-22 09:59:41

QTP 中weblist的select问题

本帖最后由 黑羽祭 于 2013-3-22 12:16 编辑

以下是新建的窗口:

PublicFunction WriteValue (page,elementType,i,val)
   IfelementType = "WebEdit" Then
       Set oDesc = Description.Create()
       oDesc("micclass").value="WebEdit"
       Set we=Browser("Browser").Page(page).Frame("iframe1").ChildObjects(oDesc)
       we(i).set val
       Set we=Browser("Browser").Page(page).Frame("iframe1").ChildObjects(oDesc)
   End If
      IfelementType = "WebList" Then
       Set oDesc = Description.Create()
       oDesc("micclass").value="WebList"
       Set we=Browser("Browser").Page(page).Frame("iframe1").ChildObjects(oDesc)
   we(i).select "#"&val
   End If
End Function

------------------------------------
'新建科室
Call WriteValue("Page_3","WebEdit",1,"测试")
wait 3
Call WriteValue("Page_3","WebEdit",2,"测试")
wait 3
Call WriteValue("Page_3","WebList",0,0)      -------------运行到这一行时,提示
we(i).select "#"&val 有问题,请问我应该怎么改,是改这个call语句,还是改we(i).select "#"&val
其实最简单的方便,我可以将Call WriteValue("Page_3","WebList",0,0)   改为:Browser("Browser").Page("Page_3").Frame("iframe1").WebList("ctl00$MainContent$ddlHostCode").Select "中医院"
但是我想通过函数的形式怎么样修改呀

lgh75560 发表于 2013-3-22 14:24:39

不用#的吧
Selecet 数字就行了

SexyCat_1113 发表于 2013-3-24 18:49:43

回复 2# lgh75560
#+数字是选index,,,

nihaoyijing 发表于 2013-4-2 16:30:14

回复 3# SexyCat_1113


    请问我具体应该怎么改呢?
页: [1]
查看完整版本: QTP 中weblist的select问题