UC知道asp中想提交个表单,其中有个字段想要由日期和后边自动递增组成
来源：百度知道 编辑：UC知道 时间：2024/06/18 06:58:45
asp中想提交个表单,其中有个字段想要由日期和后边自动递增组成,例如这样的代码<%
dim id,n
randomize()
n=int((99-10+1)*rnd(now())+10)
id=year(now())&month(now())&day(now())&hour(now())&minute(now())&second(now())&n
%>
<input type=text name=t1 value="<%=id%>">
但是后边的n想要自动递增的,然后到第二天还从001开始,2009224001,2009224002,2009224003......到第二天的时候这样2009225001,2009225002,2009225003......合适的答案追分,先谢谢了~
有没有简单点的答案啊?最好直接帮我把表单的代码也都写下啊~!
dim id,n
randomize()
n=int((99-10+1)*rnd(now())+10)
id=year(now())&month(now())&day(now())&hour(now())&minute(now())&second(now())&n
%>
<input type=text name=t1 value="<%=id%>">
但是后边的n想要自动递增的,然后到第二天还从001开始,2009224001,2009224002,2009224003......到第二天的时候这样2009225001,2009225002,2009225003......合适的答案追分,先谢谢了~
有没有简单点的答案啊?最好直接帮我把表单的代码也都写下啊~!
添加记录前取出当天最大者加1
<%
yy=year(date())
mm=month(date())
if len(mm)=1 then mm="0"&mm
dd=day(date())
if len(dd)=1 then dd="0"&dd
'response.Write(yy)
'response.Write(mm)
'response.Write(dd)
new_date=yy&mm&dd
sql_id_test="select id_order from order_goods where left(id_order,10)='"&new_date&"' order by time_order desc"
set rs_id_test=conn.execute(sql_id_test)
if rs_id_test.eof then
new_date=yy&mm&dd&"001"'这个是初始化~~当数据库中某一天无任何订单时，就从001开始
else
num=right(rs_id_test("id_order"),5)
new_date=yy&mm&dd&num
'new_date=new_date+1
'response.Write(new_date)
end if
id_order=new_date+1
%>