📄 left.asp
字号:
<link href="css/style.css" rel="stylesheet" type="text/css">
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="189" border="0" cellpadding="1" cellspacing="0">
<tr>
<td width="187" valign="top">
<table width="100%" border="1" align="center" cellpadding="1" cellspacing="0" bordercolorlight="#DDDDDD" bordercolordark="#FFFFFF">
<tr>
<td align="center"> <div align="center">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td background="image/khfw1.gif">站内公告</td>
</tr>
</table>
</div></td>
</tr>
<tr>
<td align="center"> <marquee scrollamount='2' scrolldelay='90' direction= 'up' width='90%' id=zjedu height='90' onMouseOver=zjedu.stop() onMouseOut=zjedu.start()>
<table width="181" border="0" cellspacing="0" cellpadding="00">
<%
sql0="select * from look"
set rs0=server.CreateObject("adodb.recordset")
rs0.open sql0,conn,1,1
do while not rs0.eof
%>
<tr>
<td width="181" height="36"><%=rs0("look")%> </td>
</tr>
<%rs0.movenext
loop%>
</table>
</marquee></td>
</tr>
</table></td>
</tr>
<tr>
<td valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top">
<%if session("Customer")="" then%>
<form action="login.asp" method="post" name="aa" id="aa">
<table border="1" cellspacing="0" cellpadding="0" bordercolorlight="#DDDDDD" bordercolordark="#FFFFFF" align="center" width="99%">
<tr>
<td height="22" colspan="2" align="center" bgcolor="#EEEEEE">
<div align="center">
<table width="100%" border="0" cellspacing="0" cellpadding="1">
<tr>
<td width="53%" height="20" align="center" bordercolorlight="#DDDDDD" bordercolordark="#FFFFFF" background="image/khfw1.gif" bgcolor="#EEEEEE">
<div align="center"><IMG height=20
src="image/b2.gif" width=28></div></td>
<td width="47%" align="center" bordercolorlight="#DDDDDD" bordercolordark="#FFFFFF" background="image/khfw1.gif" bgcolor="#EEEEEE">
会员登陆 </td>
</tr>
</table>
</div></td>
</tr>
<tr>
<td width="43%" height="30" align="center">用户名:</td>
<td width="57%" height="30" align="center"> <input name="Customer" type="text" id="Customer2" size="10" maxlength="10"></td>
</tr>
<tr>
<td height="26" align="center">密 码:</td>
<td height="26" align="center"> <input name="Password" type="password" id="Password" size="10" maxlength="10"></td>
</tr>
<tr>
<td height="30" colspan="2" align="center"><input name="imageField" type="image" src="image/go.gif" width="42" height="18" border="0">
<img src="image/go5.gif" width="42" height="18"></td>
</tr>
</table>
<%else%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><table border="1" cellspacing="0" cellpadding="1" bordercolorlight="#DDDDDD" bordercolordark="#FFFFFF" align="center" width="100%">
<tr background="image/khfw1.gif">
<td colspan="2" align="center">
<div align="center">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><IMG height=20
src="image/b2.gif" width=28></td>
<td>客户服务</td>
</tr>
</table>
</div></td>
</tr>
<%
Customer=session("Customer")
sqluser="select * from user where Customer='"&Customer&"'"
set rsuser=server.CreateObject("adodb.recordset")
rsuser.open sqluser,conn,1,1
%>
<tr>
<td colspan="2" align="center">亲爱的 <strong><%=rsuser("xm")%>
<%if rsuser("xb")="男" then
response.write("先生")
else
response.write("女士")
end if%>
</strong> 您好!欢迎您来到来站,
<%if rsuser("lx")="终生会员" then
response.write("您是终生会员,您可以任意收看每一部电影")
else
%>
您现在的点数为<strong><font color="#FF0000"><%=rsuser("dianshu")%></font></strong>。如果您的点数不够了,请选择以下会员服务,以便您看的高兴!
<%end if%>
</td>
</tr>
<tr>
<td width="33%" align="center"><font color="#FF0000">特殊服务</font></td>
<td width="67%" align="center"><a href="protect.asp">密码保护</a></td>
</tr>
</table></td>
</tr>
</table>
</form>
<%end if%>
</td>
</tr>
</table>
<table width="109%" height="24" border="0" cellpadding="0" cellspacing="0">
<tr>
<td><form action="Filmchaxun.asp" method="post" name="dd" id="dd">
<table border="1" cellspacing="0" cellpadding="1" bordercolorlight="#DDDDDD" bordercolordark="#FFFFFF" align="center" width="100%">
<tr bgcolor="#EEEEEE" background="image/khfw1.gif">
<td height="22" colspan="2" align="center"> <table width="104%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="35%"><IMG height=20
src="image/b2.gif" width=28></td>
<td width="65%">影片搜索</td>
</tr>
</table></td>
</tr>
<%
sqlkey="select * from check"
set rskey=server.CreateObject("adodb.recordset")
rskey.open sqlkey,conn,1,1%>
<tr>
<td width="38%" height="30" align="center">搜索类型 :</td>
<td width="62%" height="30" align="center"><a href="back.asp">
<select name="big" id="big">
<%do while not rskey.eof%>
<option value="<%=rskey("worth")%>"><%=rskey("check")%></option>
<%rskey.movenext
loop%>
</select>
</a></td>
</tr>
<tr>
<td height="30" align="center">输入内容:</td>
<td height="30" align="center"><input name="key" type="text" id="key" size="12" maxlength="12"></td>
</tr>
<tr>
<td height="30" align="center">点击搜索:</td>
<td height="30" align="center"><input type="submit" name="Submit" value="提交"></td>
</tr>
</table>
</form></td>
</tr>
</table></td>
</tr>
<tr>
<td valign="top"><table border="1" cellspacing="0" cellpadding="1" bordercolorlight="#DDDDDD" bordercolordark="#FFFFFF" align="center" width="100%">
<tr bgcolor="#EEEEEE" background="image/khfw1.gif">
<td height="22" colspan="2" align="center">
<table width="104%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><IMG height=20
src="image/b2.gif" width=28></td>
<td>客户服务</td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="30" align="center"><a href="register.asp">用户注册</a> </td>
<td height="30" align="center"><a href="back.asp">找回密码 </a></td>
</tr>
<tr>
<td height="30" align="center">自助服务 </td>
<td height="30" align="center">手机支付</td>
</tr>
<tr>
<td height="30" align="center">帐号充值 </td>
<td height="30" align="center">在线支付</td>
</tr>
</table>
<table border="1" cellspacing="0" cellpadding="1" bordercolorlight="#DDDDDD" bordercolordark="#FFFFFF" align="center" width="100%">
<tr>
<td height="22" colspan="2" align="center" bgcolor="#EEEEEE"> <div align="center">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="20" align="center" bordercolorlight="#DDDDDD" bordercolordark="#FFFFFF" background="image/khfw1.gif" bgcolor="#EEEEEE">
<div align="center">平均分排行榜</div></td>
</tr>
</table>
</div></td>
</tr>
<tr>
<td colspan="2" align="center" valign="top"><table border="1" cellspacing="0" cellpadding="1" bordercolorlight="#DDDDDD" bordercolordark="#FFFFFF" align="center" width="100%">
<%
sqlpin="select top 6 * from moviesmall order by defen/Counter desc"
set rspin=server.CreateObject("adodb.recordset")
rspin.open sqlpin,conn,1,1
do while not rspin.eof
%>
<tr>
<td height="30" align="center"><a href="gotoplay.asp?id=<%=rspin("id")%>">
</a></td>
<td align="center"><a href="gotoplay.asp?id=<%=rspin("id")%>"><%=rspin("mc")%></a></td>
<td height="30" align="center">
<%Counter=rspin("Counter")
defen=rspin("defen")
response.write(int(defen/Counter))%>
</td>
</tr>
<%rspin.movenext
loop%>
</table> </td>
</tr>
</table>
<table border="1" cellspacing="0" cellpadding="1" bordercolorlight="#DDDDDD" bordercolordark="#FFFFFF" align="center" width="100%">
<tr>
<td colspan="2" align="center" bgcolor="#EEEEEE">
<div align="center">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="20" align="center" bordercolorlight="#DDDDDD" bordercolordark="#FFFFFF" background="image/khfw1.gif" bgcolor="#EEEEEE">
<div align="center">点击爬行榜</div></td>
</tr>
</table>
</div></td>
</tr>
<tr>
<td colspan="2" align="center" valign="top">
<table border="1" cellspacing="0" cellpadding="1" bordercolorlight="#DDDDDD" bordercolordark="#FFFFFF" align="center" width="100%">
<%
sqlshen="select top 6 * from moviesmall order by cishu desc"
set rsshen=server.CreateObject("adodb.recordset")
rsshen.open sqlshen,conn,1,1
do while not rsshen.eof
%>
<tr>
<td height="30" align="center"><a href="gotoplay.asp?id=<%=rsshen("id")%>">
</a></td>
<td align="center"><a href="gotoplay.asp?id=<%=rsshen("id")%>"><%=rsshen("mc")%></a></td>
<td height="30" align="center"><%=rsshen("cishu")%></td>
</tr>
<%rsshen.movenext
loop%>
</table></td>
</tr>
</table></td>
</tr>
</table>
<embed src="mp3/ai.mp3" width="32" height="32" loop="true" autostart="true" hidden ></embed>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -