[p]前言:[br]用过许多序号的方法,indentity 或 new id() ,都不好用,自己写了一个,这个序号的特点是:每次取相应表中的系统当天最大序号,如果当天无记录,则自动生成一个当天序号 [/p]
[p][br]1.建种子表,这个表用来保存各个表目前已使用到的最大序号.[br]--种子表[br]create table seed ([br]bm varchar(20) not null, --表名[br]bh varchar(12) not null, --种子编号[br]constraint pk_seed primary key(bm)[br])[br]go[/p]
[p]2.当我们建一个新表时,同时把这个表名记录到种子表中,如:[br]--向种子中表添加记录[br]insert into seed (bm,bh) values('tablename','200211070000')[br]go[/p]
[p]3.在数据库建一存储过程,自动生成新编号,此编号取当天时间,所以许多时候查询某些天的记录时,这个序号非常有用[br]--为参数传递来的某个表自动生成编号[br]if exists (select * from sysobjects where name='proc_getbh')[br]drop procedure proc_getbh [br]go[br]create procedure proc_getbh @bm varchar(20) [br]as[br]declare @bh char(12)[br]declare @today char(8)[br]begin[br]select @today=convert(char(8),getdate(),112)[br]select @bh=bh from seed where [url=mailto:bm=@bm]bm=@bm[/url][br]if @bh is null or left(@bh,8)<>@today[br]begin[br]select @bh=@today+'0000'[br]end [br]select @bh=left(@bh,8)+ right('0000' + ltrim(convert(char(4),convert(int,right(@bh,4)))+1),4)[br]update seed set [url=mailto:bh=@bh]bh=@bh[/url] where [url=mailto:bm=@bm]bm=@bm[/url][br]select @bh as bh[br]end[/p]
[p]4.实例如下:[br]'对表xxx自动生成新编号[br]set rs=conn.execute("proc_getbh @bm='xxx'")[br]这样,rs("bh")就是你得到的新编号[/p]