新增记录时复制过往指定记录的示例

netguestcn

      工作中遇到新增记录时复制上一条记录或倒数第二条记录（如白晚班倒班表，需复制倒数第二条记录），修改后成为新记录的情况。学习了论坛中诸多示例，利用ADO获取指定记录赋值给新记录，做了如下示例，希望能抛砖引玉。

      值得一提的是，示例中自定义函数可提取满足给定条件的记录集中最后一条记录或倒数第二条记录。

      顺祝国庆节快乐！

netguestcn

smilingkiss 发表于 2013-10-5 10:23
"tblSale"是表名称，“ID”，1，这两个参数是什么意思？烦请详解，本人菜鸟，谢谢了！

"ID"是"tblSale"表的主键(自动编号)不能赋值，1----复制最后一条记录（2-----复制倒数第二条记录）

smilingkiss

netguestcn 发表于 2013-10-4 16:24
setLastRecord-----------函数名
Me.frmChild.Form, "tblSale", "ID", 1---------函数所需参数

"tblSale"是表名称，“ID”，1，这两个参数是什么意思？烦请详解，本人菜鸟，谢谢了！

netguestcn

smilingkiss 发表于 2013-10-3 21:37
请教以下这一句什么意思？完整格式是什么？谢谢！setLastRecord Me.frmChild.Form, "tblSale", "ID", 1

setLastRecord-----------函数名
Me.frmChild.Form, "tblSale", "ID", 1---------函数所需参数

netguestcn

smilingkiss 发表于 2013-10-3 21:37
请教以下这一句什么意思？完整格式是什么？谢谢！setLastRecord Me.frmChild.Form, "tblSale", "ID", 1

调用自定义函数，setLastRecord为函数名，后面的是函数所需参数

smilingkiss

请教以下这一句什么意思？完整格式是什么？谢谢！setLastRecord Me.frmChild.Form, "tblSale", "ID", 1