ASP自动生成编号的方法

2008-02-23 09:28:24来源:互联网 阅读 ()

新老客户大回馈,云服务器低至5折

  用过许多序号的方法,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")就是你得到的新编号。

标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇:FileSystemObject 对象

下一篇:IIS 安装配置全攻略-2