ASP网页设计ASP主动生成编号的办法

大家可以自己去看一看.可以说看得想呕吐.以前有次下了个动网来看.里面连基本内置函数的保护措施(函数没防御性)都没有.难怪经常补这个补那个了.可能现在.NET版会好点吧   用过很多序号的办法,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")就是你失掉的新编号。</p>  想法是和程序员的想法不一样的.至于为什么.大家去想一想.跟心理学有关的