I have some problem about the date time.I want to save a database with write by access that ID such as:yymm####
yy;year get two numbers(2008)->08
mm:month get two numbers->02
####:the order:0001,0002
the whole function:08020001
when i save a customer that,Id increase 08020002,...,08020010...
but step another month that increase 08030001,08030002,...,08030010..
and go on like that
and also the year increase(2009) :09010001,..09010010
Please help me to do that
thanks so much
Regards.
Hoang Phuc

please help to do that.I need that code or your know another page that give the same code.
thanks
Regards

Have you treid to write the code? If so post it and explain where you issue is, if not you need to at least give it a go.

To get the best out of forums - Come here and take peoples time for problems within solution, not to have complete solutions written for you

Wind is your friend
Matt
www.elitemarquees.com.au

please check the code that wrote
i try do it but not run
if trim(request("Option"))="AddOrder" then
        Set rs = Server.CreateObject("ADODB.Recordset")
       ' rs.Open "orderdetail", conn, 1, 2
          rs.CursorType = 1

          rs.LockType = 3

          rs.Open "orderdetail", Conn

        ' Adding data
            rs.AddNew
         if not rs.eof then
                    strmonth=Right("0" & DatePart("m", Now()), 2)
                    strday=day(date())
                    stryear=Right(DatePart("yyyy", Now()), 2)
                    NewOrderNumber=(rs("orderID")+1)
                    NewsOrderID=stryear & strmonth & strday & Right("0000" & NewOrderNumber, 4)
                    if not rs.eof then

                    'OrderID=session("OrderID")
                        NewOrderNumber=(rs("orderID")+1)
                        OrderID=NewsorderID

                    end if

                   rs("OrderID")= NewsorderID
                rs("CustomerId") = CustomerId
                rs("Item") = Items
                rs("Description") = Descriptions
                rs("Quantity")=Quantity
                rs("price") = price
                rs("UnitCurrency") = UnitCurrency
                rs("CreateDate") = CreateDate
                rs("ExpirationDate") = ExpirationDate
            response.Write(OrderID)
            'rs.Update
                    end if
            session("Neworderid")=NewsorderID
            session("Item")=items
            session("Descriptions")=Descriptions
            session("Quantity")=Quantity
            session("price")=price
            session("UnitCurrency")=UnitCurrency
            session("CreateDate")=CreateDate
            session("ExpirationDate")=ExpirationDate

        response.Redirect "ShowOrderdetail.asp"
        rs.Close
            Set rs = Nothing
    end if