⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 index.asp

📁 一个专业的房地产门户网站
💻 ASP
📖 第 1 页 / 共 4 页
字号:
          <td align="center"><table width="570" border="0" cellpadding="0" cellspacing="1">
              <tr> 
                <td bgcolor="#FFFFFF"><img src="banner/banner01.gif" width="570" height="80"></td>
              </tr>
            </table></td>
        </tr>
      </table>
      <table width="100%" border="0" cellpadding="0" cellspacing="0">
        <tr> </tr>
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td align="center" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr bgcolor="#d62c00"> 
                <td width="7%"><img src="images/biao2.gif" width="40" height="25"></td>
                <td width="30%"><table width="98%" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td><font color="#FFFFFF">最新出租信息</font></td>
                    </tr>
                  </table></td>
                <td width="63%" bgcolor="#d62c00">
<table width="98%" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td>&nbsp;</td>
                      <td>&nbsp;</td>
                    </tr>
                  </table>
                </td>
              </tr>
              <tr bgcolor="#9c2000"> 
                <td colspan="3"><img src="images/5x5.gif" width="5" height="5"></td>
              </tr>
              <tr> 
                <td colspan="3" align="center" valign="top"><table border="0" cellpadding="2" cellspacing="2" style="border-collapse: collapse; border-width: 0" bordercolor="#111111" id="AutoNumber5" align="center" width="96%">
                    <tr bgcolor="#f7f7f7"> 
                      <td width="15%" style="border-style: none; border-width: medium"> 
                        <div align="left"><span style="font-size: 9pt">所属区域</span></div></td>
                      <td style="border-style: none; border-width: medium"> <div align="left"><span style="font-size: 9pt">地 点</span></div></td>
                      <td width="15%" style="border-style: none; border-width: medium"> 
                        <div align="left"><span style="font-size: 9pt"> 类 别</span></div></td>
                      <td width="15%" style="border-style: none; border-width: medium"> 
                        <div align="left"><span style="font-size: 9pt">租 金</span></div></td>
                      <td width="15%" style="border-style: none; border-width: medium"> 
                        <div align="left"><span style="font-size: 9pt">登记日期</span></div></td>
                    </tr>
                    <%sql="select top 8 * from rent order by zid desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write"还没有房源"
else
do while not rs.eof
%>
                    <tr class="9size" bgcolor="#f7f7f7"> 
                      <td style="border-style: none; border-width: medium"><%=(rs.Fields.Item("Diduan").Value)%></td>
                      <td style="border-style: none; border-width: medium"> <div align="left"><span style="font-size:9pt"><a href="show.asp?typeto=rent&<%= "zid=" & rs.Fields.Item("zid").Value %>" target="_blank" onClick="return newpage(this.href);"><font color="#FF6600"> 
                          <%if len(rs("Xiaoqm"))>15 then %>
                          <%=left(rs("Xiaoqm"),15)%>... 
                          <%else%>
                          <%=rs("Xiaoqm")%> 
                          <%end if %>
                          </font></a></span></div></td>
                      <td style="border-style: none; border-width: medium"> <div align="left"><span style="font-size:9pt"><%=(rs.Fields.Item("Taox").Value)%></span></div></td>
                      <td style="border-style: none; border-width: medium"><%=(rs.Fields.Item("Jiag").Value)%><%=(rs.Fields.Item("fangshi").Value)%></td>
                      <td style="border-style: none; border-width: medium"><a href="show.asp?typeto=rent&<%= "zid=" & rs.Fields.Item("zid").Value %>" target="_blank" onClick="return newpage(this.href);"></a><span style="font-size:9pt"><%=(rs.Fields.Item("dat").Value)%></span></td>
                    </tr>
                    <%
