51Testing软件测试论坛

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

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 1841|回复: 9
打印 上一主题 下一主题

[原创] 我也问个参数传递的问题

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2009-10-23 12:32:29 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
有一个外部的VBS文件,写了3个函数:
'连接数据库
Public Function DBConnect(sql_usr,sql_pwd,sql_LibraryName,sql_ip)      
        dbcon="rovider=SQLOLEDB.1assword="&sql_pwd&"ersist Security Info=True;User ID="&sql_usr&";Initial Catalog="&sql_LibraryName&";Data Source="&sql_ip&""
        Set conn=createobject("adodb.connection")   
        conn.Open dbcon         
    Set rst=createobject("adodb.recordset")
End Function

'关闭数据库
Public Function DBClose()
         Set conn=nothing
         Set rst=nothing
End Function

'执行sql语句
Public function DBRun(sql1)
        rst.Open sql1,conn
End Function

执行时提示缺少对象,但是假如这几个不放在外部VBS文件中而放在QTP里 再执行时就成功了
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
发表于 2009-10-23 13:18:39 | 只看该作者
rst 这个变量如果放外部vbs的话,要在vbs定义
回复 支持 反对

使用道具 举报

该用户从未签到

3#
 楼主| 发表于 2009-10-23 14:16:48 | 只看该作者
定义在VBS里也报错  错误内容是参数类型错误...
回复 支持 反对

使用道具 举报

该用户从未签到

4#
发表于 2009-10-23 14:33:01 | 只看该作者
这么定义明显是很不合理的。。。3个函数可以写在一个class中,或者就直接合并成一个function
回复 支持 反对

使用道具 举报

该用户从未签到

5#
 楼主| 发表于 2009-10-23 14:52:49 | 只看该作者
能说说为什么都放外部VBS文件中不行么?还有为什么都发QTP中就可以呢?  迷惑中
回复 支持 反对

使用道具 举报

该用户从未签到

6#
发表于 2009-10-23 15:33:31 | 只看该作者

回复 5# 的帖子

变量的作用域问题
回复 支持 反对

使用道具 举报

该用户从未签到

7#
 楼主| 发表于 2009-10-23 18:27:33 | 只看该作者

回复 6# 的帖子

作用域问题我知道啊  就是想仁兄给具体讲下啊  
回复 支持 反对

使用道具 举报

该用户从未签到

8#
发表于 2009-10-23 18:32:01 | 只看该作者

回复 7# 的帖子

你把你具体的变量定义及调用的过程描述下好了,这样方便有针对性的说
回复 支持 反对

使用道具 举报

该用户从未签到

9#
发表于 2009-10-26 10:32:17 | 只看该作者
你的VBS要有关联!
两个没有关联的变量如何作用! 执行好一个就释放了!
回复 支持 反对

使用道具 举报

该用户从未签到

10#
 楼主| 发表于 2009-10-26 10:42:25 | 只看该作者

回复 9# 的帖子

如何关联?  我只是把VBS文件给加载到Resouce里了 ...
回复 支持 反对

使用道具 举报

本版积分规则

关闭

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

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

GMT+8, 2024-10-5 09:31 , Processed in 0.089643 second(s), 28 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

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