ASP一个订单号新月份重新按001排列的问题，在线等 如果解决追加悬赏

asp生成产品订单号问题~

你的定单应该记录下在数据库,或者记录一个数据条目数字,使用数据库或者文本文件,注意锁定文件和数据库表,防止并发连接/写和读

你可以数据库查询下 定单号以070522开头的 数据中有多少记录,就是已经有几条了,之后就知道该用什么ABCD了字母了

你就想数据库里面的订单号这个字段取出来然后
累计加1就OK 了

<% session("p_beizhu") = "XZH"

function getDateStr() '返回 年,月 格式：yymm
dim yy,mm
yy = right(year(date()),2)
mm = month(date())
if len(mm) = 1 then mm = "0" & mm
getDateStr = yy & mm
end function

dim rs,sql,
sql = "select * from dneirong order by bianhao desc"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
if not rs.eof then
if mid(getDateStr,3,2)>mid(rs("bianhao"),6,2) then
bianhao = session("p_beizhu")&getDateStr()&"001"
else
bianhao = right(rs("bianhao"),3)+1

if len(bianhao) = 1 then
bianhao = "00" & bianhao
elseif len(bianhao) = 2 then
bianhao = "0" & bianhao
end if
bianhao = session("p_beizhu")&getDateStr()&bianhao

end if
end if
response.write bianhao

%>

if mid("getDateStr",3,2)>mid(rs("bianhao"),6,2) then
这段 有问题
if mid(getDateStr,3,2)>mid(rs("bianhao"),6,2) then
写成这样试试
再不行的话 转换一下数据类型
if Cint(mid(getDateStr,3,2))>Cint(mid(rs("bianhao"),6,2)) then

这样就可以了

感觉你的点麻烦
你可以这么写
ym=getDateStr()
sql="select isnull(max(bianhao),0) code from dneirong"
rs.open sql,conn,1,1
bianhao = getDateStr()&"001"
if clng(rs("code"))>clng(bianhao) then
bianhao =getDateStr()& right("00" & right(rs("code"),3)+1 ,3)
end if
bianhao = session("p_beizhu")&bianhao
response.write bianhao

---

昭阳区15053262871： asp+access怎样以(年+月+日+001)自动编号,当每增加一条记录就+1变成(年+月+日+002)？
爰翔种复： 一个自动编号的字段,一个存日期的字段. 你是需要这种格式的显示结果吧,如果是话,流水号就用自动编号就行了. 到时候读取数据库在页面显示的时候让日期字段值和流水自动编号的值合在一个字符里显示不就行了.

昭阳区15053262871： asp sql 订单号问题？
爰翔种复： 你这个代码不怎么完善!首先我用正常情况跟你解释这个代码:这个订单号采用的是年月日+序号的方式来组成订单号的.首先获得当前电脑的时间获取当前的年月日,然后和数据库里面的最大序号的前8位比较,也就是最大序号的年月日left(<%...

昭阳区15053262871： ASP 0201错误怎样解决 - ？
爰翔种复： 要解决此问题,请按照以下步骤操作: 1、单击开始,指向程序,指向管理工具,然后单击 Internet 信息服务.2、在控制台树中,单击默认 Web 站点.在显示窗格中,右键单击 默认 Web 站点,然后单击属性.3、在目录安全性选项卡的匿名访问和身份验证控制中,单击编辑. 4、在身份验证方法属性页中,单击去掉匿名访问的勾.5、确定.

昭阳区15053262871： asp中 怎么样 格式化数字1为001?？
爰翔种复： 'num 为 1-500的数字 function changerNo(num) response.write right(＂00＂&num,3) end function不明白可以加我Q 可直接 <%=right(＂00＂&num,3)%> num 为你的数字

昭阳区15053262871： 怎样将当前日期+订单号生成一个订单号 - ？
爰翔种复： 这个的方法需要用到几个函数的组合应用,分别是:判断当前日期的=Today( );判断当前年份的=year(当前日期 );判断当前月份的=month(当前日期 );还有if函数. 工具/原料:windows7,Excel2016 1、首先找一个单元格,最好是在表...

昭阳区15053262871： asp为何点击“下页”后,序号又从1开始,我要接上一序号 - ？
爰翔种复： 方法: 在循环打印记录的时候设置一个变量用来循环序号 ... order=((NoncePage-1)*rs1.pagesize)+1 '添加的代码 for j=1 to rs1.pagesize %>order=order+1 next %>

昭阳区15053262871： 求asp月份减1代码 - ？
爰翔种复： rq=dateadd(＂m＂,-1,＂2011-1-20＂) '你应该先获取 月份减去一个月 的日期,然后再从里面提取年月 response.write(year(rq)&month(rq))%> 而你自己写的代码只变成了数字的加减了,跟日期无关了

昭阳区15053262871： asp获取当前日期并自动加1个月如何写？
爰翔种复：dateadd(＂m＂,1,now()) m表示月 d表示日 ww表示周 n表示分钟 q表示季 y表示一年的日数 w表示一周的日数 h表示小时 s表示秒 yyyy表示年 dateadd函数,返回一个被改变的日期,也以是未来的日期(正数),也可以是过去的日期(负数)

昭阳区15053262871： asp如何实现按年份+月份查询 - ？
爰翔种复： 把年月分折开就行了,ptime1为年份,ptime2为月份选择值 where year(ptime)='＂&Request.form(＂ptime1＂)&＂' and Month(ptime)='＂&Request.form(＂ptime2＂)&＂'

昭阳区15053262871： ASP如何生成序号? - ？
爰翔种复： <%Rs.Open ＂Select top 1 订单号 form Products order by desc＂订单号=Rs(＂订单号＂) 读取最大的编号Rs.Close%>...