一段程序:
   AdoRs.Open "select * from table_mtjcfj", Cnn, adOpenKeyset, adLockOptimistic
   AdoRs1.Open "select  * from table_mtjctj order by 序号 desc", Cnn, adOpenKeyset,adLockOptimistic
   If AdoRs1.RecordCount > 0 Then
        AdoRs1.MoveFirst
        xuhao = AdoRs1.Fields("序号")
   Else
        xuhao = 0
   End If
    
   For i = 1 To a + 1
     xuhao = xuhao + 1
     AdoRs1.AddNew
     AdoRs1.Fields("序号") = xuhao
     AdoRs1.Fields("摘要") = Text5.Text
     AdoRs1.Update
 
     For j = 1 To b
       AdoRs.AddNew
       AdoRs.Fields("序号") = xuhao
       AdoRs.Fields("文件名") = text3.text
       AdoRs.Update
    Next j
Next i
AdoRs1.close
Adors.close这段程序老是出问题,不是“游标操作冲突”,就是数据无法修改。
请各位大虾指点一下,谢谢!!