Office中国论坛/Access中国论坛

标题: 怎么用代码实现粘贴表相关参数，谢谢！！ [打印本页]

作者: sxb2007 时间: 2020-7-7 09:15
标题: 怎么用代码实现粘贴表相关参数，谢谢！！
[attach]63832[/attach]
如图所示，是一个粘贴表的粘贴提示选项，怎么用代码实现，自动输入【表名称】及【粘贴选项】参数，而不提示这个【粘贴表方式】的弹出菜单选项。从而实现粘贴过程。
谢谢！！！！！！！

作者: roych 时间: 2020-7-7 11:17
select * into 新表 from 旧表 where 1=0       ---这个仅粘贴结构。
select * into 新表 from 旧表                         ---这个粘贴结构和数据。
insert into 新表 select * from 旧表                ---这个将数据追加到已有的表。
至于单选框和文本框的话，请自行创建窗体实现。

作者: sxb2007 时间: 2020-7-7 11:32
本帖最后由 sxb2007 于 2020-7-7 11:40 编辑

这种粘贴方式会丢失表的主键和索引。不能完整复制一个表的所有参数，我问的这个是通过鼠标右键复制在粘贴表结构，则不会丢失主键及索引等表参数。谢谢您的回复！！
还有一个方法可以完整复制一个表，但是复制时，会把表的结构及数据全部复制。如果表的数据过多，则复制时间会变长，也不可取。
DoCmd.CopyObject , Newtbl, acTable, TblName '先复制一个表
谢谢！！

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