日期:2014-05-17 浏览次数:21413 次
<%
d=year(date)&right("0"&cstr(month(date)),2)&right("0"&cstr(day(date)),2)
sql="SELECT MAX(id) FROM 订单表 WHERE id LIKE '%"&d&"%'"
mjch2008=conn.execute(sql)(0)&""
err.clear
if len(mjch2008)=0 then'没有记录就是第一号(24点后自然是新的一天,数据库应该没有记录)
newID=d&"001"
else
num=replace(mjch2008,d,"")
num=right("00"&(cint(num)+1),3)'补足3位
newID=d&num'组合成新ID
end if
Response.Write newID
%>