设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 1231|回复: 9
打印 上一主题 下一主题

[窗体] 如何把窗体中选定要删除的记录保存在另一张表中?

[复制链接]
跳转到指定楼层
1#
发表于 2008-3-4 07:03:48 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
如题:如何把窗体中选定要删除的记录保存在另一张表中?

比如说这条记录保存在A表中,我不想彻底删除这条记录,只是把它转移到B表中,相当于B表就是一个回收站似的,B表中的格式与A表一模一样。

有相关的例子吗?哪位朋友帮帮我一下,好吗?

在此先谢了。
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2008-3-4 08:14:03 | 只看该作者
用追加查询............

点击这里给我发消息

3#
发表于 2008-3-4 08:51:35 | 只看该作者
如果大家都是数据表,复制 粘贴也是一个办法
4#
发表于 2008-3-4 09:26:11 | 只看该作者
我觉得最好还是在表中做个标识,标识该记录已经删除,计算时排除计算即可。
5#
发表于 2008-3-4 09:31:22 | 只看该作者
感觉这个问题类似结转,论坛上一直没有例子。
主表的数据过多对查询速度是有影响。
6#
发表于 2008-3-4 09:32:11 | 只看该作者
原帖由 fan0217 于 2008-3-4 09:26 发表
我觉得最好还是在表中做个标识,标识该记录已经删除,计算时排除计算即可。

同感
就按楼主的意思办的话
1。先追加
2。删除
7#
 楼主| 发表于 2008-3-4 19:52:10 | 只看该作者
我曾采用过追加的方式,但涉及到一对多,一对一等关系,没有成功。
最主要的是,如果是追加后再删除的话,提示太多,影响效率。

可以用RUNSQL来解决吗?如果可以,代码又该怎么写呢?
8#
 楼主| 发表于 2008-3-5 19:06:33 | 只看该作者
dim SQL As string
SQL="insert into tblHs102base " & _
          "select * from tbl102base " &_
          "where (tbl102base.AA)=[froms]![frm102ksfind]![txtpinghao] "
docmd.runsql SQL

请问,上述代码错在哪里呢,调试来无法通过。表tbl102base和tblHs102base都以自动编号为主键。

在此先谢了。
9#
 楼主| 发表于 2008-3-7 21:51:37 | 只看该作者
请问,要想屏蔽追加查询的提示,程序代码如何写呢?
10#
发表于 2008-3-7 23:31:14 | 只看该作者

使用SetWarnings关闭系统提示

在代码的Docmd.Runsql SQL前面加一句DoCmd.SetWarnings False就可以了;要恢复系统提示就在Docmd.Runsql SQL后面再补一句DoCmd.SetWarnings True
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-9-20 16:52 , Processed in 0.076212 second(s), 34 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表