 <%  
 user_id=session("user_id")
  if user_id="" then
	response.write "<script language='javascript'>"
response.write "location.href='../error.asp';"			
response.write "</script>"
	response.end
end if %>
  <%
'将商品编号Prodid放入购物商品列表ProductList
ProductList = Session("ProductList")
Products = Request("ProdId")
Products = replace(products,"'","")
Products = replace(products," ","")

if productlist="" and Products="" then
	response.redirect "../error.asp?error=007"
	response.end
end if

   If Len(ProductList) = 0 Then
      ProductList = "'" & Products & "'"
   ElseIf InStr( ProductList, Products ) <= 0 Then
      ProductList = ProductList & ", '" & Products & "'"
   End If

Session("ProductList") = ProductList
response.redirect "check.asp"
%>
 
