|
回复 8# 的帖子
看了一下确实有index,左边的日期index是0,右边的是1。link值是固定的时候,我在传index的参数时,脚本可以执行,可是在传link和index参数时,还是出现上面的问题。我一共写了两个脚本,希望能看下:
脚本1:
Dim a,b,links(2),
links(0)=27
links(1)=28
a=0
Browser(XXXXX).Page(XXXXX).WebEdit("raCityName").Click
Browser(XXXXX).Page(XXXXX).WebEdit("raCityName").Set "taiyuan"
Browser(XXXXX).Page(XXXXX).Image("in4_05").FireEvent "onmouseover"
Browser(XXXXX).Page(XXXXX).Image("in4_05").Click
Browser(XXXXX).Page(XXXXX).Frame("CalFrame").Link("name:="&links(0)).SetTOProperty "index",a
Browser(XXXXX).Page(XXXXX).Frame("CalFrame").Link("name:="&links(0)).Click
Browser(XXXXX).Page(XXXXX).Frame("CalFrame").Link("name:="&links(1)).SetTOProperty "index",a
Browser(XXXXX).Page(XXXXX).Frame("CalFrame").Link("name:="&links(1)).Click
脚本2
Dim a,b,links(2),
links(0)=27
links(1)=28
a=0
Browser(XXXXX).Page(XXXXX).WebEdit("raCityName").Click
Browser(XXXXX).Page(XXXXX).WebEdit("raCityName").Set "taiyuan"
Browser(XXXXX).Page(XXXXX).Image("in4_05").FireEvent "onmouseover"
Browser(XXXXX).Page(XXXXX).Image("in4_05").Click
a=Browser(XXXXX).Page(XXXXX).Frame("CalFrame").Link("name:="&links(0)).GetTOProperty("index")
msgbox a '得不到a的值
for j=0 to 1
If a="0" Then
Browser(XXXXX).Page(XXXXX).Frame("CalFrame").Link("name:="&links(j)).Click
End If
Next
还是不能参数化? |
|