新手请教 多谢高手支持（在线）

Question

请问在VB中怎么使用jet4.0 连接ACCESS数据库？

Answer 1

Set con = New ADODB.Connection
      With con
            .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb;Persist Security Info=False"
            .Open
      End With

Answer 2

Dim db As New ADODB.Connection
db.ConnectionString = "provider=microsoft.jet.oledb.4.0;" & "data source=" & App.Path & "\dev.mdb"
db.Open