⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 view.asp

📁 电影ASP文件
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#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 "view.asp?id="&request("id")&""
   rs.close
   set rs=nothing
   connr.close
end if
%>
<%
   dim sql
   dim rs
   if trim(request("id"))="" then
   response.write "<p align=center>对不起,电影ID号不能为空!</p>"
   response.end
   end if
   if IsNumeric(trim(request("id")))=false then
   response.write "<p align=center>对不起,电影ID号只能是数字!</p>"
   response.end
   end if
   if len(trim(request("id")))>5 then
   response.write "<p align=center>对不起,电影ID号长度不正确!</p>"
   response.end
   end if
   articleid=trim(request("id"))
   articleid=replace(articleid,"%20","")
   articleid=replace(articleid,"select","")
   articleid=request("id")
   set rs=server.createobject("adodb.recordset")
   sql="update learning set hits=hits+1 where articleID="&articleid
   rs.open sql,conn,1,3
   sql="select * from learning where articleid="&articleid
   rs.open sql,conn,1,1
   if rs.eof then
   response.write "错误,该影片不存在!"
   else
   title=rs("title")
   ittype=rs("typeid")
 %>
<HTML><HEAD><TITLE><%=webname%> - 电影 - <%=title%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<script language=javascript src=js/login.js></script>
<script language=javascript src=js/sendsms.js></script>
<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>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}
//-->
</script>
<script>
function killErrors()
{
return true
}
window.onerror = killErrors
</script>
</HEAD>
<BODY bgColor=#71757b leftMargin=0 topMargin=0 rightMargin=0 marginheight="0" marginwidth="0" botmargin="0" oncontextmenu="window.event.returnValue=false" ondragstart="window.event.returnValue=false" onselectstart="event.returnValue=false">
<!--#include file="top.asp"-->
<TABLE cellSpacing=0 cellPadding=0 width=778 align=center background=images/bg-content.gif border=0 valign="top">
  <TBODY>
  <TR>
    <TD width=778 height=188>
      <TABLE style="BORDER-COLLAPSE: collapse" borderColor=#111111 cellSpacing=0 
      cellPadding=0 width=778 border=0>
        <TBODY>
        <TR>
          <TD width=15 height=151> </TD>
          <TD vAlign=top width=194 height=151><!--#include file="left.asp"--></TD>
          <TD vAlign=top width=4></TD>
          <TD vAlign=top width=550 height=151>
            <TABLE style="BORDER-COLLAPSE: collapse" borderColor=#111111 
            cellSpacing=5 cellPadding=0 width="100%" border=0>
              <TBODY>
              <TR>
                <TD vAlign=top width="100%" height=386>
                  <TABLE style="BORDER-COLLAPSE: collapse" borderColor=#111111 
                  height=519 cellSpacing=0 cellPadding=0 width="91%" border=0>
                    <TBODY>
                    <TR>
                      <TD vAlign=top width="100%" height=39><!--#include file="query.asp"--></TD></TR>
                    <TR>
                      <TD width="100%" height=5></TD></TR>
                    <TR>
                      <TD width="100%" height=8>
<TABLE style="BORDER-COLLAPSE: collapse" 
                        borderColor=#111111 height=1 cellSpacing=0 cellPadding=0 
                        width="100%" border=0>
                          <TBODY>
                          <tr>
                            <TD width="100%" height=30><DIV align=center><SPAN 
                  style="LETTER-SPACING: 2pt"><STRONG><FONT 
                  size=3><%=title%></FONT></STRONG></SPAN></DIV></TD>
                          </tr>
                          </TBODY></TABLE></TD></TR>
                    <TR>
                      <TD width="100%" height=5></TD></TR>
                    <TR>
                      <TD width="100%" height=3><IMG height=21 
                        src="images/b.gif" width=538 border=0></TD></TR>
                    <TR>
                      <TD width="100%" background=images/b01.gif height=738 valign="top">
                      <div align="center">
                        <center>
                        <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="99%" id="AutoNumber1" height="675">
                          <tr>
                      <TD vAlign=top width="100%" background=images/b01.gif height="272">
