kasad 发表于 2011-4-28 09:19:11

描述性编程脚本，回放脚本时，winedit不能输入，为什么？

我的脚本如下：
Function login(Sheet_Name)
                '关闭所有的IE窗口，避免出现问题
                SystemUtil.CloseProcessByName "iexplore.exe"
                '打开IE，进入站点
                SystemUtil.Run "iexplore.exe"
                Set browsDesc = description.create()
                Set pageDesc = description.create()
                Set curPage = Browser(browsDesc).Page(pageDesc)
                curPage.Sync
                Browser(browsDesc).Navigate (DataTable("URL",Sheet_Name))
                Set mDes = Description.Create()
        mDes("text").value = ".*Internet Explorer"
        mDes("nativeclass").value = "#.*"
        msgbox(DataTable("用户名",Sheet_Name))
        Browser(browsDesc).Dialog(mDes).WinEdit("Attached text:=用户名(U):").set DataTable("用户名",Sheet_Name)
        msgbox(DataTable("密码",Sheet_Name))
        Browser(browsDesc).Dialog(mDes).WinEdit("Attached text:=密码(P):").set "" 'DataTable("密码",Sheet_Name)
        Browser(browsDesc).Dialog(mDes).WinButton("Class Name:=WinButton","text:=确定").Click
回放时，用户密码没有输入内容，button按钮也没有单击
但msgbox显示内容正确

43528782 发表于 2011-4-28 09:24:44

Set browsDesc = description.create()
                Set pageDesc = description.create()
没看到这两句在哪定义的.

kasad 发表于 2011-4-28 09:29:49

要怎么定义？
Set 不是定义加赋值吗？

lyscser 发表于 2011-4-28 09:32:13

Set browsDesc = description.create()
                Set pageDesc = description.create()
没看到这两 ...
43528782 发表于 2011-4-28 09:24 http://bbs.51testing.com/images/common/back.gif

VBS在没有明确声明option explicit的情况下不需要显式声明变量，编译器在执行的时候会自动生成定义

楼主这代码很明显输入密码被注释掉了，输入的本来就是空，好像没啥不对的

kasad 发表于 2011-4-28 09:33:42

刚加了判断
Browser(browsDesc).Dialog(mDes).WinEdit("Attached text:=用户名(U):").Exist
结果为False
这为什么？

kasad 发表于 2011-4-28 09:37:03

本帖最后由 kasad 于 2011-4-28 09:38 编辑

录制的脚步：
SystemUtil.Run "C:\Program Files\Internet Explorer\iexplore.exe","","C:\Documents and Settings\luoxiaoying","open"
Browser("Browser").Page("Page").Sync
Browser("Browser").Navigate "http://127.0.0.1/index.htm"
Browser("Browser").Page("Login").Sync
Browser("Browser").Navigate "about:blank"
Browser("Browser").Dialog("连接到 127.0.0.1").WinEdit("用户名(U):").Set DataTable("p_Text1", dtGlobalSheet)
Browser("Browser").Dialog("连接到 127.0.0.1").WinEdit("密码(P):").SetSecure DataTable("p_Text2", dtGlobalSheet)
Browser("Browser").Dialog("连接到 127.0.0.1").WinButton("确定").Click

kasad 发表于 2011-4-28 09:38:45

录制的脚步可正常使用

kasad 发表于 2011-4-28 14:01:02

自己顶

kasad 发表于 2011-4-28 16:39:14

Browser(browsDesc).Dialog(mDes).WinEdit(wEdtDesc).Set("admin")
执行这句
提示The operation cannot be performed
为什么

shanfeng1419 发表于 2011-4-29 09:44:53

问题解决了么，如果解决了，想知道错误的原因

kasad 发表于 2011-4-29 10:41:09

解决了
winEdit识别的问题
用Attached text不能识别 ，不知为什么
用index识别的
页: [1]
查看完整版本: 描述性编程脚本，回放脚本时，winedit不能输入，为什么？