asp ¸´ÔӵıàºÅÔö³¤ÎÊÌâ ¼±£¡
ÎÒµÄCardID×Ö¶ÎÀï±£´æÓÐHM-CQ-050202-0001£¨ÆäÖÐ050202ÊDzúÆ·±àºÅ£¬0001ÊÇÁ÷Ë®ºÅ£©£¬»¹ÓÐ
HM-CQ-050404-0001¡¢
HM-CQ-100202-0001¡¢
HM-CQ-100404-0001¡¢
HM-CQ-200202-0001¡¢
HM-CQ-200404-0001¡¢ÕâЩ±àºÅ£¬ÎÒÔÚÌí¼ÓµÄʱºò£¬ÈçºÎÅжϷֱð¸ù¾Ý´ÓÊý¾Ý¿âÀï¶Á³öÀ´µÄÁ÷Ë®ºÅ×Ô¶¯Ôö³¤ÄØ£¿ÎÒ·ÅÔÚÏÂÀ±íÀïµÄ£¬¸ù¾ÝÏÂÀ±íÑ¡ÔñµÄ¹æ¸ñ²»Í¬¶øÏÔʾµÄ±àºÅ²»Í¬¡£×öÁ˺þû¹ÊÇ×ö²»³öÀ´£¬Ö»ºÃÇëÉçÇø¸ßÊÖ°ï°ï棡ллÁË£¡£¡£¡
°Ñ×îºó4λ³é³öÀ´£¬²åÈëÊý¾Ý¿âµÄʱºò£¬±àºÅÔö³¤ÓɳÌÐò¿ØÖÆ¡£
ÔÚÊý¾Ý¿âÀï×ö°É ÏÈÅжÏÓÐûÓÐ ÓеĻ°È¡³öºóËÄλת»»³ÉÊý×ÖÔÙ¼Ó1
SQL code:
if object_id('tb') is not null
drop table tb
go
create table tb(code nvarchar(20))
go
insert into tb values('HM-CQ-050404-0001')
insert into tb values('HM-CQ-100404-0001')
------------------------------------------------
if object_id('getCode') is not null
drop function getCode
go
create function dbo.getCode(@strPre nvarchar(20))
returns nvarchar (20)
as
begin
declare @id int
declare @code nvarchar(20)
select @id=1
if not exists(select top 1 1 from tb where left(code,12) = @strPre )
begin
select @code= @strPre+'-'+left('000'+ltrim(@id),4)
end
else
begin
select @code=@strPre+'-'+left('000'+ltrim(cast(max(right(code,4))+1 as int)),4) from tb
end
return (@code)
end
go
---------²âÊÔ
select dbo.getCo
Ïà¹ØÎÊ´ð£º
HTML code:
dim jf
set conn=server.createobject("adodb.connection")
connstr="Driver={Sql Server};Server="&Sqlip&";Database="&Sqldb&";Uid="& ......
<%On Error Resume Next
Set conn=Server.CreateObject("ADODB.Connection")
conn.begintrans
conn.Open ("Driver={SQL Server};server=(local);uid=sa;database=student;pwd=")
......
ÎÒ°ïѧУ×öÁËÒ»¸öÕ¾£®
ÔÚÐ£Ô°ÍøµÄÇé¿öÏ£¬Äܹ»µÇ½³É¹¦£¬ºǫ́ÕʺŶ¼ÄÜͨ¹ý£¬½øÈëºǫ́
µ«ÊÇÔÚÍâÍø£Á£ÄµÄÇé¿öÏ£¬Äܹ»µÇ½ºǫ́µÄÒ³Ãæ£¬Ò³ÃæÊÇ£Á£Ó£ÐÎļþ£®
µ«ÊÇÊäÈëÕʺźÍÃÜÂëµÄʱºò£¬ÍøÒ³ÔËÐкܾö¼ ......
ÓÐÄÄλ¸ßÊÖÓùýASP FCKÔÚÏß±à¼Æ÷ѽ£¬ËüÄǸöͼƬÉÏ´«¹¦ÄÜÔõôÅäÖÃѽ
ÄܸøÎÒ·¢¸öÄÜÓÃFCKÔÚÏß±à¼Âð£¿Ò»¶¨ÄÜÉÏ´«Í¼Æ¬¹¦ÄܵÄѽ£¬¼±Ñ½
Ö±½Óµ½¹Ù·½ÍøÕ¾È¥Ï¸ö¾Í¿ÉÒÔÁË£¬¹ØÓÚÉèÖÃô£¬Ö±½ÓGOOGLEÒ»ÏÂÄãµÄ°æ±¾ºÅ¾Í¿ÉÒÔÕÒµ ......