access 自动增长自动编号显示2位

来源：蜘蛛抓取(WebSpider) 时间：2012-04-07 17:55 标签： access 自动增长
7x24小时服务热线：+86-
Access自动编号递增到最大数值后如何动作
日期： 17:33
来源：天鹰数据
作者：天鹰数据_技术部
故障现象：在Access中，如果自动编号递增到的最大数后还需递增，这会出现什么情况？
解决方法：自动编号的数据类型是长整型。如果自动编号从1开始递增，一旦到达会自动跳转到-，然后继续增大一直到0。如果再次到达了1，而用户在设计表的时候定义了自动编号字段的&索引&属性为&有(无重复)&，则系统会提示错误。如果没有设置，则自动编号继续从1开始增加。(责任编辑：天鹰_Jack)如何插入Access库记录后马上得到自动编号值－虚拟主机资讯|虚拟主机动态
产品服务快速通道
----------------
==域名注册==
英文域名注册
中文域名注册
==网站推广==
==虚拟主机==
----------------
双线路虚拟主机
基本型虚拟主机
商用型虚拟主机
论坛型虚拟主机
功能型虚拟主机
Vip合租虚拟主机
虚拟主机性能对比
虚拟主机免费试用
机房速度测试
----------------
==租用托管==
服务器租用
----------------
==企业邮局==
购买企业邮局
----------------
==付款方式==
----------------
==联系我们==
您当前位置：->-> ->
如何插入Access库记录后马上得到自动编号值
作者：网友供稿
　　西部数码-全国虚拟主机10强！20余项管理功能,全国领先!第6代双线路虚拟主机,南北访问畅通无阻!可在线rar解压,自动数据恢复设置虚拟目录等.免费赠送访问统计,企业邮局.Cn域名注册10元/年,480元起,免费试用7天,满意再付款!P4主机租用799元/月.月付免压金!
文章页数：&
首先须保证获得记录集的方式支持bookmark属性，如1，3
插入一条带自动编号字段的记录后，获取该记录的bookmark属性值
temp = rs.bookmark
rs.bookmark = temp
response.write rs.fields(&id&).value
文章整理：西部数码--专业提供、服务
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!
文章页数：&
??????????
??????????
版权申明：本站文章均来自网络，如有侵权，请联系我们，我们收到后立即删除，谢谢！
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有。
版权所有 西部数码()
CopyRight (c) 2002~ all right reserved.
公司地址：四川省成都市金牛区一环路北一段99号环球广场24楼　邮编：610031
电话总机：028-08 38
售前咨询：总机转201 202 203 204 206 208
售后服务：总机转211 212 213 214
财务咨询：总机转224 223 传真：028- 财务QQ：
售前咨询QQ：2182518
售后服务QQ：扫二维码下载作业帮
1.75亿学生的选择
下载作业帮安装包
扫二维码下载作业帮
1.75亿学生的选择
用access如何实现我随机输入2个字母,自动给出2个字母+4位数字A列的字母随意组合 但是B列显示字母加上4位数字 要求：B列根据A列的字母自动编号（B列为自动显示,A列为空时B列也为空） 例：A列 B列aa aa0001aa aa0002ba ba0001cc cc0001 上面的例子只是说明要达到的效果,没有固定死格式,
赠送003071
扫二维码下载作业帮
1.75亿学生的选择
首先你要说明一下,这个功能在哪个里面用的?是access里建立输入窗体时用的还是其他的.
我要建立8W个左右的代号 前面2位可以是数字
你的意思是无论什么手段都可以，只要输入8W符合要求的记录就可以？
花了点时间写了个代码，考虑到易用性，用的vbs语言编写的，代码如下：
Const adUseClient = 3 '下行定义数字的位数，比如万就是5位数 Const zCount = 5 iCurNum = 0 '以下定义一共生成多少个数字，此处为8万 recCount = 80000
Function getSn(str)
iCurNum = iCurNum+1
i = Len(CStr(iCurNum))
getSn = str & String(zCount-i,"0") & CStr(iCurNum) End Function
Sub main()
fpath="e:\test\test.mdb"
Set Conn=CreateObject("adodb.connection")
Set Rs=CreateObject("ADODB.Recordset")
Conn.CursorLocation = adUseClient
strCon="DBQ="&fpath&";DRIVER={Microsoft Access Driver (*.mdb)};"
Conn.Open strCon
For i = 1 To recCount
'以下代码中的aa你可以设置为你需要的字符，也可以为空""，那样生成的就全是数字
conn.Execute "insert into test(snum) values('" &
getSn("aa") & "')"
Conn.Close
Set Rs = Nothing
Set Conn = Nothing End Sub
为您推荐：
其他类似问题
扫描下载二维码请问access子窗体列表如何显示自动序号
& 产品名称
如果删除第4条记录，那么第5条记录序号变成4，如果删除第1条记录，那么2345，显示成1234，请问老师怎么做？谢谢！
--------------------------------------------------------------这样的连号对业务有什么现实意义吗?
如果确实需要连号，那只有自己用VBA、SQL语句处理了。
就像我上面写的语句类似。

我要回帖

更多关于 access 自动增长 的文章

 

随机推荐