hh3.asp
来自「房地产管理系统 vb写的,很不错!!!!!!!!!!!」· ASP 代码 · 共 230 行
ASP
230 行
<!--#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><font color="#FFFFFF">
</font></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">
<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>
<br>
<br>
</B></FONT> <span class="10p"><SOHUADCODE></SOHUADCODE>
</span> </div>
<P><span class="10p"> </span><span class="p13"> 田园派也好，婉约派也罢，终归还是以景致为本，然后以不同的方式来展现景致而已。但现在的设计思路其实是完全可以抛开一切常理束缚，一切以表达为中心，所有的事物都只是表达的手段，这就是先锋派的做法了。</span></P>
<p class="p13"> 外景能做什么样的素材？又如何表达呢？其实不难，你所需要改变的，只是一种思维的方式。举一个简单的例子，比如说很多家里在装饰墙面时，会<span class="10p"><img src="../ima/hh3.jpg" width="273" height="180" align="right"></span>运用到墙裙和腰线，腰线通常都是一些带图案的壁纸。好了，既然有图案，那这个图案的来源是否可以改换一下？这里你就可以运用到外景，你可以在墙上开一个长方形的缺口，当然是要选择墙外有适当风景的位置，然后装上玻璃，就像一个特殊的窗户，这样室外的美丽景致就通过玻璃呈现在你的墙面，这岂不是最天然的腰线装饰？</p>
<p class="p13"> 不仅是腰线，墙裙，小的壁挂，长的条案，都是可以采用这样的装饰思路的。只是，在这样做之前，你必须对你所选的景致有一个相当精当的分析，看看它适合表达什么，它的构图效果，繁简的比例等等，再就是明确你需要用它来做什么。先锋是一种表现手段，也会在观念上匪夷所思，但基本的艺术规律却是放之四海而皆准的。</p>
<p></p>
<p class="p13"><br>
来源：[ 四川在线 ] 2003-04-30 09:16:54 </p></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 + -
显示快捷键?