关于新旧ACCESS数据库连接（MDB,ACCDB）

 

关于新旧ACCESS数据库连接（MDB,ACCDB）仅仅是连接字符串有区别 Provider=Microsoft.ACE.OLEDB.12.0;Data Source=数据库路径;（ACCDB） Provider = Microsoft.Jet.OleDb.4.0; Data Source = 数据库路径;（MDB） 原来自己都有些落伍了啊…… 不过自己一直用的都是SQL的数据库，ACCESS印象中好像是属于小型的数据库吧！ SQL数据库转ACCESS数据库其实挺有意思的！ using System.Data.OleDb; 加个引用！把SQL数据库的那个引用去掉然后按Ctrl+F将Sql替换为OleDb再按上面的把连接字符串的内容改一下，其他的都不用动……呵呵是不是挺简单啊…… 数据库连接。 '1、连接mdb文件： Sub 连接进销存表数据库() Dim conn As ADODB.Connection Dim WN As String Dim sSql As String WN = "sample_1.mdb" Set conn = New ADODB.Connection With conn     .Provider = "Microsoft.Jet.OLEDB.4.0"     .ConnectionString = "Data Source=" & [CurrentProject].[Path] & "\" & WN     .Open     End With If conn.State = 1 Then MsgBox "连接成功！" conn.Close End If Set conn = Nothing End Sub '2、连接xls文件： Sub 连接进销存表数据库() Dim conn As ADODB.Connection Dim WN As String Dim sSql As String WN = "sample_2.xls" Set conn = New ADODB.Connection With conn     .Provider = "Microsoft.Jet.OLEDB.4.0"     .ConnectionString = "Extended Properties=Excel8.0;" & "Data Source=" & [CurrentProject].[Path] & "\" & WN     .Open     End With If conn.State = 1 Then MsgBox "连接成功！" conn.Close End If Set conn = Nothing 连接ACCDB 用 Provider=Microsoft.ACE.OLEDB.12.0;Data Source=数据库名.accdb;Persist Security Info=False