⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 manage_order.asp

📁 商城源码程序(上海数字商城整站) 功能列表: 商品管理
💻 ASP
字号:
<!--#include file="conn.asp"-->
<%call time_out()%>
<%
if instr(session("proview"),"s1")=0  then
response.Write "<script language=javascript>alert('您无权操作!');window.location.href='index.asp';</script>"
response.end
end if%>

<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>订单管理</title>
</head>

<body>
<%zhuangtai=request.QueryString("zhuangtai")
action=trim(Request("action"))
ordernum=trim(Request("ordernum"))
user_name=trim(Request("user_name"))
%>
<table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td align="right">
                                      <select name="select" onChange="var jmpURL=this.options[this.selectedIndex].value ; if(jmpURL!='') {window.location=jmpURL;} else {this.selectedIndex=0 ;}" ><base target=Right> 
                                        <option value="manage_order.asp?zhuangtai=0" selected>--选择查讯状态--</option>
                                        <option value="manage_order.asp?zhuangtai=0" <%if zhuangtai=0 then%>selected<%end if%>>全部订单状态</option>
                                        <option value="manage_order.asp?zhuangtai=1" <%if zhuangtai=1 then%>selected<%end if%>>未作任何处理</option>
                                        <option value="manage_order.asp?zhuangtai=2" <%if zhuangtai=2 then%>selected<%end if%>>用户已经划出款</option>
                                        <option value="manage_order.asp?zhuangtai=3" <%if zhuangtai=3 then%>selected<%end if%>>服务商已经收到款</option>
                                        <option value="manage_order.asp?zhuangtai=4" <%if zhuangtai=4 then%>selected<%end if%>>服务商已经发货</option>
                                        <option value="manage_order.asp?zhuangtai=5" <%if zhuangtai=5 then%>selected<%end if%>>用户已经收到货</option>
    </select>	</td>
  </tr>
</table>

<table width="90%" border="0" align="center" cellpadding="0" cellspacing="1">
    <tr align="center" bgcolor="#6699cc">
      <td height="25">订单号</td>
      <td>下单用户</td>
      <td>支付方式</td>
      <td>送货方式</td>
      <td>订单状态</td>
      <td>下单日期</td>
    </tr>
<%if zhuangtai="" or zhuangtai=0 then
sql="select distinct(ordernum),user_name,zhuangtai,fkid,shid,addtime from [order] where zhuangtai<6 order by zhuangtai,addtime desc"
else
sql="select distinct(ordernum),user_name,zhuangtai,fkid,shid,addtime from [order] where zhuangtai="&zhuangtai&" order by zhuangtai,addtime desc"
end if

if action="search" then
sql="select distinct(ordernum),user_name,zhuangtai,fkid,shid,addtime from [order] where 1=1"
if ordernum<>"" then
sql=sql & " and ordernum like '%"&ordernum&"%'"
end if
if user_name<>"" then
sql=sql & " and user_name like '%"&user_name&"%'"
end if
sql=sql & " and zhuangtai<6 order by zhuangtai,addtime desc"
'else
'sql="select distinct(ordernum),user_name,zhuangtai,fkid,shid,addtime from [order] where zhuangtai<6 order by zhuangtai,addtime desc"
end if

set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
%>
  <tr>
    <td colspan="6">暂无订单信息</td>
  </tr>
<%	else
      rs.pagesize=15
      page = cint(request("page"))
      if page = "" then page = 1
      if not(isnumeric(page)) then page=1
      if page<1 then page=1
      if page >= rs.pagecount then page = rs.pagecount
      rs.absolutepage = page
    
for j=1 to rs.PageSize 
if (j mod 2)<>0 then
bgcolor="ffffff"
else
bgcolor="CBDDE7"
end if
  
  %>
	
    <tr align="center" bgcolor="<%=bgcolor%>">
      <td height="25">
	  <a href="javascript:;" onClick="javascript:window.open('view_order.asp?ordernum=<%=rs("ordernum")%>','','width=550,height=400,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;">
	  <%=rs("ordernum")%></a></td>
      <td><%=rs("user_name")%></td>
      <td>
		<%
		sqlv="select * from shop_fk where fkid="&rs("fkid")
		set rsv=server.CreateObject("adodb.recordset")
		rsv.open sqlv,conn,1,1
		response.write(rsv("fktype"))
		rsv.close:set rsv=nothing
		%>	  </td>
      <td>
		<%
		sqlv="select * from shop_songhuo where shid="&rs("shid")
		set rsv=server.CreateObject("adodb.recordset")
		rsv.open sqlv,conn,1,1
		response.write(rsv("shtype"))
		rsv.close:set rsv=nothing
		%>	  </td>
      <td>
      <%
		  select case rs("zhuangtai")
	case "1"
	response.write "未作任何处理"
	case "2"
	response.write "用户已经划出款"
	case "3"
	response.write "服务商已经收到款"
	case "4"
	response.write "服务商已经发货"
	case "5"
	response.write "用户已经收到货"
	end select%>	  </td>
      <td><%=rs("addtime")%></td>
    </tr>
    	  <%rs.movenext
if rs.eof then exit for
next
%>
<tr>
      <td height="25" colspan="6" align="center"> 
	                      <p align="center">共有记录<%=rs.recordcount%>条&nbsp;                   
                    <%=page%>/<%=rs.pagecount%>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <A href="<%request.servervariables("document_name")%>?page=<%=page-1%>&zhuangtai=<%=zhuangtai%>&action=<%=action%>&ordernum=<%=ordernum%>&user_name=<%=user_name%>">上一页</A> <A href="<%request.servervariables("document_name")%>?page=<%=page+1%>&zhuangtai=<%=zhuangtai%>&action=<%=action%>&ordernum=<%=ordernum%>&user_name=<%=user_name%>">下一页</A>&nbsp;&nbsp;&nbsp; 转到第 <SELECT onChange="window.location='?zhuangtai=<%=zhuangtai%>&action=<%=action%>&ordernum=<%=ordernum%>&user_name=<%=user_name%>&page='+this.value" name=gopage>              
                    <%for x=1 to rs.pagecount%>
                    <OPTION <%if x=page then%>selected<%end if%> value=<%=x%>><%=x%></OPTION>
                    <%next%>      
      </SELECT> 页      </td>
</tr>
<%
end if
rs.close
set rs=nothing

%>
</table>

<table width="90%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#6699CC">
  <tr>
    <td>&nbsp;</td>
  </tr>
  <form name="form1" method="post" action="manage_order.asp?action=search">
  <tr>
    <td align="center" bgcolor="#FFFFFF">
	
	<table width="80%" border="0" cellspacing="0" cellpadding="0">
      <tr align="center">
        <td>订单号:</td>
        <td><input name="ordernum" type="text" id="ordernum"></td>
        <td>用户名:</td>
        <td><input name="user_name" type="text" id="user_name"></td>
        <td>
          <input type="submit" name="Submit" value="查询">
        
        </td>
      </tr>
    </table></td>
  </tr></form>
  <tr>
    <td>&nbsp;</td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -