asp在日期后自动编号

我想实现的效果是2009920/001,下一个注册的是2009920/002,以下代码该如何修改能实现?谢谢!<%dimid,nrandomize()n=000+1id=... 我想实现的效果是2009920/001,下一个注册的是2009920/002,以下代码该如何修改能实现?谢谢!
<%dim id,n
randomize()
n=000+1
id=year(now())&month(now())&day(now())&n%>
<input type=text name=t1 value="<%=id%>">
谢谢大家!不过大家可能还没明白我的想法:我是想在网页的注册页上自动生成这个编号(2009920/001,下一个注册者自动是2009920/002,依次类推,不重复,就像数据库里的id自动编号一样),和其他的数据一起提交存入数据库. 在此特别感谢jdwz2009!
展开
 我来答
dsheen
2009-09-26 · TA获得超过898个赞
知道大有可为答主
回答量:1874
采纳率:0%
帮助的人:1333万
展开全部
<%
'2009
'fdate 文本
'fno 数字
'2009920
'0
'数据库建表2009,2个字段:fdate 文本,fno 数字
'初始化2009数据为:2009920,0

dim n
application.Lock()
sdate = year(now())&month(now())&day(now())
Set rsv=Server.CreateObject("ADODB.Recordset")
sqlv="select * from [2009]"
rsv.open sqlv,conn,1,3
if sdate <> rsv("fdate") then
n = 1
rsv("fdate")=sdate
rsv("fno")=1
else
n = rsv("fno")+1
rsv("fno") = n
end if
rsv.update
application.UnLock()
do while len(n)<3
n = "0"&n
loop

id=year(now())&month(now())&day(now())&n
%>
<input type=text name=t1 value="<%=id%>">
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
jdwz2009
2009-09-22 · TA获得超过1515个赞
知道大有可为答主
回答量:1464
采纳率:0%
帮助的人:0
展开全部
<%dim id,n
randomize()
n=Request("n")
n=n+1
if n<10 then
n="00"&n
elseif n>99 then
n=n
elseif n>9 then
n="0"&n
end if
id=year(now())&month(now())&day(now())&n%>
<form action="" name="ok" method="post">
<input type=text name=t1 value="<%=id%>">
<input type="hidden" name="n" value="<%=n%>">
<input name="submit" type="submit" value="注册">
</form>
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
开发者之路
2009-09-22 · TA获得超过910个赞
知道大有可为答主
回答量:2031
采纳率:0%
帮助的人:940万
展开全部
n=000+1不行吧,结果还是1
n=cstr("000") + cstr("1")
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
antxj1024
2009-09-24 · TA获得超过204个赞
知道答主
回答量:363
采纳率:0%
帮助的人:256万
展开全部
http://zhidao.baidu.com/question/118331220.html
看下我在这的回答,应该对你有所帮助
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式