rs.movenext
loop
end if
rs.close
%>
                  </table></td>
              </tr>
              <tr> 
                <td height="20" colspan="2"> &nbsp;&nbsp;[<a href="user_index.asp">我要发布</a>]&nbsp; 
                </td>
                <td align="right"> <img src="images/fang.gif" width="12" height="12">&nbsp;<a href="houselist.asp?type=rent">更多出租房信息</a></td>
              </tr>
            </table></td>
        </tr>
      </table>
      <table width="100%" border="0" cellpadding="0" cellspacing="0">
        <tr> 
          <td height="10">&nbsp;</td>
        </tr>
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td align="center" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr bgcolor="#2986d6"> 
                <td width="7%"><img src="images/biao1.gif" width="40" height="25"></td>
                <td width="31%"><table width="98%" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td><font color="#FFFFFF">最新出售信息</font></td>
                    </tr>
                  </table></td>
                <td width="62%">&nbsp;</td>
              </tr>
              <tr bgcolor="#005194"> 
                <td colspan="3"><img src="images/5x5.gif" width="5" height="5"></td>
              </tr>
              <tr> 
                <td colspan="3" align="center" valign="top"><table border="0" cellpadding="2" cellspacing="2" style="border-collapse: collapse; border-width: 0" bordercolor="#111111" id="AutoNumber4" align="center" width="96%">
                    <tr bgcolor="#f7f7f7"> 
                      <td width="15%" style="border-style: none; border-width: medium"> 
                        <div align="left"><span style="font-size: 9pt">所属区域</span></div></td>
                      <td style="border-style: none; border-width: medium"> <div align="left"><span style="font-size: 9pt">地 点</span></div></td>
                      <td width="15%" style="border-style: none; border-width: medium"> 
                        <div align="left"><span style="font-size: 9pt"> 类 别</span></div></td>
                      <td width="15%" style="border-style: none; border-width: medium"> 
                        <div align="left"><span style="font-size: 9pt">价 格</span></div></td>
                      <td width="15%" style="border-style: none; border-width: medium"> 
                        <div align="left"><span style="font-size: 9pt">登记日期</span></div></td>
                    </tr>
                    <%sql="select top 8 * from sale order by zid desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write"还没有房源"
else
do while not rs.eof
%>
                    <tr class="9size" bgcolor="#f7f7f7"> 
                      <td style="border-style: none; border-width: medium"><%=(rs.Fields.Item("Diduan").Value)%></td>
                      <td style="border-style: none; border-width: medium"> <div align="left"><span style="font-size:9pt"><a href="show.asp?typeto=sale&<%= "zid=" & rs.Fields.Item("zid").Value %>" target="_blank" onClick="return newpage(this.href);"><font color="#FF6600"> 
                          <%if len(rs("Xiaoqm"))>15 then %>
                          <%=left(rs("Xiaoqm"),15)%>... 
                          <%else%>
                          <%=rs("Xiaoqm")%> 
                          <%end if %>
                          </font></a></span></div></td>
                      <td style="border-style: none; border-width: medium"> <div align="left"><span style="font-size:9pt"><%=(rs.Fields.Item("Taox").Value)%></span></div></td>
                      <td style="border-style: none; border-width: medium"><%=(rs.Fields.Item("Jiag").Value)%><%=(rs.Fields.Item("fangshi").Value)%></td>
                      <td style="border-style: none; border-width: medium"><a href="show.asp?typeto=sale&<%= "zid=" & rs.Fields.Item("zid").Value %>" target="_blank" onClick="return newpage(this.href);"></a><span style="font-size:9pt"><%=(rs.Fields.Item("dat").Value)%></span></td>
                    </tr>
                    <%
