• ベストアンサー

ADODBのレコードセットをGridに表示させたい

初歩的な質問かもしれないのですが よろしくおねがいします ADODBのレコードセットをグリッド表示させたいのですが どのコンポーネントをつかって どうやってやればスマートでしょうか よろしくおねがいします

  • ayato
  • お礼率25% (16/64)

質問者が選んだベストアンサー

  • ベストアンサー
  • TAGOSAKU7
  • ベストアンサー率65% (276/422)
回答No.2

参考URLをSQL鯖(サーバ)からOracle鯖に変更したパターンです。 なんとなくで読み替えたらできますよね? 必要なコントロールは参考URLと一緒です。 Microsoft ADO Data Control 6.0 (OLEDB) Microsoft DataGrid Control 6.0 (OLEDB) SQL Net Easy Configuration って使ってます? そうじゃなくても一度オラクルからDBにアクセスするようにしてますよね。 それに名前を付けてると思うのですが(データベース別名というところ)、それをDBNAMEのところにいれてあげてください。 それとユーザーネームとパスワードもいれてください。 Private Sub Form_Load()   'データベース別名   DBNAME = ""      Adodc1.ConnectionString = "Provider=MSDAORA;Data Source=" & DBNAME & ";"   Adodc1.UserName = "USERNAME"   Adodc1.Password = "PASSWORD"   Adodc1.CommandType = adCmdText   Adodc1.RecordSource = "select * from USER_TABLES"   Adodc1.Refresh 'レコードセットを更新する   Set DataGrid1.DataSource = Adodc1.Recordset ' グリッドの連結を行なう End Sub 参考URLはさっきと一緒です

その他の回答 (1)

  • TAGOSAKU7
  • ベストアンサー率65% (276/422)
回答No.1

DB種類が出ていませんでしたが・・・ http://homepage2.nifty.com/inform/vbdb/adodc_sqlserver.htm にSQLサーバーへ例で出ています。

参考URL:
http://homepage2.nifty.com/inform/vbdb/adodc_sqlserver.htm
ayato
質問者

補足

言葉が足らなくてもうしわけありませんでした DBはオラクルです

