cf_index_commend.asp

支持多种播放器RealPlayer,MediaPlayer

<%
'乘风电影程序
'制作：乘　风
'QQ：178575
'E-Mail：[e-mail]
'开发网站：http://www.qqcf.com
'详细简介：http://www.qqcf.com/?action=list&list=cffilm
'上面有程序在线演示，安装演示，使用疑难解答，最新版本下载等内容
'因为这些内容可能时常更新，就没有放在程序里，请自己上网站上查看
'有完整版本的演示，包括如何实际整合Helix,Serv-u完全的实现在线播
'放和下载防盗链等
%>

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<TABLE width=134 height=200 border=0 cellPadding=0 cellSpacing=0>
  <TR> 
    <TD height="184" align=center background="images/e_bg_9.gif"> <%
If Rs("FilmPic")="-" Then
 Pic=Path_Index&"upload/default.gif"
Else
 If Instr(Rs("FilmPic"),"http://")=0 Then
  Pic=Path_Index&Rs("FilmPic")
 Else
  Pic=Rs("FilmPic")
 End If
End If

Link=""
If RsSet("HtmOpen")=-1 Then
 Link=Path_Index&"Htm/Show_"&Rs("ID")&".htm"
Else
 Link=Path_Index&"Show/Show.asp?ID="&Rs("ID")
End IF

Response.write "<a target=_blank href="&Link&"><img border=0 height=170 src='"&Pic&"' width=120></a>"
%> </td>
  <TR>
    <TD align=center><a target=_blank class=link1 href=<%=Link%>><%=Rs("FilmName")%></a></td>
</TABLE>