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

📄 mainoumei.asp

📁 asp+access的电影免费网站源码是个很好的学习例子大家可以下来学习
💻 ASP
字号:
<!--#include file="articleconn.asp"-->
<HTML><HEAD>
<%set rs=conn.execute("select * from [home]")%>
<TITLE><%=rs("homes")%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="img/style.css" type=text/css rel=stylesheet>
<style>
<!--
.style3 {
	font-family: "宋体";
	font-size: 12px;
}
.style1 {color: #FFFFFF}
-->
</style>
</head>
<body>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0><TBODY><TR align=right>
<TD>
</TD>
</TR></TBODY></TABLE>
<!--#include file=top.asp-->
<TABLE cellSpacing=0 cellPadding=0 width=993 border=0>
<TBODY>
<TR>
<TD bgColor=#7d7d7d height=1></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=993 border=0>
<TBODY>
<TR>
<TD bgColor=#ffffff height=2></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=993 bgColor=#ffffff border=0>
<TBODY>
<TR>
<TD vAlign=top align=middle>
<TABLE cellSpacing=0 cellPadding=0 width=977 border=0>
<TBODY>
<TR>
<TD background=img/2.gif height=8></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=1 cellPadding=0 width=977 bgColor=#b7b7b7 border=0>
<TBODY>
<TR>
<TD bgColor=#ffffff>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD>
<TABLE height=94 cellSpacing=0 cellPadding=1 width="100%" border=0>
<TBODY>
<TR>
<TD align=right width=189><IMG height=90 src="img/channel_title_movie.gif" width=188></TD>
<TD>
<OBJECT codeBase=http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0 height=90 width=780 classid=clsid:D27CDB6E-AE6D-11cf-96B8-444553540000>
<PARAM NAME="movie" VALUE="img/banner_780x90.swf">
<PARAM NAME="quality" VALUE="High">
 
<embed src="img/banner_780x90.swf" quality="High" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="780" height="90"></embed></OBJECT></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD background=img/1.jpg height=12></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=977 border=0>
<TBODY>
<TR>
<TD height=2></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=993 bgColor=#ffffff border=0>
<TBODY>
<TR>
<TD vAlign=top align=middle>
<TABLE height=36 cellSpacing=0 cellPadding=0 width=977 border=0>
<TBODY>
<TR>
<TD vAlign=top width=977 height=9>
</TD>
</TR>
<TR>
<TD vAlign=top width=977 height=8 background="img/20.gif">
<img src height=8 width=1></TD>
</TR>
<TR>
<TD vAlign=top width=977 height=4>
<table border="1" width="100%" cellspacing="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#C0C0C0">
	<tr>
		<td>
<TABLE cellPadding=0 width="100%" border=0 id="table1" bordercolorlight="#E1DFDF" bordercolordark="#E1DFDF" bordercolor="#CDCDCD" cellspacing="5"><TBODY>
<TR align=right>
<TD>
<div align="center">
<table width="126" border="0" cellpadding="0" cellspacing="0">
<%
sql="select * from learning where where='欧美' and typeid<>'搞笑片段' order by articleid desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
row_count=1
%>
<%
rs.pagesize=20
if request.querystring("page_no")="" then
    page_no=1
else
	page_no=cint(request.querystring("page_no"))
end if
rs.absolutepage=page_no
for i=1 to 5
%>
<tr>
<%
for j=1 to 6
if not rs.eof then
%>
<td align="right">
<div align="center">
<table width="126" border="0" cellspacing="0" cellpadding="0">
<tr height="119" align="center">
<td width="3"><!--Blank--></td>
<td width="123" background="images/commend_pic.gif"><table border="1" width="100%" cellpadding="0" style="border-collapse: collapse" bordercolor="#939393" id="table5">
<tr>
<td height="196"><table border="0" cellspacing="4" width="100%" cellpadding="0" id="table5">
<tr>
<td><a href="movie.asp?id=<%=rs("articleid")%>" target="_blank">
<img border="0" src="<%if rs("domurl")="" then%>img/w.gif<%else%><%=rs("domurl")%><%end if%>" width="140" height="194"></a></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr height="21" align="middle">
<td width="5"><img src height=1 width=9></td>
<td background="img/8.gif"><table border="0" cellspacing="0" width="90%" cellpadding="0">
								<tr>
									<td height="22" width=109 align="center">
									<% if row_count mod 1 =0 then%>
                              <%content=rs("title")
                            if len(content)>10 then content=left(content,10)&"?-"
                          response.write content
                            %> 
</td>
<td>
									<p align="center"><a href="movie.asp?id=<%=rs("articleid")%>" target="_blank">
									<img src="img/sort_play1.gif" width="18" height="18" border="0" alt="播放"></a></td>
								</tr>
							</table></td>
</tr>
</table>
</div>
</td>
<%end if%>
<%
row_count=row_count+1
rs.movenext
end if
next
%>

</tr>
<%
next
%>

</table>
</div>
</TD>
</TR></TBODY></TABLE></td>
	</tr>
</table>
</TD>
</TR>
<TR>
<TD vAlign=top width=977 height=8>
</TD>
</TR></TBODY></TABLE></TD></TR></TBODY></TABLE>



<TABLE height=8 cellSpacing=0 cellPadding=0 width=993 background=img/20.gif border=0>
<TBODY>
<TR>
<TD width=8 bgColor=#ffffff></TD>
<TD><img src height=8 width=1></TD>
<TD width=8 bgColor=#ffffff> </TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=993 border=0>
<TBODY>
<TR>
<TD align=right bgColor=#ffffff>
<table border="0" width="100%" cellspacing="7" cellpadding="0">
	<tr>
		<td>
		<img alt="欢迎与本站友情连接~" src="http://www.1000n.com/logo.gif" border="0"></td>
		<td> </td>
		<td> </td>
		<td> </td>
		<td> </td>
		<td> </td>
		<td> </td>
		<td> </td>
		<td> </td>
		<td> </td>
	</tr>
	<tr>
		<td> </td>
		<td> </td>
		<td> </td>
		<td> </td>
		<td> </td>
		<td> </td>
		<td> </td>
		<td> </td>
		<td> </td>
		<td> </td>
	</tr>
</table>
</TD>
</TR></TBODY></TABLE>
<TABLE height=8 cellSpacing=0 cellPadding=0 width=993 background=img/20.gif border=0>
<TBODY>
<TR>
<TD width=8 bgColor=#ffffff></TD>
<TD height="9"><img src height=8 width=1></TD>
<TD width=8 bgColor=#ffffff> </TD></TR></TBODY></TABLE>

<!--#include file=bottom.asp-->

⌨️ 快捷键说明

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