怎么样生成唯一的如以下类型的商品号:
AA200703271234

解决方案 »

  1.   

    前面固定的,中间有日期生成,后面是流水号,先查DB在加1了
    最后把它们连接就好了     MM=Month(Date)
                     DD=Day(Date)
                     if MM<10 and DD>=10 then
            dateid=Year(Date)&"0"&MM&DD
         elseif MM>=10 and DD<10 then
            dateid=Year(Date)&MM&"0"&DD
         elseif MM<10 and DD<10 then
            dateid=Year(Date)&"0"&MM&"0"&DD
         else
            dateid=Year(Date)&MM&DD
         end if
     set myrs=server.createobject("adodb.recordset")
                     set rec=server.createobject("adodb.recordset")
                     sql="select QUOTEID from Quote_Main where QUOTEID like '%"&dateid&"%'"
                     myrs.open sql,conn,1,3
                     if not myrs.eof then 
                     sql="select max(QUOTEID) as QUOTEID from Quote_Main where QUOTEID like '%"&dateid&"%'"
                     rec.open sql,conn,1,3
                     str=trim(rec("QUOTEID"))
                     ls=Right(str,12)
                     sn=Cstr(ls)+1
                     lr=left(str,2)
                     quote_id=lr&sn
                     else
                     quote_id="QO"&dateid&"0001"
                     end if