怎样将点击得到的日期参数化呢？

zhengpeipei 发表于 2009-6-16 11:51:23

最近在录制一个脚本时发现这样一个问题，日期对象是通过点击得到的，怎样才能给他作参数化呢？请高手指点一下，谢谢！！！

dreamever 发表于 2009-6-16 13:34:02

如果那个日期文本框是可编辑的话,可以采取直接对日期文本框进行赋值的方法

5555 发表于 2009-6-16 13:36:37

如果不能直接　webEdit().set "2009-6-16"
可以试试在订餐日期的　WebEdit对象中使用：
WebEdit().Object.innerText="2009-6-16" 或者　
WebEdit().object.value="2009-6-16"

[ 本帖最后由 5555 于 2009-6-16 13:37 编辑 ]

zhengpeipei 发表于 2009-6-16 14:03:42

回复3#的帖子

Browser("thaiharvest").Page("thaiharvest_2").Frame("main_iframe").WebEdit("orderTime1").Click
Browser("thaiharvest").Page("thaiharvest_2").Frame("Frame").WebElement("WebTable").Click
不能直接输入，这是录制日期的脚本。该怎样改呢？

zhengpeipei 发表于 2009-6-16 14:06:35

这个日期先要在文本框中点击一下，然后它弹出日期，我再点击需要的日期。

zhengpeipei 发表于 2009-6-16 15:36:33

:L :L :L

gloriaxh 发表于 2009-6-16 17:15:03

我今天刚试了两种方法都成功了

1. 'Browser("xxxx").Page("xxxxx").WebEdit("ctl00$MainContent$beginDate").Set "2009-06-18"

2. Brow.Page("xxxx").WebEdit("ctl00$MainContent$beginDate").Object.value=DataTable("start_date",dtGlobalSheet)
第二种方法是将你要录入的值写到global表里面，也就是将时间参数话

liping4186 发表于 2009-6-16 18:02:54

楼上的能把过程写具体点吗？新手，看不太懂:L谢谢

欧阳发表于 2009-6-16 18:11:43

一般地这个控件会被设为不可手动输入，不过
听老鸟说过，可以在运行过程中暂时让这个日期文本框可以手动输入，就是修改一个属性，输完后再禁用就OK。

dreamever 发表于 2009-6-16 23:01:51

原帖由欧阳于 2009-6-16 18:11 发表 http://bbs.51testing.com/images/common/back.gif
一般地这个控件会被设为不可手动输入，不过
听老鸟说过，可以在运行过程中暂时让这个日期文本框可以手动输入，就是修改一个属性，输完后再禁用就OK。
的确,在RO或者TO里有一个属性可以设置该文本框是否可编辑,但是这也是跟代码实现有关系的.有些开发人员写代码的时候限制的比较死,连那个属性都禁止编辑,这样就没什么办法了.

zhengpeipei 发表于 2009-6-17 09:47:32

回复7#的帖子

我试了一下，可以回放。
但是还有一个问题：输入的日期没有和当前日期比较。
本来如果我选择今天以前的日期，它会跳出一个对话框提示“日期不能早于今天”，现在用你的方法以后，这个功能就没有了。有没有什么解决办法呢？

zhengpeipei 发表于 2009-6-17 09:49:52

请各位高手指点一下，多谢！！！:L :L :L

zhengpeipei 发表于 2009-6-17 09:50:19

:time: :time: :time:

欧阳发表于 2009-6-17 11:08:31

写if条件做判断啥的。

hihotb 发表于 2009-6-17 15:46:08

自己改脚本判断看看

lvguobin 发表于 2009-6-17 15:51:34

回复 11# 的帖子

1. 'Browser("xxxx").Page("xxxxx").WebEdit("ctl00$MainContent$beginDate").Set "2009-06-18"

2. Brow.Page("xxxx").WebEdit("ctl00$MainContent$beginDate").Object.value=DataTable("start_date",dtGlobalSheet)

加个判断
把弹出来的“订餐日期不能早于当前日期”这个对话框加到对象库中。object repository-->add objects to local-->点击“订餐日期不能早于当前日期”这个对话框。
Dim D1
D1=date
D2='Browser("xxxx").Page("xxxxx").WebEdit("ctl00$MainContent$beginDate").GetRoproperty("text")
Cint(D2)
if D2>D1 then '时间比当前日期还要大
window("microsoft internet explorer").winbutton("确定").click
......
else
.....
end if

或者
if window("microsoft internet explorer").exists(1)
window("microsoft internet explorer").winbutton("确定").click
else
继续你的脚本
end if
好久没写脚本了，不知道对不对。

页: [1]

51Testing软件测试论坛 's Archiver