日期:2014-05-17 浏览次数:21256 次
<% 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 %>