hh1.asp
来自「房地产管理系统 vb写的,很不错!!!!!!!!!!!」· ASP 代码 · 共 229 行
ASP
229 行
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/getPartStrAndBytesLen.asp" -->
<!--#include file="../inc/onlinecount.asp"-->
<!--#include file="../top.asp"-->
<%
Dim Rs,Sql
OpenDataConn
Set Rs=Server.CreateObject("ADODB.Recordset")
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE><%=homepage_title%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<script language="JavaScript" src="../inc/index.js"></script>
<LINK
href="../img/css.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.3790.2706" name=GENERATOR></HEAD>
<BODY class=bg1 text=#000000 bgColor=#ffffff leftMargin=0 topMargin=1>
<TABLE height=28 cellSpacing=0 cellPadding=0 width=980 align=center
background=../img/headbg4.gif border=0>
<TBODY>
<TR>
<TD align=right width=35>
<IMG height=13 src="../img/headarrow.gif"
width=17></TD>
<TD align=middle width=10></TD>
<TD class=TD_Place width=935>您现在的位置：<a href="../index.asp"><font color="#FFFFFF"><%=homepage_title%></font> </a>>>
</TD></TR></TBODY></TABLE>
<TABLE height=7 cellSpacing=0 cellPadding=0 width=980 align=center
background=../img/headbg5.gif border=0>
<TBODY>
<TR>
<TD></TD></TR></TBODY></TABLE>
<TABLE height=100 cellSpacing=0 cellPadding=0 width=970 align=center border=0>
<TBODY>
<TR>
<TD vAlign=top width=260 height=100>
<TABLE class=out3s_green height="100%" cellSpacing=0 cellPadding=0
width=255 bgColor=#7cb721 border=0>
<TBODY>
<TR>
<TD vAlign=top>
<TABLE cellSpacing=0 cellPadding=0 width="99%" align=center
border=0>
<TBODY>
<TR>
<TD background="../img/36.gif" height="38"> <b>
<font color=#FFFFFF>时 尚 家 具</font></b></TD></TR>
<TR>
<TD>
<table width="255" border="0" cellpadding="0" cellspacing="0" class="main">
<tr valign="top">
<td align="center" width="255">
<table width="255" border="0" cellpadding="0" cellspacing="0" bgcolor="#7CB721" class="main">
<%
set rs=server.CreateObject("adodb.recordset")
sql="select top 6 * from news where sort=2 order by dnt desc"
rs.open sql,conn,1,1
do while not rs.eof
%>
<tr class="black">
<td width="10"> </td>
<td width="12" height="19"> <div align="center">
<img border="0" src="../img/arr_w1.gif" width="9" height="9"></div></td>
<td width="178" height="19"><a href= jiaju_detail.asp?newsid=<%=trim(rs("newsid"))%>&sort=2>
<font color=#ffffff><%=left(trim(rs("topic")),14)%></a></font></td>
</tr>
<%
rs.movenext
loop
rs.close
set rs=nothing
%>
</table></td>
</tr>
<tr>
<td align="center">
<p align="right">
<a href="jiaju_more.asp?sort=2"><font color=#ffffff>更多</a></font> </td>
</tr>
</table>
</TD></TR>
<TR>
<TD background="../img/36.gif" height="39"> <b>
<font color=#ffffff>装 修 流 行 线</font></b></TD></TR>
<TR>
<TD>
<table width="198" border="0" cellpadding="0" cellspacing="0" class="main">
<tr class="black" height="7">
<td height="7" colspan="2"></td>
</tr>
<%
set rs=server.CreateObject("adodb.recordset")
sql="select top 7 * from news where sort=3 order by dnt desc"
rs.open sql,conn,1,1
do while not rs.eof
%>
<tr class="black">
<td width="19" height="19"> <div align="center">
<img border="0" src="../img/arr_w1.gif" width="9" height="9"></div></td>
<td width="313" height="19"><a href= jiaju_detail.asp?newsid=<%=trim(rs("newsid"))%>&sort=3><font color=#FFFFFF><%=left(trim(rs("topic")),15)%></font></a></td>
</tr>
<%
rs.movenext
loop
rs.close
%>
</table>
</TD></TR>
<TR>
<TD>
<p align="right"><a href="jiaju_more.asp? sort=3"><font color=#FFFFFF>更多</font></a> </TD></TR>
<TR>
<TD background="../img/36.gif" height="38"> <b>
<font color=#FFFFFF>家 装 指 南</font></b></TD></TR>
<TR>
<TD>
<table width="198" border="0" cellpadding="0" cellspacing="0" class="main">
<tr class="black" height="7">
<td height="7" colspan="2"></td>
</tr>
<%
set rs=server.CreateObject("adodb.recordset")
sql="select top 7 * from news where sort=5 order by dnt desc"
rs.open sql,conn,1,1
do while not rs.eof
%>
<tr class="black">
<td width="19" height="19"> <div align="center">
<img border="0" src="../img/arr_w1.gif" width="9" height="9"></div></td>
<td width="313" height="19"><a href=jiaju_detail.asp?newsid=<%=trim(rs("newsid"))%>&sort=5><font color=#FFFFFF><%=left(trim(rs("topic")),15)%></font></a></td>
</tr>
<%
rs.movenext
loop
rs.close
%>
</table>
</TD></TR>
<TR>
<TD>
<p align="right"><a href=jiaju_more.asp?sort=5><font color=#FFFFFF>更多 </font></a>
</TD></TR>
<TR>
<TD> </TD></TR>
<TR>
<TD> </TD></TR>
</TBODY></TABLE></TD></TR></TBODY></TABLE></TD>
<TD vAlign=top>
<TABLE cellSpacing=0 cellPadding=0 border=0>
<TBODY>
<TR></TR>
<TR>
<TD height=5></TD></TR></TBODY></TABLE>
<div align="right">
<TABLE height=30 cellSpacing=0 cellPadding=0 width=710 border=0 id="table7">
<TBODY>
<TR>
<TD width=5><IMG height=30 src="../img/news1a.gif" width=5></TD>
<TD width=150 background=../img/news4a.gif>
<IMG height=9
src="../img/arr_w2.gif" width=9> <a href="jiaju.asp" class="linkone"><font color=#FFFFFF>家装家居-->时尚家居</font></a></TD>
<TD width=5><IMG height=30 src="../img/news2a.gif" width=5></TD>
<TD background=../img/news5a.gif> </TD>
<TD width=5><IMG height=30 src="../img/news3a.gif"
width=5></TD></TR></TBODY></TABLE>
</div>
<TABLE height=3 cellSpacing=0 cellPadding=0 width=75 border=0>
<TBODY>
<TR>
<TD></TD></TR></TBODY></TABLE>
<div align="right">
<TABLE class=out4s_green cellSpacing=0 cellPadding=0 width=705 border=0>
<TBODY>
<TR>
<TD vAlign=top>
<td width="705" valign="top">
<div align="center">
<TABLE width=700 border=0 cellPadding=6 cellSpacing=0 bordercolor="#FFCCCC" class="main">
<TBODY>
<TR>
<TD width="516" height=6></TD>
</TR>
<TR>
<TD valign="top"><div align="center"><FONT size=4><B><FONT color=#FF0000 size="3">田园派—以窗户定格外景(图)</FONT>
</B></FONT> <span class="10p"><SOHUADCODE></SOHUADCODE>
</span> </div>
<P><span class="10p"> </span><span class="p13"> 一个房屋的建筑，通常是会充分考虑到房屋朝向与周遭环境的配合的。所以在做房间格局的规划前，应该先观察一下周围的天然环境，然后将之做一个有机的结合，你就可以自然地将屋外的风景收纳到室内来，成为室内最富生气的装饰。比如说，在你房屋的一侧，恰有几棵郁郁葱葱的迎客松或是浓密的水杉，你不妨将客厅的窗户就</span><span class="10p"><img src="../ima/hh1.jpg"
width=200 height="259" border=0 align="right"></span><span class="p13">安置在这一侧，并配合外景的主题色调，给窗户配以适当的装饰框边，这样室外的美景剪影就自然地定格在你的窗前，成就了一幅大气而生动的客厅挂图，总会让来访的客人眼前一亮，心情轻松，宾主间的拘谨感也会因此释然。</span></P>
<P class="p13"> 再倘若你的房间有一片比较连贯的开阔景色，一块绿田或一片草圃，单取其中一部分难以形成视觉上的完整性，那么你可以考虑用落地窗的形式来定格。高大的玻璃窗从上至下，不要有任何隔断，这样玻璃之外的景色就可能从玻璃的底部自然地衔接并延续开来，于是你会发现，你的房间，竟也成了你观察这片景色的眼睛，而且还成了这片景色的一个最人文的开端，那种被自然庇护的感觉，身居室内也可尽情享受了。</P>
<P class="p13"> 用窗户来定格外景，要注意景色的单一性与完整性，画面呈现应简洁而单纯，切忌杂七杂八的什么都有。<span class="p13">
</span> </P>
<DIV align=right class="p13">来源：[ 四川在线 ] <FONT color=#999999>2003-04-30
08:51:38 </FONT></DIV></TD>
</TR>
</TBODY>
</TABLE>
</div>
</td>
</div>
<TABLE height=5 cellSpacing=0 cellPadding=0 width=75 border=0>
<TBODY>
<TR>
<TD></TD></TR></TBODY></TABLE>
<div align="right">
<TABLE cellSpacing=0 cellPadding=0 width=708
background=../img/bomgreen2.gif border=0>
<TBODY>
<TR>
<TD width=20>
<IMG height=27 src="../img/bomgreen1.gif"
width=13></TD>
<TD align=right>
</TD></TR></TBODY></TABLE></div>
</TD></TR></TBODY></TABLE>
<TABLE height=5 cellSpacing=0 cellPadding=0 width=75 border=0>
<TBODY>
<TR>
<TD></TD></TR></TBODY></TABLE>
</TD></TR></TBODY></TABLE>
<!--#include file="../end.asp"-->
</BODY></HTML>
<%
Set Rs=Nothing
CloseDataConn
%>⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?