VB数据库程序在别人电脑上运行就无法连接

本人用VB6+SQL2005写了个简单的书籍管理系统,用的ODBCAPI访问数据库,程序写好后在本机运行良好,但是无论是打包后安装在局域网电脑上,还是采用共享,映射网络磁... 本人用VB6+SQL2005写了个简单的书籍管理系统,用的ODBC API访问数据库,程序写好后在本机运行良好,但是无论是打包后安装在局域网电脑上,还是采用共享,映射网络磁盘都不能正常运行,提示“无法获得连接句柄”.
省略前面的声明
'连接数据库
Private Sub Connect()
Dim TmpStat As Long 'SQLConnect()函数的返回值
'如果连接标记为真,则返回。否则会出错
If IsConnect = True Then
Exit Sub
End If
'分配环境句柄,保存在变量Henv中
If SQLAllocEnv(Henv) Then
MsgBox "无法初始化ODBC环境!", , "ODBC API执行错误"
End
End If
'根据环境句柄,分配连接句柄,保存在变量Hdbc中
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 And _
TmpStat <> sql_success_with_info Then
MsgBox "无法获得连接句柄!", , "ODBC API执行错误"
IsConnect = True
Disconnect
End
End If
'设置连接标记
IsConnect = True
End Sub
请高手帮忙看看,是需要额外写什么连接的东西,还是说是其他什么问题
展开
 我来答
若以下回答无法解决问题,邀请你更新回答
井慕诗V9
2009-04-24 · TA获得超过155个赞
知道小有建树答主
回答量:321
采纳率:0%
帮助的人:123万
展开全部
是不是没有dll?
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式