|
|
下面是代码
请大哥大姐们帮忙看看
先谢过了
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<style type="text/css">
<!--
body {
background-color: #cccccc;
margin-top:0;
}
.style1 {color: #FF0000}
.link {
color: #666666;
text-decoration: none;
}
-->
</style></head>
<body>
<table width="1003" border="0" align="center">
<tr>
<td><!--#include file="head.asp"--></td>
</tr>
</table>
<table width="1003" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="1003" height="174">
<param name="movie" value="image/top0.swf">
<param name="quality" value="high">
<embed src="image/top0.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="1003" height="174"></embed>
</object></td>
</tr>
</table>
<table width="1003" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="200" height="400" rowspan="2"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="200" height="400">
<param name="movie" value="image/left.swf">
<param name="quality" value="high">
<embed src="image/left.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="200" height="400"></embed>
</object></td>
<td height="50"><img src="image/top_xw.jpg" width="600" height="50"></td>
</tr>
<tr>
<td>
<table width="100%" border="0">
<%
set rs=server.createobject("adodb.recordset")
rs.open "select* From news order by id desc",conn,1,1
%>
<%
while not rs.eof
%>
<tr>
<td><a href=list.asp?id=<%=rs("id")%> class="link">
::
<%response.write trim(rs("title")) %>
::</a> <span class="style1"> [</span> <font color="#003300">
<%response.Write(rs("time"))%></font>
<span class="style1"> ]</span> </td>
</tr>
<%
rs.movenext
wend
%>
<%
rs.close
conn.close
set rs=nothing
set conn=nothing
%>
</table></td>
</tr>
</table>
<hr>
<hr>
<table width="1003" border="0" align="center">
<tr>
<td><!--#include file="foot.asp"--></td>
</tr>
</table>
</body>
</html> |
|
IP卡
狗仔卡
发表于 2010-1-8 01:16:51
收藏
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
显身卡