ADOでAccessに接続するには？

---

ADOでAccessに接続して処理をしたいのですがどうしたらいいか分かりません。誰か教えて下さい。

編集 削除

---

接続でいちばん簡単なのは、
メニューのプロジェクト→コンポーネントで
Microsoft ADO Data Control(OLEDB)  にチェックいれて、
ツールボックスに現れたADODC をFormにはりつけて、
プロパティページを設定することです。

ついでに
メニューのプロジェクト→コンポーネントで
Microsoft DataGrid Control(OLEDB) にチェックいれて、
ツールボックスに現れたDataGrid をFormにはりつけて、
DataSourceをADODC1にすれば、一覧表示＆編集ができます。

編集 削除

---

プログラムで書いて接続を行いたいのですが・・・
後、テーブルの参照方法、変更、削除も行いたいのですが

編集 削除

---

接続方法

例１：

Dim db As ADODB.Connection
Dim rs As New ADODB.Recordset
Dim rs_Name As String

    Set db = CurrentProject.Connection
    rs_Name = "使用レコード名"
    rs.Open db_Name, db, adOpenStatic, adLockOptimistic

例２：

Dim db As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim rs_Name As String

    db.Properties("Data Source")  = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=N:\XXXXX.mdb;User ID=Admin;Password=;"
    db.Open
    rs_Name = "使用レコード名"
    rs.Open db_Name, db, adOpenStatic, adLockOptimistic

編集 削除

---

rs.Open db_Name, db, adOpenStatic, adLockOptimistic
                            ↓
rs.Open rs_Name, db, adOpenStatic, adLockOptimistic

編集 削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。