📄 head.asp
字号:
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 6.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<%set rs=conn.execute("select * from [home]")
homes=rs("homes")
%>
<title><%=rs("homes")%></title>
<link href="../images/style.css" rel="stylesheet" type="text/css">
<script>
function killErrors() {
return true;
}
window.onerror = killErrors;
</script>
<script language="javascript">kstatus();function kstatus(){self.status="欢迎来到<%=rs("homes")%>，本影院是内部测试和学习用的，不对外开放,请牢记本站域名<%=rs("url")%>";setTimeout("kstatus()",0);}</script>
</head>
<body bgcolor="#3B5815" leftmargin="0" topmargin="0">
<TABLE width=778 height="29"
border=0 align=center cellPadding=0 cellSpacing=0 background="../images/topbg-01.gif">
<TR>
<TD width="463">现在是：<script src="../js/time.js"></script><span id=tick2></TD>
<TD width=53 align=center><a href=/ class="left">本站首页</a></TD>
<TD width=53 align=center><a href=list.asp class="left">影片列表</a></TD><TD width=54 align=center><a href="#" onclick="javascript:window.external.AddFavorite('<%=rs("url")%>','<%=rs("home")%>-<%=rs("homes")%>-4000G海量-DVD 电视剧 卡通剧 尽在<%=rs("homes")%>');return false;" class="left">加入收藏</a></TD>
<TD width=54 align=center><a href="banquan.asp" class="left" target="_blank">版权申明</a></font></TD>
<TD width=6 align=center> </TD>
</TR>
</TABLE>
<TABLE width="778" height="98"
border=0 align=center cellPadding=0 cellSpacing=0 bgColor=#CCFF33>
<TR>
<TD align=middle>
<img border="0" src="../images/logo.gif" width="778" height="98"></TD>
</TR>
</TABLE>
<TABLE width=778 height="30"
border=0 align=center cellPadding=0 cellSpacing=0 bgcolor="#000000">
<TR>
<TD align=center class=mix>
<TABLE cellSpacing=0 cellPadding=0 width="778"
border=0>
<TBODY>
<TR>
<TD height=20 align="center" vAlign=middle width="391">
<img src="../images/menu-01.gif" width="18" height="6"><a href="index.html" class="menu">首 页</a>
</TD>
<%
Set rst= Server.CreateObject("ADODB.Recordset")
rst.open "select * from type",conn,1,1
if rst.EOF then
response.write "没有栏目："
else
do while NOT rst.EOF
if rst("type")="VIP专区" or rst("type")="伦理片" then %>
<TD height=20 align="center" vAlign=middle width="0">
<a href="../mlist/<%=rst("typeid")%>_1.html"></a></TD>
<% else%>
<TD height=20 align="center" vAlign=middle width="387">
<img src="../images/menu-01.gif" width="18" height="6"><a href="../mlist/<%=rst("typeid")%>_1.html" class="menu"><%=rst("type")%></a></TD>
<% end if
rst.MoveNext
loop
end if
rst.close
set rst=nothing
%>
<TD height=20 align="center" vAlign=middle width="391">
<img src="../images/menu-01.gif" width="18" height="6"><a href="allmovie.asp" class="menu">全 部</a>
</TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
</TABLE>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -