📄 top.asp
字号:
<%@ Language=VBScript %>
<% option explicit %>
<!--#include file="conn.asp"-->
<!--#include file="style.asp"-->
<%
dim rs, sql
set rs = server.createobject("adodb.recordset")
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>易得新闻中心</title>
<base target="main">
<style type="text/css">
<!--
td { font-family: "宋体"; font-size: 9pt}
body { font-family: "宋体"; font-size: 9pt}
select { font-family: "宋体"; font-size: 9pt}
A {text-decoration: none; color: #336699; font-family: "宋体"; font-size: 9pt}
A:hover {text-decoration: underline; color: #FF0000; font-family: "宋体"; font-size: 9pt}
-->
</style>
</head>
<body bgcolor="#F4CF9D" topmargin="0" leftmargin="0">
<table border="0" width="100%" cellspacing="0" cellpadding="0" height="382" style="line-height: 110%">
<tr>
<td width="115" height="14" valign="top"></td>
<td width="1" bgcolor="#000000" height="382" rowspan="4"> </td>
</tr>
<tr>
<td width="115" height="1" valign="top">
<p align="center"> ◇ <a href="main.asp"> 易得新闻中心</a> ◇
<hr noshade size="1" align="center" width="95%" color="#000000">
</td>
</tr>
<tr>
<td width="115" height="27" valign="top">
<table border="0" width="100%" style="line-height: 110%" cellspacing="0" cellpadding="0">
<tr>
<td width="100%">
<table border="0" width="97%" cellspacing="0" cellpadding="0">
<tr>
<td width="100%">
<p align="center"><%
sql = "SELECT * FROM category"
rs.open sql, conn, 1, 1
if err.number <> 0 then
response.write "数据库出错"
else
if rs.bof and rs.eof then
rs.close
response.write "没有类别"
else
response.write "<ul>"
do while not rs.eof
response.write "<li><a target='main' href='category.asp?cate=" + cstr(rs("id")) + "'>" + rs("title") + "</a>"
rs.movenext
loop
response.write "</ul>"
rs.close
end if
end if
%><script src=http://www.on.net.cn/counter.asp?id=taiwe&style=0&length=0></script>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="100%">
<hr noshade size="1" align="center" width="95%" color="#000000">
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="115" height="371" valign="top">
<p align="center"><a href="admin">新闻管理</a>
<hr noshade size="1" align="center" width="95%" color="#000000">
<center>
友情连接<br>
<a href="http://taiwe.my163.com" target="_blank">易得方舟</a>
</td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -