hh2.asp
来自「房地产管理系统 vb写的,很不错!!!!!!!!!!!」· ASP 代码 · 共 226 行
ASP
226 行
<!--#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 color="#FF0000"><strong><font size="3">婉约派—以窗户汇编外景(图)</font></strong></font><font size="3"><strong><span class="10p"><SOHUADCODE></SOHUADCODE>
</span></strong></font> </div>
<P class="p13"> 如果说田园派的做法完全是巧夺天工，浑然天成的话，那么婉约派的做法就开始介入了更多个人的色彩，他们会首先选择恰当的风景素材，然后进行排列组合，并运用自己的创意为所选素材添加各种表现的技法与辅助材料，最后赋予这片景色一个全新的又完全表达作者本人意图的新意来，这手法看来有些像媒体的<img src="../ima/hh2.jpg" width="200" height="205" align="right">编辑工作。</P>
<p class="p13"> 恰如文章开篇我所提到的朋友家的那扇窗户，就很有编辑外景的意味。这种做法的实质在于，改变你观景的角度和立场，从而获得对景致的一个崭新认识。我们原本是要透过这样一扇窗户来看外面的景致，看到的是它原原本本的样子，但在窗户上加上一个圆形的木质框格，在你的眼睛接触到这片景色之前，等于已经为你带上一相框，这样你看到的景致就是一个新的构图方式了。而这样的构图，往往是要和整个房间的风格相互协调补充，而做到这一点，单凭外景本身，是无法做到的，这就印证了那句话：我无法改变事物的本身，但我可以改变观察事物的方式。</p>
<p class="p13"> 细心的婉约派们，可以在这里充分发挥自己的创意和浪漫情怀，在外景的重新构图上尽显自己的编辑手段，营造出一幅幅生动而别致，细腻而情趣盎然的室内天然风景画来。<br>
<br>
来源：[ 四川在线 ] 2003-04-30 09:13:10 </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 + -
显示快捷键?