www.gusucode.com > 盘锦DJ舞曲网 商业版源码程序 > admin/goods_list.asp
<!--#include file="../conn.asp"-->
<!--#include file="loginOK.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>订单列表</title>
<style type="text/css">
<!--
.toptext {color: #FFFFFF}
body,td,th {
font-size: 12px;
}
a:link {
text-decoration: none;
color: #282828;
}
a:visited {
text-decoration: none;
color: #282828;
}
a:hover {
text-decoration: underline;
color: #FF0000;
}
a:active {
text-decoration: none;
color: #282828;
}
-->
</style>
</head>
<body topmargin="0" leftmargin="0" rightmargin="0">
<form name="form1" method="post" action="goods_save.asp?action=dele" style="display:inline">
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#1BA3D6">
<tr>
<td height="25" colspan="8" align="center" bgcolor="#2F6A8E"><font color="#FFFFFF">订 单 列 表</font></td>
</tr>
<tr>
<td width="5%" height="25" align="center" bgcolor="#FFFFFF">选择</td>
<td width="20%" height="25" align="center" bgcolor="#FFFFFF">会员名</td>
<td width="20%" height="25" align="center" bgcolor="#FFFFFF">专集名</td>
<td width="10%" align="center" bgcolor="#FFFFFF">歌曲数量</td>
<td width="10%" height="25" align="center" bgcolor="#FFFFFF">订购数量</td>
<td width="10%" height="25" align="center" bgcolor="#FFFFFF">收款情况</td>
<td width="10%" height="25" align="center" bgcolor="#FFFFFF">发货情况</td>
<td width="5%" height="25" align="center" bgcolor="#FFFFFF">详细</td>
</tr>
<%
set rs=server.createobject("adodb.recordset")
sql="select * from usergoods order by id desc"
rs.open sql,conn,1,1
i=0
if request("page")="" then
page=1
else
page=cint(request("page"))
end if
if rs.eof then
response.write "没有记录"
response.end
end if
Total_news=rs.recordcount
rs.pagesize=20
if page>rs.pagecount then
page=rs.pagecount
end if
rs.absolutepage=page
pagetotal=rs.pagecount
do while not rs.eof and i<20
i=i+1
%>
<tr>
<td height="25" align="center" bgcolor="#FFFFFF"><input type="checkbox" name="id" value="<%=rs("id")%>" /></td>
<td height="25" align="center" bgcolor="#FFFFFF"><%=rs("username")%></td>
<td height="25" align="center" bgcolor="#FFFFFF"><%=rs("specialname")%></td>
<td height="25" align="center" bgcolor="#FFFFFF"><%=rs("musicmun")%> 首</td>
<td height="25" align="center" bgcolor="#FFFFFF"><%=rs("cdmun")%> 张</td>
<td height="25" align="center" bgcolor="#FFFFFF"><%if rs("usermoney")=false then%><a href="goods_save.asp?action=men&id=<%=rs("id")%>&m=true"><font color="#FF0000">未收款</font></a><%else%><a href="goods_save.asp?action=men&id=<%=rs("id")%>&m=false"><font color="#0033FF">款已收</font></a><%end if%></td>
<td height="25" align="center" bgcolor="#FFFFFF"><%if rs("goodssend")=false then%><a href="goods_save.asp?action=send&id=<%=rs("id")%>&s=true"><font color="#FF0000">未发货</font><%else%><a href="goods_save.asp?action=send&id=<%=rs("id")%>&s=false"><font color="#0033FF">货已发</font><%end if%></td>
<td height="25" align="center" bgcolor="#FFFFFF"><a href="goods_info.asp?id=<%=rs("id")%>" target="_blank">详细</a></td>
</tr>
<%
rs.movenext
loop
rs.close
set rs=nothing
%>
<tr>
<td height="25" bgcolor="#FFFFFF"><input type=checkbox onclick=sel('id')>
<script language="javascript">
function sel(a){
o=document.getElementsByName(a)
for(i=0;i<o.length;i++)
o[i].checked=event.srcElement.checked
}
</script>
</td>
<td height="25" colspan="7" bgcolor="#FFFFFF"><input type="submit" name="delete_act" onClick="{if(confirm('确定删除选定信息吗?删除后将不可恢复')){this.document.cybd.submit();return true;}return false;}" value="删除"></td>
</tr>
</table>
</form>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<form name="form111" method="post" action="?">
<td height="25" align="center"><font color="#0066CC"> <%
if Page > 1 Then%>
<a href="?page=1">首页 </a>| <a href="?page=<%=Page-1%>">上一页 </a>|
<%else%>
<font class=gray>首页 | 上一页 |</font>
<%end if%>
<%if Page<>pagetotal then%>
<font color="#999999"><a href="?page=<%=Page+1%>">下一页</a> | </font><font color="#999999"><a href="?page=<%=pagetotal%>">末页</a> |</font>
<%else%>
<font class=gray>后一页 | 末页</font>
<%end if%>
<%response.Write("共"&Total_news&"条记录 页次: "&Page&"/")%>
<%response.Write(""&pagetotal&"")%>
转到：
<input name="page" type="text" id="page" style="width:20px" value="<%=page%>">
<input type="submit" name="Submit" value="GO..">
</td>
</form>
</tr>
</table>
</body>
</html>