VB.NET:MDBファイルを読み込んでDataGridに表示

posted on 2005年9月25日 12:13 投稿者 Elfaria

Windows Form アプリの場合です。ASP.NETでもいけるかな?(未確認)

OpenFileDialog から、選択されたAccess MDBファイルを読み込んで、DataGridにデータを表示します。

下記ソース中、DGrid1ってのは、DataGridの事です。念のため。

Dim cn As New OleDb.OleDbConnection
Dim ds As New DataSet
Dim da As New OleDb.OleDbDataAdapter
Dim strMDBFile As String
Dim ofd As New OpenFileDialog

ofd.CheckFileExists = True
ofd.Filter = "MDB File|*.mdb"
ofd.Multiselect = False
ofd.ShowDialog()

If ofd.FileName = "" Then Exit Sub 'ファイルが選択されない(=キャンセルが押された)ら適当にメソッドとか抜けてください
strMDBName = ofd.FileName

'ConnectionStringを設定。DataSourceには、MDBファイル名。
cn.ConnectionString = "provider=Microsoft.Jet.OLEDB.4.0;Data Source = " & strMDBName
Dim da As New OleDb.OleDbDataAdapter("SELECT * FROM Storedata", cn)   'SELECT 文を使ってデータを取得します。

da.Fill(ds)
DGrid1.DataSource = ds.Tables(0)

これでできるはずです。

コメント