VBS 结果集返回

在VBS脚 本中,我建立VBS函数' ********************************************************************
' 函数说明:查询数据库(查询单列);
' 参数说明:  (1)strSql:SQL语句
'           (2)strFieldName:字段名
'           (3)str_Array_QueryResult:数组名(用来返回单列查询结果)
' 返回结果:  intArrayLength:查询数据库返回的记录行数
'           str_Array_QueryResult:数组名(用来返回单列查询结果)
' 调用方法: intArrayLength = QueryDatabase(strSql, strFieldName, str_Array_QueryResult)
' ********************************************************************
Function QueryDatabase(strSql)

 
    Set objRecordSet = CreateObject("ADODB.RECORDSET")                '4 - 建立RECORDSET对象实例

 objRecordSet.open strSql,objConnection,1,1

   Set QueryDatabase = objRecordSet

   objRecordSet.close
 
End Function
本意是想返回数据结果集的。但是Wincc是不支持的。在应用页面的按钮上定义了一个。ADODB.Recordset变量,接收到不到的。请问各位有什么办法 ?

最佳答案

在VBS脚本里,传递对象可以使用DataSet对象
具体使用可参考dcount107大侠的精华贴
http://www.ad.siemens.com.cn/club/bbs/post.asp?b_id=5&a_id=457625&s_id=0&num=0#anch
另外你的函数里objConnection好像是没有定义哦

提问者对于答案的评价:
不错,不错。十分感谢!原来 还真有传递指针地址的东西!

原创文章,作者:more0621,如若转载,请注明出处:https://www.zhaoplc.com/plc267452.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2019年6月11日 上午5:17
下一篇 2019年6月11日 上午5:17

相关推荐