51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 1546|回复: 7
打印 上一主题 下一主题

[原创] 用with语句写脚本后运行时提示缺少对象Util

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2011-2-22 10:05:47 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
录制好的脚本直接运行是好的,可是修改为with语句的脚本后运行时提示缺少对象“Util”,请高手帮忙解决
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

  • TA的每日心情
    慵懒
    2019-4-10 17:57
  • 签到天数: 35 天

    连续签到: 1 天

    [LV.5]测试团长

    2#
    发表于 2011-2-22 10:10:41 | 只看该作者
    LZ最好把代码发上来看看
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    3#
     楼主| 发表于 2011-2-22 10:12:23 | 只看该作者
    嘿,真笨,才发现少了System:
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    4#
     楼主| 发表于 2011-2-22 10:12:37 | 只看该作者
    回复 2# shingo0109

    回复 支持 反对

    使用道具 举报

    该用户从未签到

    5#
     楼主| 发表于 2011-2-22 10:22:15 | 只看该作者
    SystemUtil.Run "D:\Program Files\HP\QuickTest Professional\samples\flight\app\flight4a.exe","","D:\Program Files\HP\QuickTest Professional\samples\flight\app\","open"
    'Dialog("Login").Activate
    'Dialog("Login").Move 459,444
    'Dialog("Login").WinEdit("Agent Name:").Set "test"
    'Dialog("Login").WinEdit("Agent Name:").Type  micTab
    'Dialog("Login").WinEdit("Password:").SetSecure "mercury"
    With  Dialog("Login")
        .Activate
       .Move 459,444
       .WinEdit("Agent Name").Set "test"
       .WinEdit("Agent Name:").Type  micTab
      .WinEdit("Password:").SetSecure "mercury"
    End with
    改成用with语句,怎么运行时会报错

    本帖子中包含更多资源

    您需要 登录 才可以下载或查看,没有帐号?(注-册)加入51Testing

    x
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    6#
     楼主| 发表于 2011-2-22 10:22:55 | 只看该作者
    实际对象库里是有对象的
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    开心
    2018-7-13 14:04
  • 签到天数: 6 天

    连续签到: 1 天

    [LV.2]测试排长

    7#
    发表于 2011-2-22 12:03:01 | 只看该作者
    没看出来有什么问题。

    在简化脚本的时候,建议多用Set少用with

    等你多用一下就知道为什么了。呵呵。

    Set dia = Dialog("Login")
    Set WEdit = dia.WinEdit("Agent Name:")
    dia.Activate
    dia.Move 459,444
    WEdit.Set "test"
    Wedit.Type  micTab
    dia.WinEdit("Password:").SetSecure "mercury"
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    8#
    发表于 2011-2-23 23:38:19 | 只看该作者
    With  Dialog("Login")
        .Activate
       .Move 459,444
       .WinEdit("Agent Name").Set "test"
       .WinEdit("Agent Name:").Type  micTab
      .WinEdit("Password:").SetSecure "mercury"
    End with
    改成用with语句,怎么运行时会报错
    ====
      .WinEdit("Agent Name").Set "test" 这句话Agent Name少了冒号
    应该是:  .WinEdit("Agent Name:").Set "test"
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

    站长推荐上一条 /1 下一条

    小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

    GMT+8, 2024-11-15 00:17 , Processed in 0.081427 second(s), 33 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

    快速回复 返回顶部 返回列表