📄 newzhuti.asp
字号:
<!--#include file="mdb.asp"-->
<% Response.Buffer=True
exec="select * from new order by id desc"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>新闻在线</title>
<style fprolloverstyle>A:hover {color: #000000; font-weight: bold}</style>
</head>
<body topmargin="1" leftmargin="1" rightmargin="1" bottommargin="1" marginwidth="1" marginheight="1" background="pic/line.gif" link="#000000" vlink="#000000" alink="#000000">
<table border="0" width="100%" id="table1" bordercolor="#6595D6" style="border-collapse: collapse" height="546">
<tr>
<td width="16" background="newpic/a9.gif"> </td>
<td colspan="2" background="newpic/a3.gif" height="24"> </td>
</tr>
<tr>
<td width="16" rowspan="6" background="newpic/a21.gif"> </td>
</tr>
<tr>
<td width="201" height="72" bgcolor="#000000">
<img border="0" src="newpic/9988.gif" width="100%" height="100%"></td>
<td width="78%" height="72" bgcolor="#000000">
<img border="0" src="pic/no1.gif" width="99%" height="100%"></td>
</tr>
<tr>
<td width="981" height="18" colspan="2" align="center">
<table border="0" width="95%" id="table6" style="border-collapse: collapse">
<tr>
<td>
<p align="center"><font color="#008000">
<a style="text-decoration: none" href="index.asp">
<img border="0" src="newpic/BD21299_.gif" width="15" height="11"></a></font><a style="text-decoration: none" href="index.asp">首页</a></a><a style="text-decoration: none" href="index.asp">
</a></td>
<td>
<p align="center"> <a style="text-decoration: none" href="new.asp"><img border="0" src="newpic/BD21299_.gif" width="15" height="11">旅游新闻</a>
</td>
<td>
<p align="center">
<a style="text-decoration: none" href="binguan.htm">
<img border="0" src="newpic/BD21299_.gif" width="15" height="11">宾馆饭店</a>
</td>
<td>
<p align="center">
<a style="text-decoration: none" href="luyoujingdian.htm">
<img border="0" src="newpic/BD21299_.gif" width="15" height="11">旅游景区</a></td>
<td>
<p align="center">
<a style="text-decoration: none" href="teseluxian.htm">
<img border="0" src="newpic/BD21299_.gif" width="15" height="11">特色路线</a></td>
<td>
<p align="center">
<a style="text-decoration: none" href="lyzs.asp">
<img border="0" src="newpic/BD21299_.gif" width="15" height="11">旅游常识</a></td>
<td>
<p align="center">
<a style="text-decoration: none" href="liuyan.asp">
<img border="0" src="newpic/BD21299_.gif" width="15" height="11">在线留言</a></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="981" height="22" colspan="2">
<p align="center">
<marquee scrollamount="5" style="color: #008000" height="100%" width="100%">欢迎您光临河源旅游网</marquee></td>
</tr>
<tr>
<td width="200" height="360" valign="top" style="word-spacing: 0; text-align: left; text-indent: 0; line-height: 100%; margin: 0">
<table border="0" width="100%" id="table5" bgcolor="#008000">
<tr>
<td>
<p align="center"><font color="#FFFFFF">:::</font>旅游新闻<font color="#FFFFFF">:::</font></td>
</tr>
</table>
<table border="0" width="100%" id="table3">
<tr><%do while not rs.eof%>
<td valign="middle">
<img border="0" src="newpic/news2.GIF" width="15" height="13"><font size="2"><a href="newzhuti.asp?ID=<%=rs("ID")%>"><%=rs("biaoti")%></td>
</tr>
<%
rs.movenext
loop
conn.close
set cnn=nothing
%>
</table>
</td>
<td width="78%" height="360" bgcolor="#E3EAF8" style="border-left-style: solid; border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-width: 1px" bordercolor="#008000" valign="top">
<div align="center">
<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("liuyan.mdb")
exec="select * from new where ID="&request.querystring("ID")
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>
<table border="0" width="95%" id="table2" height="329" bgcolor="#FFFFFF">
<tr>
<td height="9" colspan="4" bgcolor="#E3EAF8" background="newpic/a2.gif">
<p align="center"> </td>
</tr>
<tr>
<td height="10" colspan="4">
<p align="center"><b><font size="4"><%=rs("biaoti")%></font></b></td>
</tr>
<tr>
<td height="5" colspan="4">
<p align="center"><%=rs("fubiaoti")%></td>
</tr>
<tr>
<td height="18" width="128"></td>
<td height="18" width="128">
<p align="center"><%=rs("mm")%>月<%=rs("dd")%>日</td>
<td height="18" width="128">
<p align="center"><%=rs("zuozhe")%></td>
<td height="18" width="128"></td>
</tr>
<tr>
<td width="100%" colspan="4" style="text-indent: 0; margin-right: 0; line-height:150%; margin-left:0" valign="top" align="center">
<%
Dim sContent
sContent=RS("zhuti")
sContent=Replace(sContent,"<","<")
sContent=Replace(sContent,">",">")
sContent=Replace(sContent,Chr(13) & Chr(10),"<Br>")
sContent=Replace(sContent," "," ")
Response.Write(sContent)
%> </td>
</tr>
<tr>
<td width="530" colspan="4" style="text-indent: 18; margin-right: 4; word-spacing:10; line-height:150%" height="25" align="right">
<p>【<a href="xiugainews.asp?ID=<%=rs("ID")%>">编辑新闻</a>】
【<a href="javascript:window.close()">关闭窗口</a>】</td>
</tr>
</table>
</div>
</td>
</tr>
<tr>
<td width="981" height="23" colspan="2" background="newpic/a2.gif">
<p align="center"><font color="#7272C7" size="2">欢迎您的光临！</font></td>
</tr>
<tr>
<td width="16" background="newpic/a5.gif"> </td>
<td width="981" height="26" colspan="2" background="newpic/a5.gif">
<p align="center"><font size="2">曾庆添版权所有<br>
建议使用IE4.0以上版本进行浏览，最佳显示模式为800×600</font></td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -