film_fav.asp

在线点播系统

<!--#include file="chklogin.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<%

call myobj.chkrq()

if request.QueryString("id")="" then
	response.write"<script language=javascript>alert('影片不存在');window.close();</Script>"
	response.end
end if
if myobj.ChkNum(request.QueryString("id"))=false then
	response.write"<script language=javascript>alert('影片不存在');window.close();</Script>"
	response.end
end if
set rs=server.createobject("adodb.recordset")
rs.open "select * from films where id="&request.querystring("id")&"",conn,1,1
if rs.eof then
	call nr()
	response.write"<script language=javascript>alert('影片不存在');window.close();</Script>"
	response.end
end if
rs.close

if request.cookies("userid")="" then
	response.write"<script language=javascript>alert('请先登陆后再收藏影片');window.close();</Script>"
	response.end
end if
if request.cookies("userid")<>"" then
	if request.cookies("u_type")=3 then
		response.write"<script language=javascript>alert('网吧包月用户不能收藏影片');window.close();</Script>"
		response.end
	end if
end if
set rs=server.createobject("adodb.recordset")
rs.open "select * from setup where id=1",conn,1,1
max_fav=rs("max_favorite") '最多收藏数
rs.close
set rs=server.createobject("adodb.recordset")
rs.open "select * from film_fav where userid='"&request.cookies("userid")&"'",conn,1,1
now_fav=rs.recordcount '该用户已收藏的影片数
rs.close

if isnull(max_fav)=false then '如果最多数不是为空(不限制)
	if cint(now_fav)>=cint(max_fav) then
		response.write"<script language=javascript>alert('用户最多只允许收藏"&max_fav&"部影片，您已经收藏了"&now_fav&"部影片');window.close();</Script>"
		response.end
	end if
end if

set rs=server.createobject("adodb.recordset")
rs.open "select * from film_fav where userid='"&request.cookies("userid")&"' and film_id="&request.querystring("id")&"",conn,1,1
if not rs.eof then
	call nr()
	response.write"<script language=javascript>alert('您已经收藏过该影片，请不要重复收藏');window.close();</Script>"
	response.end
end if
rs.close
set rs=server.createobject("adodb.recordset")
rs.open "select * from films where id="&request.QueryString("id")&"",conn,1,3
film_name=rs("film_name")
rs.close

set rs=server.createobject("adodb.recordset")
rs.open "select * from film_fav where (id is null)",conn,1,3
rs.addnew
	rs("film_id")=request.querystring("id")
	rs("film_name")=film_name
	rs("userid")=request.cookies("userid")
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.write"<script language=javascript>alert('影片收藏成功!');window.close();</Script>"
response.end
%>