こんにちは！satoです。

Win98,mysql(3.23.44),myodbc,Access2000の環境です。
Accessで以下のプログラムが
「ほかのユーザーが同じデータに対し変更を試みているので
プロセスが停止しました。」のエラーが出ます。
Accessのテーブルでは問題なかったのですが・・・。
対処策ありましたらアドバイス宜しくお願い致します。

---------------<Access VBA>------------------
Function 更新()
    Dim db As DAO.Database
    Dim rs1, rs2 As DAO.Recordset
    Dim sql1, sql2

    Set db = CurrentDb

    sql1 = "SELECT * FROM jutyu;"     '<--MySQL ODBC リンクテーブル
    Set rs1 = db.OpenRecordset(sql1)

    Do Until rs1.EOF
        sql2 = "SELECT * FROM JSPCPF WHERE JSSER1 = '" & rs1![JUSER1] & "';"
        Set rs2 = db.OpenRecordset(sql2)
            If rs2.RecordCount <> 0 Then
              rs1.Edit
                 rs1![JUSPE] = rs2![JSSPE1]
              rs1.Update                                 '<---ERROR
            End If
        rs1.MoveNext
    Loop

    Set sql1 = Nothing
    Set sql2 = Nothing
    Set db = Nothing

End Function