📄 review.asp

📁 电影ASP文件
💻 ASP
📖 第 1 页 / 共 2 页
字号:
12 下一页
<!-- #include file="film_conn.asp" -->
<!-- #include file="film_conn_view.asp" -->
<%if request("n")=1 then%>
<%
if request.cookies("userid")="" then errmsg=errmsg & "未注册用户不能发表评论！\n"
if trim(request("penname")) ="" then errmsg=errmsg & "昵称不能为空！\n"
if trim(request("review_text")) ="" then errmsg=errmsg & "评论内容不能为空！\n"

if errmsg<>"" then
    response.write("<script>alert('" & errmsg & "');history.go(-1)</script>")
    response.end
end if

penname=trim(request("penname"))
badwords1=""&bad_words&""
badwords1=split(badwords1,",")
	for i = 0 to ubound(badwords1)
		if instr(penname,badwords1(i))>0 then
           penname=replace(penname,badwords1(i),"***")
		end if
	next

content=trim(request("review_text"))
badwords1=""&bad_words&""
badwords1=split(badwords1,",")
	for i = 0 to ubound(badwords1)
		if instr(content,badwords1(i))>0 then
           content=replace(content,badwords1(i),"***")
		end if
	next

penname=penname
vote=cint(request("vote"))
review_text=content
fid=trim(request("id"))
user_id=request.cookies("userid")
film_name=trim(request("film_name"))

   sql="select * from film_review"
   set rs=server.createObject("ADODB.recordset")
   rs.open sql,connr,1,3
   rs.addnew
   rs("fid")=fid
   rs("penname")=penname
   rs("vote")=vote
   rs("review_text")=review_text
   rs("user_id")=user_id
   rs("film_name")=film_name
   rs("ip")=Request.ServerVariables("REMOTE_ADDR")
   rs("addtime")=now()
   rs.update
   response.redirect "review.asp?id="&request("id")&"&name="&request("film_name")&""
   rs.close
   set rs=nothing
   connr.close
end if
%>
<html>
<head>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="images/style.css" type=text/css rel=stylesheet>
<title>查看评论--<%=request("name")%></title>
<script Language="JavaScript">
<!--
function check(theForm)
{
if (theForm.penname.value.length<2)
  {
    alert("对不起，笔名应在2个字符以上！");
    theForm.penname.focus();
    return (false);
  }
if (theForm.penname.value.length>10)
  {
    alert("对不起，笔名应在10个字符以内！");
    theForm.penname.focus();
    return (false);
  }
if (theForm.review_text.value.length<2)
  {
    alert("对不起，评论内容不能小于2个字符！");
    theForm.review_text.focus();
    return (false);
  }
  if (theForm.review_text.value.length>500)
  {
    alert("对不起，评论内容不能大于500个字符！");
    theForm.review_text.focus();
    return (false);
  }
 return true;
}
//-->
</script>
</head>
<body topmargin="0" leftmargin="0" oncontextmenu="window.event.returnValue=false" ondragstart="window.event.returnValue=false" onselectstart="event.returnValue=false">
<div align="center">
  <center>
                  <TABLE cellSpacing=0 cellPadding=0 width=610 border=0 style="border-collapse: collapse" bordercolor="#111111">
                    <TBODY>
                    <TR>
                      <TD style="font-size: 12px">
                        <DIV align=center style="font-size: 12px"></DIV></TD></TR>
                    <TR bgColor=#ffffff>
                      <TD vAlign=top style="font-size: 12px">
                        <TABLE cellSpacing=0 cellPadding=0 width=100 border=0>
                          <TBODY>
                          <TR>
                            <TD height=8 style="font-size: 12px">
                            <IMG height=8 
                              src="images/dot.gif" 
                        width=18></TD></TR></TBODY></TABLE>
<%     
sql="select * from film_review where fid="&request("id")&" order by id desc"             
set rsf=server.createObject("ADODB.recordset")                                          
rsf.open sql,connr,1,1             
%>  
                        <TABLE cellSpacing=0 cellPadding=4 width="561" 
                        align=center border=0>
                          <TBODY>
                          <TR>
                            <TD height=25 style="font-size: 12px" width="561">
                            <div align="center">
                              <center>
                              <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber4">
                                <tr>
                                  <td width="50%" height="25">评论影片：<font color=red><%=request("name")%></font></td>
                                  <td align=right width="50%"><a href="javascript:location.reload()">刷新页面</a>&nbsp;&nbsp;<a href="#review">发表评论</a></td>
                                </tr>
                              </table>
                              </center>
                            </div>
                            </TD>
                            </TR>
<%if rsf.eof then%><TR>
                            <TD height=25 align=center style="font-size: 12px" width="553">暂时没有任何评论！欢迎您积极发表。请文明用词，谢谢！</TD></TR>
<%else
if request("page")<>"" then              
curpage=cint(request("page"))              
else              
curpage=1              
end if             
num=8
rsf.pagesize=num              
rsf.absolutepage=curpage
%>
                          <TR>
                            <TD height=30 style="font-size: 12px" width="553"><DIV align=center>每页显示<font color=red><%=num%></font>条/共<font color=red><%=rsf.recordcount%></font>条&nbsp;第<font color=red><%=curpage%></font>页/共<font color=red><%=rsf.pagecount%></font>页                                              
              &nbsp;<%if curpage<=1 then%>首页  上页                                
                <%else%><a href="review.asp?id=<%=request("id")%>&page=1#1">首页</a>  <a href="review.asp?id=<%=request("id")%>&page=<%=(curpage-1)%>#1">上页</a>
12 下一页
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -