Access vba ADO接続　リンクテーブルのデータを取得したい場合　ODBC

よろしくお願いいたします。

①Accessのフォームを
・フォームヘッダー
・詳細
・フォームフッター
に分けて、ヘッダーの部分に「クエリ取得」というボタンを配置しています。

②また、SQLserverからODBC接続で、Accessにリンクテーブルを二つ作り、
それらを合わせたものを「Q_uriage」という名としたクエリを作っています。

①、②と併せて実現したいことは、
●ボタンをクリック→クエリの内容（つまり、リンクテーブルの内容）を取得
●一覧でフォームフッターに表示
です。

ADO接続についてや、SQLserverの接続、jetテーブルの接続など色々と調べてもわからなかったことは、下記二点です。
●ソースコード※１部分の記述がCurrentProject.Connectionで良いのか疑問なこと、（リンクテーブルの場合、何か違う記述をするのか？が不明です）
●ボタン押下後、実行時エラー2147217900が出ます。
'[SQLステートメントが正しくありません。'DELETE','INSERT','PROCEDURE','SELECT',または'UPDATE'を使用してください。]'
ソースコード※２の部分がデバックで黄色くなります。

Private Sub クエリ取得_Click()

Dim Cn As ADODB.Connection
Dim Rs As ADODB.Recordset

Set Cn = CurrentProject.Connection  ※１'//ここが、CurrentProjectで良いのか疑問'
Set Rs = New ADODB.Recordset

Rs.Open "Q_uriage", Cn, adOpenStatic, adLockOptimistic  ※２ '//Q_uriageは、ODBC接続でSQLserverから取得した二つのリンクテーブルを合わせて作ったクエリ'


Rs.Close
Cn.Close

Set Rs = Nothing
Set Cn = Nothing


End Sub

※３ //上記のソースを、フォームフッターに一覧表示させたい

足らないところが多々あるのは承知ですが、有職者の皆様のお知恵をお借りしたく存じます。

kaz.Suenaga

2016/05/02 11:47

エラーの内容はどういったものでしょうか。

nekomura

2016/05/06 00:42

kaz.Suenaga様いつもお世話になっております。返信が遅くなりましたことをお詫び申し上げます。ボタン押下後、実行時エラー2147217900が出ます。 '[SQLステートメントが正しくありません。'DELETE','INSERT','PROCEDURE','SELECT',または'UPDATE'を使用してください。]' ソースコード※２の部分がデバックで黄色くなります。少し日にちが空いてしまいましたが、Suenaga様からのご教示がいただければ幸いです。どうぞよろしくお願いいたします。