如何用代码修改字段?

a1727　发表于：2007-10-17 16:19:57 　

一般修改记录都是用绑定的方法,请问用代码的方法咋搞.

我尝试过以下代码,可惜失败了

测试代码:

        Set rst = CurrentDb.OpenRecordset("tblEmployee", dbOpenDynaset)
        rst.MoveLast
        rst.MoveFirst
        rst.Index = "PrimaryKey"
        rst.Seek "=", Me.list2
        rst.Close
        Set rst = Nothing
以上运行到:

rst.Index = "PrimaryKey"
rst.Seek "=", Me.list2
就报错了.

Top

竹笛发表于：2007-10-17 16:42:26

Set rst = CurrentDb.OpenRecordset("tblEmployee", dbOpenDynaset)
rst.MoveFirst

do until rst.eof
if rst("字段名")= Me.list2 then

rst.edit

rst("字段名")= 某个值

rst.update

goto 100'跳出循环

end if

rst.movenext

        loop
  100      rst.Close
        Set rst = Nothing

Top

a1727 发表于：2007-10-17 21:29:01

谢谢竹笛指导.!

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

如何用代码修改字段?