很麻烦的脚本运行问题

shotstar · 发表于 2010-3-25 22:08:24

Dialog("regexpwndtitle:=Login","Micclass:=Dialog").WinEdit("attached text:=Agent Name:").Set "zhouqin"
我加了一句，在我的电脑上可以执行了。

从报错信息看，主要问题在Dialog上，你的语句没有识别到Dialog对象，可能一个条件不够，于是我加了个Micclass的试了一下就可以了。

zq861010 · 发表于 2010-3-27 21:58:21

不是那个问题，我加了的一样没用从设置和环境问题考虑一下吧

shotstar · 发表于 2010-3-28 12:36:18

那我给你个调试的方法，看看描述性编程的对象是否唯一。
之前的语句是Dialog("regexpwndtitle:=Login","Micclass:=Dialog").WinEdit("attached text:=Agent Name:").Set "zhouqin"
但是你那里如果还是不行的话，用下面的方法来调试一下。
Set oDesc = Description.Create()
oDesc("micclass").Value = "Dialog"
oDesc("regexpwndtitle").Value = "Login"
Set Lists = Desktop.ChildObjects(oDesc)
all=Lists.count
看看all是几，如果是1的话，那么用Dialog("regexpwndtitle:=Login","Micclass:=Dialog")应该可以识别到对话框，如果不是1，那么加个index:=0试试
Dialog识别完了再看WebEdit的
Set oDesc = Description.Create()
oDesc("micclass").Value = "WebEdit"
oDesc("attached text").Value = "Agent Name:"
Set Lists = Dialog("regexpwndtitle:=Login","Micclass:=Dialog","index:=0").ChildObjects(oDesc)
all=Lists.count
在看看这时候all是多少。
通常我用这个方法就是来看看描述对象的属性是否能唯一识别到对象，如果识别到多个，说明可能有对象隐藏在页面上，那么这时候加上index去进一步识别他，之后为了查看是否找对了对象，可以在对象后面用 .highlight的方法高亮对象，以便确认你需要操作的对象是你看到的那个。