51Testing软件测试论坛

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

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 2095|回复: 1
打印 上一主题 下一主题

[讨论] 小白求助大神,调用vbs脚本后出现错误General run error

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2014-5-27 11:45:08 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
测试的是window上的程序,不是web,想调用vbs脚本中的返回值arrxput和arryput,但是在调用vbs脚本中的selectprovince()出现General run error,求大神帮忙。。Vbs脚本通过resource调用的,求大神帮帮忙
action代码入下:
Dim arrx,arry
Dim i                                                  '循环次数
Set shell=CreateObject("Wscript.Shell")
Shell.Run"F:\【pc】\Tcar2\pc\client_tcar_pc.exe"
Window("CJTNavi_2").VirtualButton("button_zhan").Click
Window("CJTNavi_2").VirtualButton("button_menu").Click
Window("CJTNavi_2").VirtualButton("button_mainsearch").Click
Window("CJTNavi_2").VirtualButton("button_province").Click
selectprovince()
Window("CJTNavi_2").VirtualButton("button_d").Click
Window("CJTNavi_2").VirtualButton("button_a").Click
Window("CJTNavi_2").VirtualButton("button_da").Click
Window("CJTNavi_2").VirtualButton("button_search2").Click
Window("CJTNavi_2").VirtualButton("button_position").Click
Vbs脚本
Function SelectProvince(arrxput,arryput)

        Dim arrx,arry
        Dim mycolumeX,mycolumeY
        Dim toNum,fromNum
                toNum=4
                fromNum=0
                arrx=Array("p_X1","p_X2","p_X3","p_X4","Next_X")
                arry=Array("p_Y1","p_Y2","p_Y3","p_Y4","Next_Y")
                Randomize
                mycolumeX=Int((toNum-fromNum+1)*Rnd+fromNum)
                arrxput=arrx(mycolumeX)
                Randomize
                mycolumeY=Int((toNum-fromNum+1)*Rnd+fromNum)
                arryput =arry(mycolumeY)
End Function
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

  • TA的每日心情
    开心
    2014-11-12 14:20
  • 签到天数: 1 天

    连续签到: 1 天

    [LV.1]测试小兵

    2#
    发表于 2014-5-27 16:26:05 | 只看该作者
    当你调用selectprovince()时候,没有传给他响应的参数,也就是SelectProvince(arrxput,arryput),没传相应数目的参数VBS调用会报错的~
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

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

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

    GMT+8, 2024-11-11 19:35 , Processed in 0.074208 second(s), 28 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

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