rs.movenext
loop
end if
rs.close
%>
                  </table></td>
              </tr>
              <tr> 
                <td height="20" colspan="2"> &nbsp;&nbsp;[<a href="user_index.asp">我要发布</a>]</td>
                <td align="right"><img src="images/fang.gif" width="12" height="12">&nbsp;<a href="houselist.asp?type=sale">更多出售房信息</a></td>
              </tr>
            </table></td>
        </tr>
      </table>
      <table width="100%" border="0" cellpadding="0" cellspacing="0">
        <tr> 
          <td height="10" align="right" valign="bottom">&nbsp;</td>
        </tr>
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td align="center" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr bgcolor="#ffb600"> 
                <td width="8%"><img src="images/biao4.gif" width="40" height="25"></td>
                <td width="30%"><table width="98%" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td><font color="#FFFFFF">求租求购信息</font></td>
                    </tr>
                  </table></td>
                <td width="62%" bgcolor="#ffb600">&nbsp;</td>
              </tr>
              <tr bgcolor="#ef8508"> 
                <td colspan="3"><img src="images/5x5.gif" width="5" height="5"></td>
              </tr>
              <tr> 
                <td colspan="3" align="center" valign="top"><table border="0" cellpadding="2" cellspacing="2" style="border-collapse: collapse; border-width: 0" bordercolor="#111111" id="AutoNumber4" align="center" width="96%">
                    <tr bgcolor="#f7f7f7"> 
                      <td width="10%" style="border-style: none; border-width: medium">类型</td>
                      <td width="15%" style="border-style: none; border-width: medium"> 
                        <div align="left"><span style="font-size: 9pt">所属区域</span></div></td>
                      <td style="border-style: none; border-width: medium"> <div align="left"><span style="font-size: 9pt">地 点</span></div></td>
                      <td width="15%" style="border-style: none; border-width: medium"> 
                        <div align="left"><span style="font-size: 9pt"> 类 别</span></div></td>
                      <td width="15%" style="border-style: none; border-width: medium"> 
                        <div align="left"><span style="font-size: 9pt">价 格</span></div></td>
                      <td width="15%" style="border-style: none; border-width: medium"> 
                        <div align="left"><span style="font-size: 9pt">登记日期</span></div></td>
                    </tr>
                    <%sql="select top 8 * from need order by zid desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write"还没有房源"
else
do while not rs.eof
%>
                    <tr class="9size" bgcolor="#f7f7f7"> 
                      <td style="border-style: none; border-width: medium"><%=(rs.Fields.Item("qiu").Value)%></td>
                      <td style="border-style: none; border-width: medium"><%=(rs.Fields.Item("Diduan").Value)%></td>
                      <td style="border-style: none; border-width: medium"> <div align="left"><span style="font-size:9pt"><a href="show_need.asp?<%= "zid=" & rs.Fields.Item("zid").Value %>&typeto=need" target="_blank" onClick="return newpage(this.href);"><font color="#FF6600"> 
                          <%if len(rs("Xiaoqm"))>10 then %>
                          <%=left(rs("Xiaoqm"),10)%>... 
                          <%else%>
                          <%=rs("Xiaoqm")%> 
                          <%end if %>
                          </font></a></span></div></td>
                      <td style="border-style: none; border-width: medium"> <div align="left"><span style="font-size:9pt"><%=(rs.Fields.Item("Taox").Value)%></span></div></td>
                      <td style="border-style: none; border-width: medium"><%=(rs.Fields.Item("Jiag").Value)%><%=(rs.Fields.Item("fangshi").Value)%></td>
                      <td style="border-style: none; border-width: medium"><a href="show.asp?typeto=sale&<%= "zid=" & rs.Fields.Item("zid").Value %>" target="_blank" onClick="return newpage(this.href);"></a><span style="font-size:9pt"><%=(rs.Fields.Item("dat").Value)%></span></td>
                    </tr>
                    <%
rs.movenext
loop
end if
rs.close
%>
                  </table></td>
              </tr>
              <tr> 
                <td height="20" colspan="2"> &nbsp;&nbsp;[<a href="user_index.asp">我要发布</a>]&nbsp; 
                </td>
                <td align="right"> <img src="images/fang.gif" width="12" height="12">&nbsp;<a href="houseneedlist.asp">更多求租求购信息</a></td>
              </tr>
            </table></td>
        </tr>
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td height="10" align="center">&nbsp;</td>
        </tr>
      </table></td>
  </tr>
  <tr> </tr>
  <tr> </tr>
  <tr> </tr>
  <tr> 
    <td align="center" valign="bottom" background="images/index_00.gif">&nbsp;</td>
  </tr>
</table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#999999" class="bk">
  <tr>
    <td height="1">
	</td>
  </tr>
</table>
<table width="800" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td>
      <!--#include file="bottom.asp" -->
    </td>
  </tr><map name="Map">
  <area shape="rect" coords="462,2,550,20" href="user_index.asp">
</map>
<map name="Map2">
  <area shape="rect" coords="477,7,560,26" href="loupanlist.asp">
</map>
<map name="Map3">
  <area shape="rect" coords="462,4,551,21" href="user_index.asp">
</map>
<map name="Map4">
  <area shape="rect" coords="463,2,550,19" href="user_index.asp">
</map>
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -