データグリッドでaccessの詳細を表示 (ID:110816)

名前

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

本文 ＶＢをはじめてまもないのですが。 データグリッドでの詳細表示がうまくいきません。 すみませんがおしえていただけないでしょうか。 ・ＤＢ access2000 private rssub as new ADODB.Recordset private sub RefreshData() dim mySQL as string mySQL = ....................... 'Recordsetが開いているとき if rssub.state = adstateopen then rssub.close end if 'レコードセットを取得 rssub.source = mySQL rssub.ActiveConnection = deMain.cnSales rssub.CursorType = adopenstatic rssub.locktype = adlockoptimistic rssub.properties("IRowsetIdentity") = true rssub.open 'データグリッドに連結 set dbgsub.datasource = rssub end sub 多分ここのソースの部分で違うところがあると思います。 実行をかけると。 if rssub.state = adstateopen then rssub.close か set dbgsub.datasource = rssub end sub のオブジェクトエラーがでます。 もしわかったらでいいので教えてください。