远程数据库连接程序的打包问题,急!!!附代码

asp_net 2003-05-16 09:02:13
Private db As New ADODB.Connection
Private rs As New ADODB.Recordset
Private cmd As New ADODB.Command

Public Function SqlConnectString(ServerName As String, UserName As String, password As String) As String
SqlConnectString = "Provider=SQLOLEDB.1;User ID=" + UserName + ";Pwd=" + password + ";Data Source=" + ServerName
End Function

Public Sub connectDB()
If db.State = 1 Then
db.Close
End If
db.ConnectionString = SqlConnectString("123.123.123.123", "test", "password")
db.CursorLocation = adUseClient
rs.CursorLocation = adUseClient
On Error Resume Next
db.Open
db.DefaultDatabase = "TestDB"
Set cmd.ActiveConnection = db
rs.Open "select top 1 * from TestTB order by time desc", db, adOpenDynamic, adLockOptimistic
If Err Then
MsgBox Err.Description & Err.HelpContext
Else
MsgBox rs.field(0).value
End If
db.Close
End Sub

----------------------------------------------------
以上代码在本机调试可以连接远程的数据库,没有任何问题,但是用VB自带的打包程序打包成SETUP,在其他的WIN98机器下安装后就是不能访问数据库。
请各位帮忙,谢谢!
...全文
36 5 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
asp_net 2003-05-16
  • 打赏
  • 举报
回复
搞定了,包了MDAC_TYP旧版本的问题,包个2.7就没问题了,谢谢各位,结贴
asp_net 2003-05-16
  • 打赏
  • 举报
回复
可是我已经在客户端装了MDAC_TYP了啊
martinjin 2003-05-16
  • 打赏
  • 举报
回复
我碰到过!你用的是SQL2000吧?在客户端要打补丁的!在微软的网站上有下载!名称是MDAC_typ.exe,安装一下即可!
LichKingSZ 2003-05-16
  • 打赏
  • 举报
回复
用VB自带的打包程序会把MDAC_TYP.EXE一起打进去的.
ganzhiruogy 2003-05-16
  • 打赏
  • 举报
回复
VB自带的打包程序打包,不会包含文件MDAC_TYP.exe的,你要在打包时添加。

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