ASP自动生成编号的方法

2010-2-2 14:20:37 3908

0 ASP自动生成编号的方法用过许多序号的方法,indentity 或 new id() ,都不好用,自己写了一个,这个序号的特点是:每次取相应表中的系统当天最大序号,如果当天无记录,则自动生成一个当天序号。　　1.建种子表,这个表用来保存各个表目前已使用到的最大序号　　--种子表　　create table SEED ( 　　BM varchar(20) not null, --表名　　BH varchar(12) not null, --种子编号　　constraint PK_SEED primary key(BM) 　　) 　　go 　　　　2.当我们建一个新表时,同时把这个表名记录到种子表中,如: 　　--向种子中表添加记录　　　insert into SEED (BM,BH) values('tablename','200211070000') 　　go 　　3.在数据库建一存储过程,自动生成新编号,此编号取当天时间,所以许多时候查询某些天的记录时,这个序号非常有用。　　--为参数传递来的某个表自动生成编号　　if exists (select * from sysobjects where name='proc_getbh') 　　drop procedure proc_getbh 　　go 　　create procedure proc_getbh @BM varchar(20) 　　as 　　declare @BH char(12) 　　declare @TODAY char(8) 　　begin 　　select @TODAY=convert(char(8),getdate(),112) 　　select @BH=BH from SEED where BM=@BM 　　if @BH is null or left(@BH,8)<>@TODAY 　　begin 　　select @BH=@TODAY+'0000' 　　end 　　select @BH=left(@BH,8)+ right('0000' + ltrim(convert(char(4),convert(int,right(@BH,4)))+1),4) 　　update SEED set BH=@BH where BM=@BM 　　select @BH AS BH 　　end 　　4.实例如下: 　　'对表xxx自动生成新编号　　set rs=conn.execute("proc_getbh @BM='xxx'") 　　这样,rs("BH")就是你得到的新编号。商务虚拟主机：免费试用申请详情点击进入 0
2010-2-2 14:20:37　　评论淘帖0 举报相关推荐 • POWERLOGIC 自动重新编号的的解决方法 18352 • 自动编号 2154 • LabSQL如何按照自动编号编号查询？ 2892 • 为什么protel自动编号出问题 2644 • 大鼠尾部自动编号系统 0 • Altium Designer的元件Designator自动编号实现方法 1462 • LABVIEW如何实现自动编号 3978 • 关于自动生成高效的代码的方法分析和分享 3319 • POWER PCB元件清单自动生成的方法 16962 • 能不能用Python生成这样的编号呢 2036 1 个讨论