VB.Net 如何存取 xBase / FoxPro 資料庫

原出處
VB.Net 如何存取 xBase / FoxPro 資料庫


<< 使用OleDb >>


Imports System.Data.OleDb


Dim strCn As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _

"Data Source=C:\DBF檔案所在資料夾;" & _

"Extended Properties=dBASE IV;" & _

"User ID=Admin;Password=;"


Dim strQry As String = "Select * From 某某.dbf"


Dim cn As New OleDbConnection(strCn)

Dim da As New OleDbDataAdapter(strQry, cn)

Dim ds As New DataSet


da.Fill(ds)

DataGridView1.DataSource = ds.Tables(0)


PS : ConnectionString 的 Extended Properties 可為 dBASE IV 或 dBASE 5.0 或 dBASE III。

也可以是 FoxPro 2.0 、 FoxPro 2.5 、 FoxPro 2.6 、 FoxPro 3.0



' ================================================================



<< 使用ODBC >>


Imports System.Data.Odbc


Dim strCn As String = "DRIVER={Microsoft dBase Driver (*.dbf)};dbq=C:\DBF檔案所在資料夾"


Dim strQry As String = "Select * From 某某.DBF"


Dim cn As New OdbcConnection(strCn)

Dim da As New OdbcDataAdapter(strQry, cn)

Dim ds As New DataSet


da.Fill(ds)

DataGridView1.DataSource = ds.Tables(0)


PS : ConnectionString 的 Driver 可為 [ODBC 資料來源管理員] 中所提供的 驅動程式。


如:

"DRIVER={Microsoft dBase Driver (*.dbf)};dbq=C:\DBF檔案所在資料夾"

"DRIVER={Microsoft dBase VFP Driver (*.dbf)};dbq=C:\DBF檔案所在資料夾"

"DRIVER={Microsoft FoxPro Driver (*.dbf)};dbq=C:\DBF檔案所在資料夾"

"DRIVER={Microsoft FoxPro VFP Driver (*.dbf)};dbq=C:\DBF檔案所在資料夾"

"DRIVER={Microsoft Visual FoxPro Driver (*.dbf)};dbq=C:\DBF檔案所在資料夾"


xBase 或 FoxPro 資料庫，只要有 ODBC Driver，皆可使用相同方式來連線存取。