ACCESSのFindコマンドが遅い

ACCESS2000でORACLEにリンクテーブルをはり、更新するプログラムを作成しています。
そこでADOでFINDコマンドを使用しているのですが、かなり遅く困っています。
どのようにすれば、早くロック付きの更新ができますでしょうか？

Set cn = Application.CurrentProject.Connection
Set rs = New ADODB.Recordset
cn.BeginTrans
rs.Open "テーブル名", cn, addopenkeyset, adLockOptimistic

rs.MoveFirst
strKey = "ankKey = 'aaa'"
rs.Find strKey
rs.ankA = "あ"
rs.Update

cn2.CommitTrans

キィを変えてLOOPさせ更新させていると
複数ステップのOLE DBの操作でエラーが発生しました。各OLE DBの状態の値を確認してください。作業は終了しませんでした。
のエラーになります。
１行１行みてみると異常にFINDが遅いものがあり、これが原因でないかと思うのですが、
どのようにロック付きの更新を変更すればいいのかがわかりません。

どのように変更すればいいのでしょうか？

No.1 ベストアンサー 回答者： AKARI0418 回答日時： 2010/03/10 08:50

http://www.ne.jp/asahi/hishidama/home/tech/acces …
を参考にしてください。

更新処理を高速に処理したいのであれば、
SQLのUPDATEを使う方がよいです。

SQLでアップデートした場合はレコードセットを再度取得してくださいね。

レコードセットは参照には便利ですが、
更新系はちょっと遅いんです。

この回答へのお礼

無事に解決しました。
ありがとうございました。

お礼日時：2010/03/10 14:34