みんなの「教えて(疑問・質問)」にみんなで「答える」Q&Aコミュニティ

こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

締切り済みの質問

oracleとexcelのADOによる連携について

お世話になります。
excelからADOでoracleのデータベースにある
テーブルの必要なデータのみを抽出してexcelに
書き出そうとしています。

excelのvbaコードで、まず、ADOコネクションの生成として、
「cn.Open "Provider=OraOLEDB.Oracle;Data Source=" & "DB名" & ";User ID=hpsuser;Password=○○○;", "○○○", "○○○"」と書き、
ADOレコードセットの生成で、
「 rs.Open "~(1)~", cn, adOpenDynamic, adLockOptimistic, adCmdText」
と書いていますが、上記「~(1)~」の部分がかなり長いクエリ文になっているからなのか、
エラーがかかってしまいます。
単純なテーブルのデータを呼び出す事しかできないのか、又、
長いクエリ文のデータを抽出したい場合どの様にしたら良いのか、
どなたかご親切な方、ご教示頂けます様、宜しくお願いいたします。

投稿日時 - 2013-07-07 22:27:34

QNo.8166877

困ってます

このQ&Aは役に立ちましたか?

2人が「このQ&Aが役に立った」と投票しています

回答(1)

ANo.1

_______
Dim rs As New ADODB.Recordset
rs.Open "~(1)~", cn, adOpenDynamic, adLockOptimistic, adCmdText
 ̄ ̄ ̄ ̄ ̄ ̄ ̄

_______
Dim rs As ADODB.Recordset
Set rs = cn.Execute("~(1)~")
 ̄ ̄ ̄ ̄ ̄ ̄ ̄
に変えてみるとどうでしょう?

投稿日時 - 2013-07-10 23:09:03

あなたにオススメの質問