设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12下一页
返回列表 发新帖
查看: 6997|回复: 14
打印 上一主题 下一主题

[窗体] 如何将表中字段名类型为自动编号每次都从1开始

[复制链接]
跳转到指定楼层
#
发表于 2010-9-15 16:27:41 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
50金钱
如何将表中字段名(id)类型为自动编号每次都从1开始,我每次导数据都是将需要的数据从主表中提取到临时表中,然后再导出到excel,因此首先需要删除临时表中数据。但是(id)就不能从1开始了,请问有没有什么方法使该字段每次在删除数据后,在导入新数据时都从1开始
谢谢
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
14#
发表于 2013-5-28 07:56:13 | 只看该作者
学习了!!!
回复

使用道具 举报

13#
发表于 2011-1-9 20:27:40 | 只看该作者
学习了
回复

使用道具 举报

12#
发表于 2010-12-25 10:22:16 | 只看该作者
感谢分享
回复

使用道具 举报

11#
 楼主| 发表于 2010-9-17 13:30:13 | 只看该作者
无人帮助,还是取小宝老师的答案吧,毕竟能够直接应用到系统中
回复

使用道具 举报

10#
 楼主| 发表于 2010-9-17 08:07:11 | 只看该作者
如果说比较适合我的系统的话小宝老师的代码适合。但是todaynew 老师提供的在范例和代码上更加完善一些。请问tmtony 老师能否将奖金平分给上述二位老师,谢谢
回复

使用道具 举报

9#
发表于 2010-9-16 16:09:55 | 只看该作者
谢谢大家的帮助,我挨个试试看哪个更好
谢谢
yanwei82123300 发表于 2010-9-16 14:39

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
回复

使用道具 举报

8#
 楼主| 发表于 2010-9-16 14:39:37 | 只看该作者
谢谢大家的帮助,我挨个试试看哪个更好
谢谢
回复

使用道具 举报

7#
发表于 2010-9-16 13:02:56 | 只看该作者
本帖最后由 todaynew 于 2010-9-16 13:11 编辑

没有测试,你试试看:

sub 自动编号(tbname as string,MyID as string)
dim strsql as string
strsql = "ALTER TABLE " & tbname & " DROP COLUMN " & MyID
CurrentDb.Execute strsql
strsql = "ALTER TABLE " & tbname & " ADD COLUMN (" & MyID & " Counter)"
CurrentDb.Execute strsql
end sub

如若不中,请参见以下地址的实例:
http://accessoft.com/blog/article-show.asp?userid=10802&Id=4437


回复

使用道具 举报

点击这里给我发消息

6#
发表于 2010-9-16 13:00:10 | 只看该作者
每次使用临时表前,可用代码进行一次压缩和修复数据库
回复

使用道具 举报

5#
 楼主| 发表于 2010-9-16 10:59:44 | 只看该作者
tmtony 老师能给个例子?谢谢
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-11-1 11:48 , Processed in 0.097550 second(s), 34 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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