电脑爱好者,提供IT资讯信息及各类编程知识文章介绍,欢迎大家来本站学习电脑知识。 最近更新 | 联系我们 RSS订阅本站最新文章
电脑爱好者
站内搜索: 
当前位置:首页>> Asp>>ASP自动生成编号的方法及程序代码:

ASP自动生成编号的方法及程序代码

来源:网络 | 2007-4-18 | (有2473人读过)

用过许多序号的方法,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")就是你得到的新编号。(aspcool)  
Asp热门文章排行
网站赞助商
购买此位置

 

关于我们 | 网站地图 | 文档一览 | 友情链接| 联系我们

Copyright © 2003-2020 电脑爱好者 版权所有 备案号:鲁ICP备09059398号