VBScript 中的类型不匹配 [英] types mismatch in VBScript

问题描述

我正在尝试获取 db 中表的行数并使用 VBScript 将其输出到控制台，但是当我执行以下代码时出现类型不匹配错误，我应该在代码中更改什么以强制它执行而不会出错

I am trying to get number of table's rows in db and output it to console using VBScript, but when I execute following code I get type mismatch error, what should I change in my code to force it execute without errors

Dim loop_lim
Const DB_CONNECT_STRING = "Provider=SQLOLEDB.1;Data Source=BUG\SQLSERVER2005;Initial Catalog=test;user id ='sa';password='111111'"
Set myConn = CreateObject("ADODB.Connection")
Set myCommand = CreateObject("ADODB.Command" )
myConn.Open DB_CONNECT_STRING
Set myCommand.ActiveConnection = myConn
myCommand.CommandText = "select count(*) from oferty o inner join rep_oferta ro on o.indeks = ro.srcdoc inner join rep_pozycje rp on o.indeks = rp.srcdoc"
loop_lim = myCommand.Execute
WScript.Echo loop_lim

推荐答案

更改

loop_lim = myCommand.Execute

到

Set loop_lim = myCommand.Execute

因为 .Execute 返回一个记录集对象.然后考虑如何从记录集rsp中获取值.这是字段.

because .Execute returns a recordset object. Then think about how to get values from the recordset rsp. it's fields.

这篇关于VBScript 中的类型不匹配的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！