addfav.asp

21世纪人才www.51zy.net 网站源码

<% Response.Buffer=True %>
<!--#include file="../inc/person.inc"-->
<% uname=session("puid")
id=request("fav")
if id<>"" then 
set rs=server.createobject("adodb.recordset")
sql="select * from zp where id="&id
rs.open sql,conn,1,1
cname=rs("cname")
if rs.eof and rs.bof then
response.write"<SCRIPT language=JavaScript>alert('用户["&cname&"]不存在！');"
response.write"javascript:history.go(-1);</SCRIPT>"
end if
rs.close
set rs=nothing
set rs=server.createobject("adodb.recordset")
sql="select * from pfavorite where uname='"&uname&"'and fuid='"&id&"'"
rs.open sql,conn,1,1
if not rs.eof then
response.write"<SCRIPT language=JavaScript>alert('["&cname&"]已添加到收藏夹，请勿重复添加！');"
response.write"javascript:history.go(-1);</SCRIPT>"
else
rs.close
set rs=nothing
set rs=server.createobject("adodb.recordset")
sql="select * from pfavorite"
rs.open sql,conn,3,3
rs.addnew
rs("uname")=uname
rs("fuid")=request("fav")
rs.update
rs.close
set rs=nothing
response.write"<SCRIPT language=JavaScript>alert('["&cname&"]成功添加到收藏夹！');"
response.write"javascript:history.go(-1);</SCRIPT>"
end if
end if%>