求救！！！当前记录集不能更新

Question

增加记录用：con.execute "insert into tablename(...) values(...)"
修改记录用：con.execute "update tablename set ... where ..."
删除记录用：con.execute "delete from tablename where ..."

Answer 1

上面的那位老兄，我出错的是运行到这部分啊：
With myRsmyRs.Fields(0).Value = txtNo.Text
－－－－－－－－程序运行到这里就说：当前记录集不支持更新，这可能是提供程序的限制，也可能是选定锁定类型的限制
myRs.Fields(1).Value = txtName.Text
myRs.Fields(2).Value = txtCourse.Text
myRs.Fields(3).Value = txtpsbx.Text
myRs.Fields(4).Value = txtqzcj.Text
myRs.Fields(5).Value = txtqmcj.Text
myRs.Fields(6).Value = txtzp.Text

Answer 2

我同意上面的观点
  增加记录用：con.execute "insert into tablename(...) values(...)" 
  修改记录用：con.execute "update tablename set ... where ..."
  删除记录用：con.execute "delete from tablename where ..."
你添加一个记录也用不着那么麻烦吧，改个方式吧。
上面3个语句足够满足你的要求！！

Answer 3

设置 connection中的一个属性就可以了