51Testing软件测试论坛

标题: 我也问个参数传递的问题 [打印本页]

作者: wshyzhywx 时间: 2009-10-23 12:32
标题: 我也问个参数传递的问题
有一个外部的VBS文件,写了3个函数:
'连接数据库
Public Function DBConnect(sql_usr,sql_pwd,sql_LibraryName,sql_ip)
dbcon="

rovider=SQLOLEDB.1

assword="&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里再执行时就成功了

作者: Haereticus 时间: 2009-10-23 13:18
rst 这个变量如果放外部vbs的话，要在vbs定义

作者: wshyzhywx 时间: 2009-10-23 14:16
定义在VBS里也报错错误内容是参数类型错误...

作者: hsjzfling 时间: 2009-10-23 14:33
这么定义明显是很不合理的。。。3个函数可以写在一个class中，或者就直接合并成一个function

作者: wshyzhywx 时间: 2009-10-23 14:52
能说说为什么都放外部VBS文件中不行么?还有为什么都发QTP中就可以呢? 迷惑中

作者: hsjzfling 时间: 2009-10-23 15:33
标题: 回复 5# 的帖子
变量的作用域问题

作者: wshyzhywx 时间: 2009-10-23 18:27
标题: 回复 6# 的帖子
作用域问题我知道啊就是想仁兄给具体讲下啊

作者: hsjzfling 时间: 2009-10-23 18:32
标题: 回复 7# 的帖子
你把你具体的变量定义及调用的过程描述下好了，这样方便有针对性的说

作者: sean007 时间: 2009-10-26 10:32
你的VBS要有关联！
两个没有关联的变量如何作用！执行好一个就释放了！

作者: wshyzhywx 时间: 2009-10-26 10:42
标题: 回复 9# 的帖子
如何关联? 我只是把VBS文件给加载到Resouce里了 ...

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)