分页: 1 / 1

这里有一个数据库问题,请高手指点!

帖子发表于 : 周一 2月 23, 2004 12:05 am
gxl
我在做数据库实习的时候(是在用VB来做的),数据库采用的是sqlserver ,调试的时候总是遇到出现这样一个问题:"找不到入口点 sqlallocenv in odbc32.dll"
问题就出现在这个程序段里,请有心人帮帮我! :?:

代码: 全选
Private Sub connect()
 Dim tmpstat As Long
 If isconnect = True Then
 Exit Sub
 End If
 If sqlallocenv(henv) Then
 MsgBox "无法初始化ODBC环境!", , "ODBC API执行错误"
 End
 End If
 If sqlallocconnect(henv, hdbc) Then
 MsgBox "无法连接ODBC!", , "ODBC API执行错误"
 End
 End If
 tmpstat = sqlconnect(hdbc, dsn, Len(dsn), db_user_name, lench(db_user_name), db_password, Len(db_password))
 If tmpstat <> sql_success_with_info Then
 MsgBox "无法连接句柄!", , "ODBC API执行错误"
 isconnect = True
 disconnect
 End
 End If
 isconnect = True
End Sub