1

这是我在 VB 中通过 ODBC 检索数据的代码:

Dim Ssql
Dim dbstatus 
Dim rs

'*************  

 Ssql =  " Select * from User_Access A Where A.User_pwd ='1234' "
  set rs = Server.CreateObject("ADODB.RecordSet")
  rs = DB.execute(Ssql,dbstatus)      
  Response.Write(dbstatus)
  If dbstatus <> 0 Then
        'Error code here
  Else
        'code here 
  END IF

'*************

代码工作正常。成功执行 sql 语句后,dbstatus 值为 -1 。但根据代码,它应该返回 0 以供进一步执行。对于 0 以外的值,它将给出 Error 。

我在 sql server 2005 和 windows 7 上执行这个。

***但是相同的代码在成功执行 sql 语句时,dbstatus 值在 ODBC 版本和 sql server 版本不同的其他环境中为 0。

谁能帮我吗 。提前致谢

4

1 回答 1

0

如果您在 ADO 和 VB 中使用 Connection.Execute Methode,则第二个参数表示受影响的行。

在此处输入图像描述

于 2013-02-25T19:02:57.757 回答