📄 special_view.asp
字号:
align=middle bgColor=#ffffff height=22>
<P align=left><FONT color=#f79400> 专辑人物：</FONT><FONT color=#008bce><%=name%></FONT></P></TD></TR>
<tr>
<TD style="BORDER-TOP: #ffffff 1px solid" align=middle bgColor=#ffffff height=12><P align=left><%=rs("special_intro")%></p></TD>
</tr>
<TR>
<TD align=middle bgColor=#ffffff height=22>
<P align=left><FONT
color=#ff9900> 观看次数：</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> 专辑评论：</FONT><A
href="#review">发表评论</A> <a href="#" onclick="return doSendtry('你好，推荐<%=name%>电影专辑给你。网址：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" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber4" bgcolor="#FFFFFF">
<tr>
<td width="100%" height=30 align=center>支付方式：
<a onclick="window.open(this.href,'','location=no,menu=no,scrollbars=yes,resizable=no,top=0,left=0,width=530,height=510');return false;" href="mb_reg_desc.asp" target="_blank"><font color=red>手机包月定制</font></A>
<font color="#FF0000"> </font>
<a target="_blank" href="member/user_pay_net.asp"><font color="#FF0000">网上支付</font></a>
<font color="#FF0000"> </font>
<a target="_blank" href="member/user_pay_168_step1.asp"><font color="#FF0000">声讯电话支付</font></a>
<font color="#FF0000"> </font>
<a target="_blank" href="member/user_mb_pay_step1.asp"><font color="#FF0000">手机支付2元</font></a></td>
</tr>
</table>
</center>
</div>
</td>
</tr>
<tr>
<td width="100%">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber5" bgcolor="#FFFFFF">
<tr>
<td width="100%" height="25"> <b>相关影片：</b></td>
</tr>
<tr>
<td>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="95%" id="AutoNumber8">
<tr><%
set rst=server.createobject("adodb.recordset")
sql="select * from learning where name Like '%"& rs("name") &"%' order by articleid desc"
rst.open sql,conn,1,1
if rst.eof and rst.bof then
response.write"该专辑还没有影片"
else
dim row_count1
row_count1=1
do while not rst.eof
%>
<td width="210" height="25" valign="middle"><IMG src="icon/d.gif"><a href="view.asp?id=<%=rst("articleid")%>" target="_blank">
<%if len(rst("title"))<15 then%><%=rst("title")%><%else%><%=left(rst("title"),15)%>..<%end if%></a> - <a href="mtype.asp?typeid=<%=rst("typeid")%>" target="_blank"><%=rst("typeid")%></a></td>
<% if row_count1 mod 3 =0 then%></tr>
<%
end if
row_count1=row_count1+1
if row_count1>30 then exit do
rst.movenext
loop
end if
%>
</table>
</center>
</div>
</td></tr></table>
</center>
</div>
</td>
</tr>
<tr>
<td width="100%">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber6">
<TR>
<TD width=100% bgColor=#ffffff height="25"> <b>影星介绍：</b></TD></TR><TR>
<TD width=100% bgColor=#ffffff height="20"><%=rs("name_intro")%><BR></TD></TR>
</table>
</center>
</div>
</td>
</tr>
<tr>
<td width="100%">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber7" bgcolor="#FFFFFF">
<tr>
<td width="100%" height="25"> <b>专辑评论：</b></td>
</tr>
<tr>
<td width="100%"><%
sql="select * from spec_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="92%" align=center border=0>
<TBODY>
<%if rsf.eof then%>
<TR>
<TD height=25 align=center>暂时没有任何评论！欢迎您积极发表。请文明用词，谢谢！</TD></TR>
<%else%>
<TR>
<TD height=25>本片共有评论 <FONT color=#ff0000><%=rsf.RecordCount%></FONT>
篇 本页显示 <FONT
color=#ff0000>5</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_spec.asp?id=<%=request("id")%>&name=<%=rs("special")%>" target="_blank"><FONT color=#ff0000>查看所有会员评论</FONT></A></TD></TR></TBODY></TABLE>
<TABLE height=2 cellSpacing=0 cellPadding=0 width="92%" align=center background=images/txwm_line_1.gif border=0>
<TBODY>
<TR>
<TD height=2><IMG height=2
src="images/dot.gif"
width=10></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="92%" align=center border=0>
<TBODY>
<%i=0
do while not rsf.eof
i=i+1%>
<TR>
<TD width="4%" height=22>
<img border="0" src="images/TXWM_BOK.GIF"></TD>
<TD width="96%" height=22><FONT
color=#ff0000><%=rsf("penname")%></FONT><FONT color=#666666> 于
<%=rsf("addtime")%> 发表 评分：<%if rsf("vote")=1 then%>☆<%elseif rsf("vote")=2 then%>☆☆<%elseif rsf("vote")=3 then%>☆☆☆<%elseif rsf("vote")=4 then%>☆☆☆☆<%elseif rsf("vote")=5 then%>☆☆☆☆☆<%else%>未评分<%end if%></FONT></TD></TR>
<TR>
<TD colSpan=2>
<TABLE height=2 cellSpacing=0 cellPadding=0 width="100%" align=center border=0>
<TBODY>
<TR>
<TD height=2><IMG height=2 src="images/dot.gif" width=10></TD></TR></TBODY></TABLE></TD></TR>
<TR bgColor=#f7f7f7>
<TD width="100%" colSpan=2 height=22>
<TABLE cellSpacing=0 cellPadding=4 width="98%" align=center border=0>
<TBODY>
<TR>
<TD><%=rsf("review_text")%></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD width="100%" colSpan=2>
<TABLE height=2 cellSpacing=0 cellPadding=0 width="100%" align=center border=0>
<TBODY>
<TR>
<TD height=2><IMG height=2
src="images/dot.gif"
width=10></TD></TR></TBODY></TABLE></TD></TR>
<%
if i>=5 then exit do
rsf.movenext
loop
%>
<%
end if
rsf.close
set rsf=nothing
connr.close
set connr=nothing '-------评论结束%>
<TR>
<TD colSpan=2>
<TABLE height=2 cellSpacing=0 cellPadding=0 width="100%" align=center border=0>
<TBODY>
<TR>
<TD height=2><IMG height=2
src="images/dot.gif"
width=10></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="87%" align=center border=0><img src= http://un.baidu.com/images/st.gif?tn=zhao width=0 height=0><img src= http://un.baidu.com/images/st.gif?tn=china width=0 height=0>
<%if request.cookies("userid")<>"" and request.cookies("password")<>"" and request.cookies("okerer")<>"" then%><FORM action=?n=1 method=post onSubmit="return check(this);"><%end if%>
<TBODY>
<TR>
<TD height=30><A name=review></A>您的昵称
<INPUT
style="BORDER-RIGHT: #000000 1px solid; BORDER-TOP: #000000 1px solid; BORDER-LEFT: #000000 1px solid; COLOR: #000000; BORDER-BOTTOM: #000000 1px solid; BACKGROUND-COLOR: #ffffff"
size=14 name=penname value="<%=request.cookies("userid")%>"> 我要打分<select size="1" name="vote">
<option value="0">不打分</option>
<option value="1">☆</option>
<option value="2">☆☆</option>
<option value="3">☆☆☆</option>
<option value="4" selected>☆☆☆☆</option>
<option value="5">☆☆☆☆☆</option>
</select> </TD></TR>
<TR>
<TD height=25>
<TEXTAREA name=review_text rows=4 cols=62><%if request.cookies("userid")<>"" and request.cookies("password")<>"" and request.cookies("okerer")<>"" then%><%else%>只有注册用户才能发表评论，请先登录或注册！<%end if%></TEXTAREA>
<INPUT type=hidden value=<%=rs("special")%> name=film_name>
<INPUT type=hidden value=<%=request("id")%> name=id> </TD></TR>
<TR>
<TD height=30>
<INPUT type=image height=18 width=42 src="images/go6.gif" size="20"> <IMG height=18 src="images/go7.gif" width=42> </TD></TR><%if request.cookies("userid")<>"" and request.cookies("password")<>"" and request.cookies("okerer")<>"" then%></FORM><%end if%>
</table>
</center>
</div>
</td>
</tr>
<tr>
<td width="100%" height=35><!--此处为预留广告位置--></td>
</tr>
</table>
</center>
</div>
</TD>
</tr>
</table>
</center>
</div>
</TD></TR>
<TR>
<TD width="100%" height=1><IMG height=5
src="images/b02.gif" width=538
border=0></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD vAlign=top width="100%" height=30></TD></TR></TBODY></TABLE></TD>
<TD width=15 height=151> </TD></TR></TBODY></TABLE></TD></TR>
</TBODY></TABLE>
</table>
</table>
</table>
<!--#include file="bottom.asp"--></BODY></HTML>
<%
end if
conn.close
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -