<!--#include file="objConn_Open.inc"-->
<% 
			Dim strListNum
			strListNum = Request.QueryString("ListNum")
						
			objConn.Execute "Delete From Cart where ListNum="& strListNum & ""
       
			Response.Redirect"shop.asp"
%>