当前位置: 代码迷 >> VBA >> access窗体里复制记录解决思路
  详细解决方案

access窗体里复制记录解决思路

热度:7943   发布时间:2013-02-26 00:00:00.0
access窗体里复制记录
报价单窗体,有时候会重新修改老报价单,为了更科学,所以不能在原报价单上做更改, 所以,做了一个'复制报价单'的按钮,这时候自动生成的新报价单号为原单号+1,在这个新窗体里修改信息,并作为一条新的记录保存到报价单表里,请问如何实现?

现在用向导生成的复制代码如下:(提示有错误)

  DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
  DoCmd.DoMenuItem acFormBar, acEditMenu, 2, , acMenuVer70
  DoCmd.DoMenuItem acFormBar, acEditMenu, 5, , acMenuVer70 'Paste Append

提示错误如下:
实时错误代码“-2147352567”(80020009)
update,cancelupdate方法,与之对应的addnew,edit方法是必要的。

并且在粘贴时发生错误,自动生成一个新表,里面是我想要复制的记录。
debug时的错误在afterupdate方法里~~~


------解决方案--------------------------------------------------------
信息不全。

猜测一下,如果你窗体上绑定的是数据表,你直接修改窗体上的字段内容的话,相当于修改表,那么你修改的值是否是合法值?如果值不合法,很可能会报这个错误。
------解决方案--------------------------------------------------------
你最好还是自己写复制一个记录,插入一个记录。
本人的做法就是所有时间存在另外一个A.mdb里面,在另外一个B.mdb写操作界面,读取A数据,保存数据时候保存到A里面,这样,就可以很方便的利用旧记录的数据,修改关键字和一些数据后,直接保存为一个新的记录。
  相关解决方案