ad_orderno.asp

凡人网络购物系统 v8.0 中文版

<!--#include file="conn.asp"-->
<!--#include file="ad_chk.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href=inc/css.css rel=STYLESHEET type=text/css>

<%
selectid=request("selectid")
no=request("type")
if no="" then no=1
if request("action")="del" then
conn.execute "delete from venshop_basket where basket_id in ("&selectid&")"
response.Redirect "ad_orderno.asp?type="&no
response.end
end if
%>
<%%>
<div class="help">备注：<br><%if no=2 then%>此处是当天以前已登录客户加入购物车的信息，不建议删除，因为你的客户可能在此登录，底部有全选删除连接！<%else%>此处是当天以前未登录客户加入购物车的信息，可以放心删除，底部有全选删除连接！<%end if%></div>
<table border="0" cellpadding="5" cellspacing="1" bgcolor="#C8C8C8">
<tr><td align="center" bgcolor="#F0F0F0" width="200">产品</td>
<td align="center" bgcolor="#F0F0F0" width="75">用户</td>
<td align="center" bgcolor="#F0F0F0" width="150">日期</td>
<td align="center" bgcolor="#F0F0F0" width="75">数量</td>
<td align="center" bgcolor="#F0F0F0" width="75">单价</td>
<td align="center" bgcolor="#F0F0F0" width="75">选择</td></tr>
<form name="form" method="post" action = "ad_orderno.asp?action=del&type=<%=no%>">
<%set rs=server.CreateObject("adodb.recordset")
nowdate=date()
sql="select * from venshop_basket where basket_check=0 and basket_date<#"&nowdate&"# order by basket_id desc"
rs.open sql,conn,1,1
if rs.eof And rs.bof then%>
<tr><td align="center" bgcolor="#FFFFFF" width="575" colspan="6">No Date</td></tr>
<%
else
do while not rs.eof
username=rs("user_name")
set rsu=server.CreateObject("adodb.recordset")
sql="select * from venshop_user where username='"&username&"'"
rsu.open sql,conn,1,1
if no=2 then
if not rsu.eof then
%>
<tr><td align="center" bgcolor="#FFFFFF" width="200"><a href=views.asp?hw_id=<%=rs("hw_id")%> target=_blank><%=rs("hw_name")%></a></td>
<td align="center" bgcolor="#FFFFFF" width="75"><%=rs("user_name")%></td>
<td align="center" bgcolor="#FFFFFF" width="150"><%=rs("basket_date")%></td>
<td align="center" bgcolor="#FFFFFF" width="75"><%=rs("basket_count")%></td>
<td align="center" bgcolor="#FFFFFF" width="75"><%=trim(rs("hw_price"))%></td>
<td align="center" bgcolor="#FFFFFF" width="75"><input name="selectid" type="checkbox" id="selectid" value="<%=rs("basket_id")%>"></td></tr>
<%end if
else
if rsu.eof and rsu.bof then
%>
<tr><td align="center" bgcolor="#FFFFFF" width="200"><a href=views.asp?hw_id=<%=rs("hw_id")%> target=_blank><%=rs("hw_name")%></a></td>
<td align="center" bgcolor="#FFFFFF" width="75">未登录客户</td>
<td align="center" bgcolor="#FFFFFF" width="150"><%=rs("basket_date")%></td>
<td align="center" bgcolor="#FFFFFF" width="75"><%=rs("basket_count")%></td>
<td align="center" bgcolor="#FFFFFF" width="75"><%=trim(rs("hw_price"))%></td>
<td align="center" bgcolor="#FFFFFF" width="75"><input name="selectid" type="checkbox" id="selectid" value="<%=rs("basket_id")%>"></td></tr>
<%end if
end if
rsu.close
set rsu=nothing
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</table>全选  <input type="checkbox" name="checkbox2" value="Check All" onClick="mm()">
<input type="submit" name="Submit" value="删除" onClick="return test();">
<script language=javascript>
function test()
{
  if(!confirm('确认进行删除操作吗？')) return false;
}

function mm()
{
   var a = document.getElementsByTagName("input");
   if(a[0].checked==true){
   for (var i=0; i<a.length; i++)
      if (a[i].type == "checkbox") a[i].checked = false;
   }
   else
   {
   for (var i=0; i<a.length; i++)
      if (a[i].type == "checkbox") a[i].checked = true;
   }
}
</script><table cellSpacing="0" cellPadding="3" border="0" width="500"><tr><td height="20"></td></tr>
<tr><td bgcolor="#F2F2F2"><p style="LINE-HEIGHT: 150%"><font color="#FF0000">凡人网络购物系统V8.0 版权所有:</font><a target="_blank" href="http://www.venshop.com"><font color="#FF0000">凡人网络VenShop.Com</font></a><font color="#FF0000"><br>客服电话:[phone]&nbsp; QQ:57152557/5404818 Email/Msn:</font><a href="mailto:[e-mail]"><font color="#FF0000">[e-mail]</font></a></td>
</tr></table>