Office中国论坛/Access中国论坛

标题: 求助:复制的表怎么才能添加修改记录 [打印本页]

作者: cjing2000 时间: 2009-12-10 07:54
标题: 求助:复制的表怎么才能添加修改记录
我是新手.在access2007应用中.同一库中需要很多结构相同但不同名的表.如果用一个表导出再导入后更名的方法.所得到的表可正常添加修改记录.可这需要手工完成.想在程序中用命令做.从论坛中学到用:[DoCmd.CopyObject , "表2", acTable, "表1"]可以复制
但不能添加修改记录.提示说找不到表.问题在那请幇助.
sql = "select * from " & un & "药品出库记录表"
Set rst = New ADODB.Recordset
rst.ActiveConnection = CurrentProject.Connection
rst.CursorType = adOpenKeyset
rst.LockType = adLockOptimistic
rst.Open sql
With rst
.AddNew
!名称 = Me.Text名称
!单价 = num1
!数量 = Me.Text数量
!合计 = num1 * Me.Text数量
!时间 = mydate
!姓名 = Me.Text姓名
!说明 = Me.Text说明
.Update
End With
rst.Close
Set rst = Nothing成功.但复制得来的表用ADODB.Recordset方法确不能添加修改记录.

作者: cjing2000 时间: 2009-12-10 10:15
问题解决.问题出在复制表的表名上.原用两个字符串&后的字符串作新表表名.虽然看上去表名正确.但卻查询不到.
现改用单个字符串的表名则操作正常了.我是新手'在字符串处理上有问题'具体问题我不知道'但从教材上见过说处理字符串好像有个首尾部的空格问题.

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)