<TABLE style="BORDER-COLLAPSE: collapse" borderColor=#e3e3e3 height=75 cellSpacing=0 borderColorDark=#d6d6d6 cellPadding=0 width="99%" align=center borderColorLight=#e3e3e3 border=1>
                          <TBODY>
                          <TR bgColor=#666666>
                            <TD colSpan=2 height=21>
                              <TABLE cellSpacing=0 cellPadding=0 width="100%" 
                              border=0>
                                <TBODY>
                                <TR>
                                <TD 
                                style="BORDER-TOP: #ffffff 1px solid; BORDER-BOTTOM: #ffffff 1px solid" 
                                width="79%" bgColor=#dddddd height=21><a href="mclass.asp?typeid=<%=rs("typeid")%>" target="_blank"><B><FONT 
                                color=#666666>&nbsp;<%=rs("typeid")%></FONT></B></a> </TD>
                                <TD 
                                style="BORDER-TOP: #ffffff 1px solid; BORDER-BOTTOM: #ffffff 1px solid" 
                                width="18%" bgColor=#dddddd>
                                <P align=right><FONT 
                                color=#666666><FONT class="eng_S"><strong><%=rs("dateandtime")%></strong></FONT></FONT></P></TD></TR></TBODY></TABLE></TD></TR>
                          <TR>
                            <TD align=middle width=124 bgColor=#ffffff height=271 
                            rowSpan=14>
                              <TABLE cellSpacing=1 cellPadding=0 width="50%" 
                              align=center bgColor=#cccccc border=0>
                                <TBODY>
                                <TR>
                                <TD><DIV align=center><IMG 
                  style="BORDER-RIGHT: #ffffff 3px solid; BORDER-TOP: #ffffff 3px solid; BORDER-LEFT: #ffffff 3px solid; BORDER-BOTTOM: #ffffff 3px solid" 
                  height=245 src="<%if rs("url")="" then%>IMAGES/nopic1.gif<%else%><%=rs("url")%><%end if%>" width=168></DIV></TD></TR></TBODY></TABLE></TD></TR>
                          <TR>
                            <TD style="BORDER-TOP: #ffffff 1px solid" 
                            align=middle bgColor=#ffffff height=22>
                              <P align=left><FONT 
                              color=#f79400>&nbsp;主要演员:</FONT><FONT 
                              color=#008bce><%=rs("name")%></FONT></P></TD></TR>
                          <tr>
                            <TD style="BORDER-TOP: #ffffff 1px solid" 
                            align=middle bgColor=#ffffff height=22>
                              <p align="left"><FONT 
                              color=#f79400>&nbsp;影片级别:</FONT><% if rs("canlook")=1 then%>普通电影<%else%>黄金电影<%end if%></P></TD>
                          </tr>
                          <tr>
                            <TD style="BORDER-TOP: #ffffff 1px solid" 
                            align=middle bgColor=#ffffff height=22>
                              <p align="left"><FONT 
                              color=#f79400>&nbsp;开放对象:</FONT><%if rs("canlook")=1 then%>普通会员、白银会员 
                            、黄金会员<%elseif rs("canlook")=3 then%>黄金会员<%elseif rs("canlook")=0 then%>电影游客、普通会员、白银会员 
                            、黄金会员<%end if%></TD>
                          </tr>
                          <tr>
                            <TD style="BORDER-TOP: #ffffff 1px solid" 
                            align=middle bgColor=#ffffff height=22>
                              <p align="left"><FONT 
                              color=#f79400>&nbsp;出产地区:</FONT><%=rs("where")%>地区</p></TD>
                          </tr>
                          <tr>
                            <TD style="BORDER-TOP: #ffffff 1px solid" 
                            align=middle bgColor=#ffffff height=22>
                              <p align="left"><FONT 
                              color=#f79400>&nbsp影片长度:</FONT><font class="eng_S">
                            <%=rs("howlong")%> </font></TD>
                          </tr>
                          <tr>
                            <TD style="BORDER-TOP: #ffffff 1px solid" 
                            align=middle bgColor=#ffffff height=22>
                              <p align="left"><FONT 
                              color=#f79400>&nbsp;相关资料:</FONT><A 
                        href="http://www1.baidu.com/baidu?word=<%=title%>&tn=china" 
                        target=_blank><FONT color=#d25d12>相关影视资讯</FONT></A></TD>
                          </tr>
                          <tr>
                            <TD style="BORDER-TOP: #ffffff 1px solid" 
                            align=middle bgColor=#ffffff height=22>
                              <p align="left"><FONT 
                              color=#f79400>&nbsp;播放软件:</FONT><% if rs("movietype")="rm" then%><img src="IMG/real.gif" border="0" width="16" height="16"><%elseif rs("movietype")="md" then%><img src="IMG/media.gif" border="0" width="16" height="16"><%elseif rs("movietype")="mov" then%><img src="IMG/lookmov.gif" border="0" width="18" height="17"><%end if%></TD>
                          </tr>
                          <TR>
                            <TD align=middle bgColor=#ffffff height=22>
                              <P align=left><FONT color=#ff9900>&nbsp;推荐级别: 
                              <%if rs("softlevel")="1" then%>★<%elseif rs("softlevel")="2" then%>★★<%elseif rs("softlevel")="3" then%>★★★<%elseif rs("softlevel")="4" then%>★★★★<%else%>★★★★★<%end if%></FONT></P></TD></TR>
                          <TR>
                            <TD align=middle bgColor=#ffffff height=22>
                              <P align=left><FONT 
                              color=#ff9900>&nbsp;观看次数:</FONT><FONT class="eng_S"><strong><%=rs("hits")%></strong></FONT></P></TD></TR>
                          <tr>
                            <TD align=middle bgColor=#ffffff height=22>
                              <p align="left"><FONT 
                              color=#ff9900>&nbsp;影片评论:</FONT><a onclick="window.open(this.href,'','location=no,menu=no,scrollbars=yes,resizable=no,top=0,left=0,width=630,height=510');return false;" href="review.asp?id=<%=request("id")%>&name=<%=rs("title")%>" target="_blank">查看评论</A>&nbsp;  <A 
                        href="#review">发表评论</A>&nbsp; <a onclick="window.open(this.href,'','location=no,menu=no,scrollbars=yes,resizable=no,top=0,left=0,width=460,height=300');return false;" href="report_error.asp?title=<%=rs("title")%>" target="_blank"><FONT color=#d25d12>反馈错误</FONT></A>&nbsp; <a href="#1" onclick="return doSendtry('推荐电影给你-<%=title%>。网址:http://<%=Request.ServerVariables("SERVER_NAME")%><%=Request.ServerVariables("HTTP_url")%>');"><img border="0" src="icon/sms_1.gif">推荐朋友</a></TD>
                          </tr>
                          </TBODY></TABLE>
</TD>
                          </tr>
                          <tr>
                      <TD vAlign=top width="100%" background=images/b01.gif height=403>
<div align="center">
  <center>
  <table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="99%" id="AutoNumber2" bordercolorlight="#E3E3E3" bordercolordark="#D6D6D6" bordercolor="#FFFFFF">
    <tr>
      <td width="100%">
      <div align="center">
        <center>
        <table border="0" cellspacing="1" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber3" bgcolor="#E0E4E0">
          <tr>
                        <td width="21%" bgcolor="#FFFFFF" height="39">
                        <p align="center">
                        <img border="0" src="images/online.gif" title="在线观看"></td>
                        <td width="79%" bgcolor="#FFFFFF" height="39"><%
                  
sql="select * from movieurl where nameid='"&articleid&"'"

⌨️ 快捷键说明

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