日历控件的脚本问题

五百螺汉

做了一个日历控件的脚本，属性是可调用。输入参数为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 编辑 ]

五百螺汉

其他脚本调用这个脚本的 代码

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 编辑 ]

五百螺汉

附图是日历控件的截图

DeViLIvy

单看代码好像没问题
在Action RL [Milan日历-设置日期] 中设给断点，调试一下
应该能很快确定哪里的问题

看雪时节

我做个同样时间控件的脚本，和你这个差不多
首先判断输入的参数和当前时间没有的关系，其它和你这个感觉差不多

beili

我有个疑惑哦~~其他脚本调用该脚本时，传进来的是s整个字符串，那么在该脚本里应该parameter一个s就够了，然后再split，否则传进来的值就只是给Iyear

五百螺汉

搞定了。。是对象识别的问题

DeViLIvy

楼主搞定可否将如何结果的过程说的详细点
大家帮你解决问题后来你解决了也要告诉大家呀

五百螺汉

原帖由 DeViLIvy 于 2007-9-23 11:01 发表
楼主搞定可否将如何结果的过程说的详细点
大家帮你解决问题后来你解决了也要告诉大家呀

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