这是我在 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。
谁能帮我吗 。提前致谢