notify_err.asp

在线点播系统

<!--#include file="chklogin.asp"-->
<%

call myobj.chkrq()

if request.cookies("film_err_page")<>"" then '检测当页是否已被加载过
	response.cookies("film_err_page")=""
	response.write"<script language=javascript>alert('请不要重复刷新本页，如果您是第一次访问本页时就弹出此对话框的话，则请重新操作一次。');window.close();</Script>"
	response.end
end if

if request.form("err_info")="" then
	response.write"<script language=javascript>alert('请先选择您在出错时看到的错误提示后再报告');window.close();</Script>"
	response.end
end if

if myobj.chkcn(request.form("err_info"))=false then
	response.write"<script language=javascript>alert('用户报告的错误信息值类型错误');window.close();</Script>"
	response.end
end if

if myobj.ChkStr(request.form("err_info"))=false then
	response.write"<script language=javascript>alert('用户报告的错误信息值中存在非法字符');window.close();</Script>"
	response.end
end if

if request.cookies("userid")="" then
	response.write"<script language=javascript>alert('请先登陆');window.close();</Script>"
	response.end
end if

set rs=server.createobject("adodb.recordset") '先查询是否允许用户报错
rs.open "select * from setup where id=1",conn,1,1
if rs("notify_err")=false 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.form("id")&"",conn,1,3
if rs.eof then
	call nr()
	response.write"<script language=javascript>alert('该影片并不存在');window.close();</Script>"
	response.end
end if
if rs("err")=true then
	call nr()
	response.write"<script language=javascript>alert('该影片已经有用户报告了错误，您无需再报告');window.close();</Script>"
	response.end
else
	rs("err")=true
	rs("err_info")=request.form("err_info")
	rs.update
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
response.write"<script language=javascript>alert('您报告的错误信息已经提交成功，感谢您对本站的关注与支持');window.close();</Script>"
response.end
response.cookies("film_err_page")=1 '写入防下载的cookies标识值
%>