cp.asp

网络商城系统

<!--#include file="conn.asp"-->
<%
if session("user")="" then
response.write "<script language=javascript>alert('购物车没有任何商品！');window.location.reload('javascript:window.close()')</script>"
response.end
end if
user=session("user")
set rs=server.createobject("adodb.recordset")
sql="select * from basket where user_name='"&user&"' and basket_check=false"
rs.open sql,conn,3,3
if rs.eof then
response.redirect "order.asp"
else
do while not rs.eof
rs.delete
rs.update
rs.movenext
loop
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
response.redirect "order.asp"
%>