请教在VB中如何连接ACCESS数据库

[whedward]

想在WIN98中做个单机版的数据库管理程序，情况如下：
程序将要安装到一个没有安装数据库（也许有）的WIN98机器中。
现在，我自已想按以下所述进行开发：
在VB6中用ACCESS设计好的数据库，并将用ODBC进行数据库联接，可是如果这样的话，那么在程序安装到目标机器后，如果要运行程序，那么将必须在目标机器中设置ODBC数据源，这样的话，很不方便，请问各位有没有办法使得在目标机器中不用设置数据源。
听说可以通过注册表来实现，可是如何实现在程序安装时自动注册数据库呢？
如果不用修改注册表的办法，那么如何得到数据源呢？或者就不能用ODBC进行联接？
这应该可以实现的，所有的商品化软件都不用到目标机上去设置ODBC数据源的呀！
如果有方法，请回贴或Email:[e-mail]
谢谢！

[xhema1980]

大部分安装程序制作软件都可以自动设置数据源，如InstallShield,SetupFactory等.另外也可以在注册表中修改，具体位置为：
HKEY_LOCAL_MACHINE\Software\odbc

[tony_jian]

access可以不用

[_1_]

Sub ConMdb(路径 As String, 用户名 As String, 口令 As String)
'连接 MDB
On Error GoTo Err1
Cn.ConnectionTimeout = 100
Cn.Open "DBQ=" & 路径 & ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" & "Uid=" & 用户名 & ";Pwd=" & 口令 & ";"
Exit Sub
Err1:
MsgBox "连接服务器失败！请检查网络的连接是否正确"
End Sub

[cclx_net]

Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
Dim connstr As String
connstr = "provider=microsoft.jet.oledb.4.0;data source=" + App.Path + "\data.mdb"
conn.Open connstr
rs.open "tablename",conn,1,1

[突击召唤师]

楼上说得对，用jet连接就好了。

[yhy981681]

做成动态链接库，将数据库一起封装，再安装到目标机器，试一试

[VVV_lucky]

可以直接连接，方便的很

[_1_]

别说ACCESS
别的也一样的

http://www.jinesc.com/myweb/disp.asp?idd=91&room=40