Dao.Recordset 是什么东西？

suve　发表于：2007-12-07 14:28:55 　

Dao.Recordset
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("tblCodeyg", dbOpenDynaset)
rst.AddNew
rst("ygId") = acchelp_autoid("Y", 2, "tblCodeyg", "ygId")
rst("ygxm") = Me.ygxm
rst.Update
rst.Close
Set rst = Nothing

关于表和记录操作之类的命令总不理解，可以抄用，但不明白。就像小孩说话，可以说出来，但不知道什么意思，所以就不分场合，乱用。孩子可以童言无忌，程序却总是蹦错误出来，到你改到屈服为止。

Me.RecordSource = "Select * FROM tblCodeyg Where ygId = '" & selectstr & "'"
g_CurrentSelectStrID = selectstr 还有这个东西看起来怪怪的，不明白

Top

竹笛发表于：2007-12-07 14:38:20

'声明rst为DAO.Recordset,如果不声明就出错

Dim rst As DAO.Recordset

' rst等于tblCodeyg,打开了这个tblCodeyg表
Set rst = CurrentDb.OpenRecordset("tblCodeyg", dbOpenDynaset)
'新增记录模式
rst.AddNew
'让rst的ygid字段等于某值,也即让tblCodeyg表中的的ygid字段等于某值
rst("ygId") = acchelp_autoid("Y", 2, "tblCodeyg", "ygId")

'让rst的ygxm字段等于某值,也即让tblCodeyg表中的的ygxm字段等于某值
rst("ygxm") = Me.ygxm

'更新,如果没这句,就相当于没保存
rst.Update

'以下两句须记住,释放rst
rst.Close
Set rst = Nothing

Top

竹笛发表于：2007-12-07 14:39:41

g_CurrentSelectStrID = selectstr

g_CurrentSelectStrID 是个全局变量,这里赋上值,供别的地方调用.

Top

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

Access交流中心

Dao.Recordset 是什么东西？