高手指点一下吧！！！关于ADO的（最先回答对的给4分）

Question

Dim con As New Connection
Dim rs As New RecordsetPrivate Sub BarCodeCtrl1_GotFocus()End SubPrivate Sub Form_Load()
With con
.Provider = "Microsoft.jet.oledb.3.51"
.ConnectionString = *****************************************
.Open
End With
End Sub*************************号的地方怎么写？？？不用DSN的！！不通过任何间接方式直接用ADO连接ACCESS!!
顺便问一句，98有没有ODBC???

Answer 1

晕.....还第一个回答给4分.....CSDN上的人都穷光了呀..

Answer 2

Provider=Microsoft.Jet.OLEDB.3.51;Data Source=D:\Data.mdb;Persist Security Info=False
98有ODBC！！！！

Answer 3

我是这样写的：
Connstring = "Driver={Microsoft Access Driver (*.mdb)};Dbq=" + App.Path + "\data.mdb;pwd=;"+PWDString

Answer 4

其实，用adodc控件连接以下数据库，把那个语句copy过来就ok了的

Answer 5

"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + path + "\mdb1.mdb;Mode=ReadWrite;Persist Security Info=False"

Answer 6

ACCESS97 3.51
ACCESS2000 4.0

Answer 7

写法有很多
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=databaseName;User ID=userName;Password=userPassword;"比较典型