51Testing软件测试论坛

标题: 日历控件的脚本问题 [打印本页]

作者: 五百螺汉    时间: 2007-9-19 17:45
标题: 日历控件的脚本问题
做了一个日历控件的脚本,属性是可调用。输入参数为IDate,当其他的脚本调用这个脚本时候,输入结果是其他脚本中设定的日期值
但是实际输出结果是IDate的默认值
请各位大大帮忙看下是哪边的问题?
Browser("KOA知识办公自动化系统").Page("KOA知识办公自动化系统").Frame("rightFrm").WebButton("日 期").Click

Iyear = year (parameter("IDate"))
Imonth = month (parameter("IDate"))
Iday = day (parameter("IDate"))

If  Iyear >2100 or  Iyear < 1900 Then
        msgbox "年份超过限制"
        exitaction (0)
End If

If Imonth > 13 or Imonth < 1 Then
        msgbox "月份超过限制"
        exitaction (0)
End If

If Iday > 31or Iday < 1 Then
        msgbox "天数超过限制"
        exitaction (0)
End If

iyear = year (now)
imonth = month (now)
iday = day(now)

Browser("KOA知识办公自动化系统").Page("KOA知识办公自动化系统").Frame("rightFrm").WebElement("Element_今天").Click
If Iyear=iyear and Imonth=imonth Then
        Browser("KOA知识办公自动化系统").Page("KOA知识办公自动化系统").Frame("rightFrm").WebElement("Element_今天").Click
End If

If Iyear > iyear  Then
        For i = 1 to Iyear-iyear
                Browser("KOA知识办公自动化系统").Page("KOA知识办公自动化系统").Frame("rightFrm").WebElement("Element_下一年").Click
        Next
        else
        For i = 1 to iyear-Iyear
                Browser("KOA知识办公自动化系统").Page("KOA知识办公自动化系统").Frame("rightFrm").WebElement("Element_上一年").Click
        Next
End If

If Imonth > imonth Then
        For i = 1 to Imonth-imonth
                Browser("KOA知识办公自动化系统").Page("KOA知识办公自动化系统").Frame("rightFrm").WebElement("Element_下一月").Click
        Next
        else
        For i = 1 to imonth-Imonth
                Browser("KOA知识办公自动化系统").Page("KOA知识办公自动化系统").Frame("rightFrm").WebElement("Element_上一月").Click
        Next
End If

environment("catch") =Iday
Browser("KOA知识办公自动化系统").Page("KOA知识办公自动化系统").Frame("rightFrm").WebElement("Element_点击当前日期").Click

[ 本帖最后由 五百螺汉 于 2007-9-19 17:58 编辑 ]
作者: 五百螺汉    时间: 2007-9-19 17:47
其他脚本调用这个脚本的 代码

Ryear = randomnumber (2003,2004)
Rmonth = randomnumber(1,4)
Rday = randomnumber(1,10)

s = Cstr(Ryear)+"-"+cstr(Rmonth)+"-"+cstr(Rday)

RunAction "RL [Milan日历-设置日期]", oneIteration,s

msgbox s

执行结果是 s的值为随即值,但是日历控件脚本里面的值为输入参数的默认值。。。

也就是无法在日历控件里面随即选择日期。。。只能是固定的默认值

[ 本帖最后由 五百螺汉 于 2007-9-19 17:49 编辑 ]
作者: 五百螺汉    时间: 2007-9-19 17:48
附图是日历控件的截图
作者: DeViLIvy    时间: 2007-9-19 19:55
单看代码好像没问题
在Action RL [Milan日历-设置日期] 中设给断点,调试一下
应该能很快确定哪里的问题
作者: 看雪时节    时间: 2007-9-20 09:28
我做个同样时间控件的脚本,和你这个差不多
首先判断输入的参数和当前时间没有的关系,其它和你这个感觉差不多
作者: beili    时间: 2007-9-20 11:12
我有个疑惑哦~~其他脚本调用该脚本时,传进来的是s整个字符串,那么在该脚本里应该parameter一个s就够了,然后再split,否则传进来的值就只是给Iyear
作者: 五百螺汉    时间: 2007-9-20 17:14
搞定了。。是对象识别的问题
作者: DeViLIvy    时间: 2007-9-23 11:01
楼主搞定可否将如何结果的过程说的详细点
大家帮你解决问题后来你解决了也要告诉大家呀
作者: 五百螺汉    时间: 2007-9-26 13:26
原帖由 DeViLIvy 于 2007-9-23 11:01 发表
楼主搞定可否将如何结果的过程说的详细点
大家帮你解决问题后来你解决了也要告诉大家呀


不好意思这几天没上来看,等这两天有空了,把整个脚本完整的编写过程发上来




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2