mowandao1985 发表于 2010-5-11 17:11:44

描述性编程脚本回放有误！

我在系统中以一个Quote去做返单。如下是其中的一段代码：每次都试用同一个Quote的话脚本回放正常。
Browser("Quote List - MYRO Electronic").Window("Copy-Quote From Q1005108591").Window("Specification Modify -").Page("Specification Modify -").WebEdit("expect_lead_time").Set "12"
为了可以认其他的Quote做返单时也可以使用这个脚本来完成，我使用了描述性编程，如下：
Dim title，quoteid
title = ”Copy-Quote From “&quoteid
以上代码改为：
Browser("title:=Quote List - MYRO Electronic").Window("text:="&title).Page("title:="&title).WebButton("name:= NEXT >>").click
再次运行脚本，就会报错：找不window对象。
希望大家帮帮忙！

Haereticus 发表于 2010-5-11 17:30:36

1.父对象描述是否正确
2.父对象正确，看对象本身属性描述是否正确
3.父对象和本身属性描述正确，看对象属性描述是否能匹配唯一的对象

edison1256 发表于 2010-5-12 09:17:00

不知道给出的是不是全部的脚本，那个quoteid赋值了嘛？
如果run-time对象找不到就，多放几个属性进去，还得保证属性和值是否正确

mowandao1985 发表于 2010-5-12 15:03:38

谢谢你们的回答！
    我给出的是脚本中的一段代码而已，quoteid取出来的，而且我也对比过，和运行时的对象是一样的。
看来我得多加几个属性一起判断试试。

mowandao1985 发表于 2010-5-12 15:55:19

我试了，还是不得行，会报找不到Browser父对象。
下面是我对几个对象的截图，希望大家帮我分析下，该如何写才正确。

mowandao1985 发表于 2010-5-13 10:45:31

以下是脚本部分代码：
Dim title,regex,QID
QID = Right(quoteId,10)
'regex = "Copy-Quote From "&quoteId
'msgbox DataTable.Value("bAmount","Action1")
title = "Copy-Quote From "&quoteId
bname = quoteId&"(Quote) MYRO Electronic Control Devices Inc. - MyRO ERP 3.0"
Browser("title:=Quote List - MYRO Electronic").Window("text:="&title).Page("title:="&title).WebButton("name:=Next >>").Click
Browser("Quote List - MYRO Electronic").Window("Copy-Quote From Q1005128696").Window("Specification Modify -").Page("Specification Modify -").WebEdit("expect_lead_time").Set "12"
Browser("Quote List - MYRO Electronic").Window("Copy-Quote From Q1005128696").Window("Specification Modify -").Page("Specification Modify -").WebButton("Submit").Click
Browser("Quote List - MYRO Electronic").Window("Copy-Quote From Q1005128696").Window("Specification Modify -_2").Page("Specification Modify -").WebEdit("expect_lead_time").Set "11"
Browser("Quote List - MYRO Electronic").Window("Copy-Quote From Q1005128696").Window("Specification Modify -_2").Page("Specification Modify -").WebButton("Submit").Click
Browser("Quote List - MYRO Electronic").Window("Copy-Quote From Q1005128696").Page("Copy-Quote From Q1005128696").WebButton("Finished").Click
Browser("Quote List - MYRO Electronic").Page("Quote List - MYRO Electronic").Link("Quote List").Click

cooleenjunjun 发表于 2010-5-13 14:05:12

你Browser的title描述和Browser属性列表里title的值不一样啊

mowandao1985 发表于 2010-5-14 14:58:54

brow_title = "Quote List - MYRO Electronic Control Devices Inc. - MyRO ERP 3.0"
win_title = "Copy-Quote From "&quoteId&" - "&QID&"(Quote) MYRO Electronic Control Devices Inc. - MyRO ERP 3.0 -- 网页对话框"
page_title = "Copy-Quote From "&quoteId&" - "&QID&"(Quote) MYRO Electronic Control Devices Inc. - MyRO ERP 3.0"
Browser("title:="&brow_title).Window("text:="&win_title).Page("title:="&page_title).WebButton("name:=Next >>").Click
我把title的全部值都取出来了，还是不对啊？
页: [1]
查看完整版本: 描述性编程脚本回放有误！