- 題名: vb.net と accessの互換性
- 日時: 2014/04/28 20:11:57
- ID: 32314
- この記事の返信元:
- （なし）
- この記事への返信:
- [32315] Re[1]: vb.net と accessの互換性2014/04/28 21:21:21
- ツリーを表示
DOBON.NETプログラミング掲示板過去ログ
2014/04/30(Wed) 17:02:28 編集(投稿者)
■No32321に返信(魔界の仮面弁士さんの記事)
> 今回は、mdb 形式を用いるのですか?
はい。mdbファイルでやります。
Microsoft.JET.OLEDB.4.0 を使ってます。
接続し、レコードの中身を表示してみるサンプルを作りました。
接続は出来たっぽいのですが、追加質問です。
お手数お掛けします。
---------------------------------------------
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim St As String
Dim Cn As New System.Data.OleDb.OleDbConnection
Dim SQL As System.Data.OleDb.OleDbCommand
Dim UserID As String = "Admin"
Dim Password As String = "****"
Dim MDBFile As String = "C:\Sample.mdb"
St = "Provider=""Microsoft.Jet.OLEDB.4.0"";"
St &= "Data Source=""" & MDBFile & """;"
St &= "User ID=" & UserID & ";"
St &= "Jet OLEDB:Database Password=" & Password
Cn.ConnectionString = St
SQL = Cn.CreateCommand
SQL.CommandText = "SELECT * FROM Test_Table"
Cn.Open()
MsgBox(SQL.ExecuteScalar)
Cn.Close()
SQL.Dispose()
Cn.Dispose()
End Sub
End Class
-----------------------------------------------------------
テーブルには
code 数値型
namae テキスト型
がありまして、
只今上記のコードでは
メッセージボックスに
1
の表記だけとなってます。
両方をメッセージボックスに出す場合どうコーディングするのでしょうか。
1 氏名
の様な形で出力したいです。
2014/04/30(Wed) 17:20:32 編集(投稿者) 2014/04/30(Wed) 17:17:58 編集(投稿者) ■No32326に返信(魔界の仮面弁士さんの記事) > ■No32325に返信(グリムさんの記事) >>Dim MDBFile As String = "C:\Sample.mdb" > > Cドライブのルートにファイルを配置するのは止めましょう。 サンプル出来次第パスの指定先変更します。 了解しました。 > その mdb に対して、データベースレベルのロックがかかっていた場合、 > (たとえば、Microsoft Access が「排他モード」で開いていた場合など) > 『"は既に使用されているので、使用できません』と表示されることになります。 仰るとおり開いてました。ありがとうございます。 現状修正しまして、接続は出来ました。 投稿修正により重複しますが、 テーブルには code 数値型 namae テキスト型 がありまして、 只今上記のコードでは メッセージボックスに 1 の表記だけとなってます。 両方をメッセージボックスに出す場合どうコーディングするのでしょうか。 1 氏名 の様な形で出力したいです。
分類:[.NET]
VB.net2010で、access 2003へのDBアクセスは出来るのでしょうか。
年の差があり不安に思いました。
またそれを確認できる方法はありますか。