よろしくお願いいたします。
①Accessのフォームを
・フォームヘッダー
・詳細
・フォームフッター
に分けて、ヘッダーの部分に「クエリ取得」というボタンを配置しています。
②また、SQLserverからODBC接続で、Accessにリンクテーブルを二つ作り、
それらを合わせたものを「Q_uriage」という名としたクエリを作っています。
①、②と併せて実現したいことは、
●ボタンをクリック→クエリの内容(つまり、リンクテーブルの内容)を取得
●一覧でフォームフッターに表示
です。
ADO接続についてや、SQLserverの接続など色々と調べて、一旦書いてみたロジックは下記です。
//'[SQLステートメントが正しくありません。'DELETE','INSERT','PROCEDURE','SELECT',または'UPDATE'を使用してください。]'
というエラーが出てうまくいきません。
Private Sub クエリ取得_Click() Dim Cn As ADODB.Connection Dim Rs As ADODB.Recordset Set Cn = CurrentProject.Connection Set Rs = New ADODB.Recordset Rs.Open "Q_uriage", Cn, adOpenStatic, adLockOptimistic ※2 '//Q_uriageは、ODBC接続でSQLserverから取得した二つのリンクテーブルを合わせて作ったクエリ' ●ボタン押下後、実行時エラー この行が、デバック後黄色くなる Rs.Close Cn.Close Set Rs = Nothing Set Cn = Nothing End Sub ※ //上記のソースで取得できるはずのクエリの内容を、フォームフッターに一覧表示させたい
足らないところが多々あるのは承知ですが、有職者の皆様のお知恵をお借りしたく存じます。
表題の内容を実現できるやり方をご教示いただければ幸いです。
回答2件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2016/05/06 04:05
2016/05/06 04:10
2016/05/06 04:22
2016/05/06 07:42