VB.Net 使用 dBase / 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，皆可使用相同方式來連線存取。
