前言:
用過(guò)許多序號(hào)的方法,indentity 或 new id() ,都不好用,自己寫(xiě)了一個(gè),這個(gè)序號(hào)的特點(diǎn)是:每次取相應(yīng)表中的系統(tǒng)當(dāng)天最大序號(hào),如果當(dāng)天無(wú)記錄,則自動(dòng)生成一個(gè)當(dāng)天序號(hào)

1.建種子表,這個(gè)表用來(lái)保存各個(gè)表目前已使用到的最大序號(hào)
--種子表
create table SEED (
BMvarchar(20) not null, --表名
BH varchar(12) not null, --種子編號(hào)
constraint PK_SEED primary key(BM)
)
go

2.當(dāng)我們建一個(gè)新表時(shí),同時(shí)把這個(gè)表名記錄到種子表中,如:
--向種子中表添加記錄
insert into SEED (BM,BH) values('tablename','200211070000')
go

3.在數(shù)據(jù)庫(kù)建一存儲(chǔ)過(guò)程,自動(dòng)生成新編號(hào),此編號(hào)取當(dāng)天時(shí)間,所以許多時(shí)候查詢(xún)某些天的記錄時(shí),這個(gè)序號(hào)非常有用
--為參數(shù)傳遞來(lái)的某個(gè)表自動(dòng)生成編號(hào)
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.實(shí)例如下:
'對(duì)表xxx自動(dòng)生成新編號(hào)
set rs=conn.execute("proc_getbh @BM='xxx'")
這樣,rs("BH")就是你得到的新編號(hào)