请教：如何编写vb6连access97的connection代码,急救！！！

Question

dim db as database
set db=opendatabase("e:\newquery\data.mdb")

然后你想怎么样就怎么样
不知道你满意否？

Answer 1

dim conn As New ADODB.Connection, connStr As StringconnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\yourdb.mdb;Jet OLEDB:database password=XXXXXXXXXX"conn.Open connStr

Answer 2

dim conn As New ADODB.Connection, connStr As String
connStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\newquery\data.mdb;"
conn.Open connStr

Answer 3

楼上的兄弟，用ADO吗？不好意思，没看见