favorite.asp

购物系统时尚版.强大的后台文章编辑器的功能

<%
dim key,toppath,dbpath
key="a2"
toppath=""
dbpath=""
%>
<!--#include file="db_conn.asp"-->
<!--#include file="my_lib/my_request.asp"-->
<%
id=my_request("id",1)
if session("chk_flag")="" then
Response.write "<script>alert(""您还未登陆，请先登录"");location.href=""login.asp"";</script>"
Response.end
end if
if id="" then
response.write"<SCRIPT language=JavaScript>alert('操作错误');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.end
end if
sql="select * from yqj_product where id="&id
set rs=conn.execute (sql)
if (rs.eof and rs.bof) then
response.write"<SCRIPT language=JavaScript>alert('错误，没有此类商品');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.end
rs.close
set rs=nothing
end if
userid=cint(session("chk_id"))
set rs=server.CreateObject("adodb.recordset")
sql="select pid,userid,addtime from favorite where pid="&id
rs.open sql,conn,1,3
if not (rs.eof and rs.bof) then
response.write"<SCRIPT language=JavaScript>alert('您已经收藏过此商品，不能重复收藏');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.end
else
rs.addnew
rs("pid")=id
rs("userid")=userid
rs("addtime")=now()
rs.update
rs.close
set rs=nothing
end if
conn.close
set conn=nothing
response.write"<SCRIPT language=JavaScript>alert('收藏成功');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.end
%>