Dim rs As Recordset
Dim wk As Variant
Set rs = Currentdb.OpenRecordset("SELECT * FROM TEST WHERE カウンタ=0")
rs.AddNew
rs!SIMEI = "TEST"
rs.Update
rs.Move 0, rs.LastUModified
wk = rs!カウンタ
↑
この行で、「実行時エラー '3167':レコードは削除されています。」となります。
SELECT文のTESTテーブルがローカルテーブルだった時は問題なかったのですが、
OracleのODBCリンクテーブルに変えると、エラーが発生するようになりました。
TYPEもダイナセットで、BookMarkableもTrueでした。
Book markプロパティの中にBook mark(0)~(3)があるのですが、
ローカルテーブルの時は、Book mark(1) = 2 でしたが、
ローカルテーブルの時は、Book mark(1) = 3 となっていました。
回避策は色々ございますが、なぜこのようなエラーが発生するのかお知恵を拝借したく。

回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。