関連するQ&A

  • レコードセットからレコードセットって作れますか?

    WindowsXP,VB6,SP5,で開発しています。 タイトルそのままなのですが、 ある事情で、まずはデータベース(Access)からレコードセットを作成しています。 そのレコードセットをもとに色々と抽出したいんです。 もし、データベースからSQL文で抽出するときみたいに、そのレコードセットを、 SUM(~とかGROUP化したりとかできればいいなあと思っているのですが、 その方法がわからず、2,3回遠回りしてレコードセットを作成してます。 レコードセットからレコードセットを作成することってできないのでしょうか? わかりにくくてすみませんが、どうぞよろしくお願いしますm(_ _)m

  • VBAでレコードセットの総レコード数を取得する方法

    Dim con As ADODB.Connection Dim rsData As ADODB.Recordset Dim DNSname$,USERname$,PASSw$,cnt&  Set con = CreateObject("ADODB.Connection")  con.Open "DSN=" & DNSname & "; UID= " USERname & "; PWD=" & PASSw  Set rsData = New ADODB.Recordset  rsData.Open SQL, con  Do While Not rsData.EOF   rsData.MoveLast   cnt=rsData.RecordCount   rsData.First  LOOP といいコードで総レコード数が取得できるかなとやってみたところ、rsData.MoveLastのところで、「行セットは逆フェッチをサポートしていません」というエラーが出ました。 なにかほかの方法で総レコード数を取得する方法があるのでしょうか? 自分で他に試したことは、rsData.EOFまでrsData.MoveNextでもっていきrsData.EOF-1レコードの.RecordCountを取得すしようと試みましたが、最後のレコードまできても.RecordCountは「-1」のまま変化しませんでした。レコードセットの呼び込み方が不味いのでしょうか?

  • レコードセットのオープン

    修行中のものです。。。 エラーが発生してしまします。 間違いの点をお教え下さい。 自分的には”レコードセットのオープン”がいまいち分かりません。 【 objCon.Open 】 Dim objCon Dim objRS '##### コネクションオブジェクトの生成 ##### Set objCon = Server.CreateObject("ADODB.Connection") '##### レコードセットオブジェクトの生成 ##### Set objRS = Server.CreateObject("ADODB.Recordset") '##### 接続用パレメータの設定 ##### objCon.Provider = "Microsoft.Jet.OLEDB.4.0" '##### MDBの絶対パス指定 ##### objCon.ConnectionString = (Server.MapPath("/") & "データベース") '##### コネクションのオープン ##### objCon.Open '##### データ参照 ##### objRS = "select [ID],[NAME],[URL],[CM1],[CM2],[CM3] from SITE_DATA" %> レコード件数 <%=objRS.RecordCount%> <hr> <% '##### レコードセットのクローズ ##### objRS.Close Set objRS = Nothing '##### コネクションのクローズ ##### objCon.Close Set objCon = Nothing %> お願いします

  • レコードセットをcloseする所でエラーが出ます

    レコードセットをcloseする所で ADODB.Recordset (0x800A0C93) このコンテキストで操作は許可されていません。 というエラーが出ます。 どうしてでしょうか? 特別な操作はしてないと思うのですが。

  • Gridのカウントについて

    データセットにテーブルをつくり、それをグリッドに表示した後、グリッドの中身を一行削除して、グリッドをカウントしても正しい数が帰ってきません。 例えば、テーブルに ID|名前 01|aaaaa 02|bbbbb 03|ccccc となっており、それをGrid1に表示します。 その後、 ID|名前 01|aaaaa 03|ccccc のように1行削除した後、 MessageBox.Show(Grid1.DataSource.Rows.Count) を行うと、「3」と表示されます。 「2」と表示するための方法を教えてください。

  • レコードセットについて

    ACCESSを勉強中のものです。 レコードセットの意味がよくわからないのですが テーブルやクエリの事を「レコードセット」と言うのでしょうか?

  • Global.asaxで Server.CreateObject("ADODB.Connection")が出来ない

    ASP→ASP.netへ移行作業をしています。 Global.asaで、 set Application("DB") = Server.CreateObject("ADODB.Connection") を、 Global.asaxで、 Application("DB") = Server.CreateObject("ADODB.Connection") としたのですが、エラーで、 「コンポーネント 'ADODB.Connection' を作成できません。アパートメント スレッド コンポーネントは、<%@ Page aspcompat=true %> ページ ディレクティブを含むページでのみ作成できます。 」 となってしまします。 <%@ Page aspcompat=true %>を記述すればよいのかと思い、Global.asax中に記述しましたが、エラーになってしまいました。 'ADODB.Connection'を作成するには、どうすればよいでしょうか?

  • レコードセットについて

    acceessを勉強していていまいちわからないことがあるのですが 「レコードセット」とは選択クエリという意味であってますか? 「レコードセットの生成」とは「選択クエリを作る」という意味でしょうか?

  • レコードセットの一括エクスポート

    いつもお世話になっています。 早速質問させていただきます。 ADODBを使用してSQL ServerとVB間でデータのやりとりを しているのですが、レコードセットをテキスト形式で一括エクスポート したいのですが、どうにもやりかたがわからないのです。 XML形式で一括エクスポートすることはできたのですが、 使用したいのはテキスト形式なので、どうにもこうにも…。 (Saveメソッド使用しました。) XMLからテキストに変換するやりかたでもいいです。 すみませんが、ご教授願いたいです。

  • レコードセット検索

    excel vbaでレコードセットの中身を検索して レコードセット内の別フィールドのデータを取得する方法がわかりません。やりたいことは、 |店舗名称|店番号|  渋谷店   01  池袋店   02  目黒店   03 というレコードセットがあって渋谷店を コンボボックスで選択したときに、店番号の"01"が 別のコンボボックスで表示されるようにしたいのですが うまくいきません。どなたか分かる方教えてください。 お願いします。

専門家に質問してみよう