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
Ïà¹ØÎÊ´ð£º
conn.asp
<%
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&server.MapPath("Connt ......
<%if request.QueryString("start") <>"" then%>
<%if cint(start)>0 then%>
<a href="search.asp?q= <%=q%>&start= <%if request.Query ......
½¨ÁËÒ»¸öÕ¾µã£¬ÀïÃæÓÐ login.aspx. events.aspx µÈµÈ ÆäËûµÄÒ³Ãæ¡£
µ«ÊÇÎÒµ÷ÊÔ ÆäËûÒ³ÃæµÄʱºò£¬±Ä³öÀ´µÄ×ÜÊÇ login.aspx Ò³Ãæ¡£
¸Õѧasp ÇëÖ¸½Ì
ÄãÉèÖÃÆðʼҳÁ˰ɡ£¡£
¶÷ÔõôȡÏûÄØ£¿
Òªµ ......
<%
Sql="select top 8 * from NewsData where d_classid in (select classid from NewsClass where ParentID=16)"
Rs.Open Sql, conn, 1,1
Do Until Rs.Eof
......