index.asp

<1> 优化了部分代码及一些BUG.提高了浏览速度 <2> 可以通过会员助手自由管理各种信息 <3> 修正了反馈信息及询价订单错误 <4>

                      <option value="金坛">金坛</option>
                      <option value="其他">其他</option>
              </select>
          </td>
        </tr>
        <tr> 
          <td align="center" height="30"><span class="font"><font color="#ff6500">房型:</font></span> 
            <select name=search_hx style="FONT-SIZE: 9pt; WIDTH: 88px; FONT-FAMILY: 宋体; HEIGHT: 22px" >
                <option value="" selected>-内容不限-</option>
                <option value="&amp;search_hx=4室2厅2卫">4室2厅2卫</option>
                <option value="&amp;search_hx=4室2厅1卫">4室2厅1卫</option>
                <option value="&amp;search_hx=4室1厅1卫">4室1厅1卫</option>
                <option value="&amp;search_hx=3室2厅2卫">3室2厅2卫</option>
                <option value="&amp;search_hx=3室2厅1卫">3室2厅1卫</option>
                <option value="&amp;search_hx=3室1厅1卫">3室1厅1卫</option>
                <option value="&amp;search_hx=2室2厅1卫">2室2厅1卫</option>
                <option value="&amp;search_hx=2室1厅1卫">2室1厅1卫</option>
                <option value="&amp;search_hx=2室半1厅1卫">2室半1厅1卫</option>
                <option value="&amp;search_hx=1室1厅1卫">1室1厅1卫</option>
                <option value="&amp;search_hx=单间">单间</option>
                <option value="&amp;search_hx=复式">复式</option>
              </select>
          </td>
        </tr>
        <tr> 
          <td align="center" height="30"><span class="font"><font color="#ff6500">性质:</font></span> 
            <select name=search_lx style="FONT-SIZE: 9pt; WIDTH: 88px; FONT-FAMILY: 宋体; HEIGHT: 22px">
              <option value="" selected>-内容不限-</option>
              <option value="&amp;search_lx=商品房">商品房</option>
              <option value="&amp;search_lx=集资房">集资房</option>
              <option value="&amp;search_lx=拆迁房">拆迁房</option>
              <option value="&amp;search_lx=写字楼">写字楼</option>
              <option value="&amp;search_lx=公房">公房</option>
              <option value="&amp;search_lx=店面">店面</option>
              <option value="&amp;search_lx=民房">民房</option>
              <option value="&amp;search_lx=别墅">别墅</option>
            </select>
          </td>
        </tr>
        <tr> 
            <td align="center" height="31"> <a href="javascript:search()"><img src="images/search.gif" width="60" height="23" border="0"></a></td>
        </tr>
</form>
      </table>
      <table width="163" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td width="163" align="center" valign="middle" height="66"><a href="ad/hongxia/hongxia.htm" target="_blank"><img src="ad/gif/hongxia.gif" width="125" height="50" class="black_kuan" border="0"></a></td>
        </tr>
        <tr> 
          <td width="163" align="center" valign="middle" height="66"><a href="ad/lixian/lxjy.htm" target="_blank"><img src="ad/gif/lixian.gif" width="125" height="50"  class="black_kuan" border="0"></a></td>
        </tr>
        <tr> 
          <td width="163" align="center" valign="middle" height="66"><a href="#" target="_blank"><img src="ad/gif/YH.gif" width="125" height="50" class="black_kuan" border="0"></a></td>
        </tr>
        <tr> 
          <td width="163" align="center" valign="middle" height="66"><img src="ad/gif/LQB.gif" width="125" height="50" class="black_kuan" border="0"></td>
        </tr>
      </table>
    </td>
    <td height="598" align="left" valign="top"> 
      <table width="615" border="0" cellspacing="0" cellpadding="0">
        <tr align="left" valign="top"> 
          <td width="161"><img src="images/index2_r8_c7.gif" width="161" height="58"></td>
          <td width="148"><img src="images/index2_r8_c13.gif" width="148" height="58"></td>
          <td width="142"><img src="images/index2_r8_c15.gif" width="153" height="58"></td>
          <td width="164"><img src="images/index2_r8_c17.gif" width="153" height="58"></td>
        </tr>
      </table>
      <table width="615" border="0" cellspacing="0" cellpadding="0">
        <tr align="left" valign="top"> 
          <td width="13" background="images/index2_r6_c1.gif" height="174"><img src="images/index2_r6_c1.gif" width="13" height="4"></td>
          <td width="297" height="174"> 
            <table width="299" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td width="292" class="font">　<font color="#FF6600"><b>出 租</b></font></td>
                <td width="10" class="font">&nbsp;</td>
              </tr>
              <tr align="left" valign="top"> 
                <td colspan="2" height="5"><img src="images/index2_line.gif" width="280" height="3"></td>
              </tr>
              <tr> 
                <td width="292" align="left" valign="top" height="143"> 
                  <table width="280" border="0" cellspacing="0" cellpadding="0" background="images/index_r13_c7.gif">
                    <%

	strSql="select top 6 * from [house_hack] where pass='是' order by id desc"
	set rs=Server.CreateObject("ADODB.RecordSet")
	rs.open strSql,conn,3,3
%>
                    <%do while not rs.eof%>
                    <tr align="center" valign="middle" onMouseOver="mOvr(this,'#fff7e6');"  onMouseOut="mOut(this,'#ffffff');"> 
                      <a href="sub_hack.asp?id=<%=rs("id")%>" target="_blank" > 
                      <td height="19" class="smallfont" align="left">[<%=left(rs("house_name"),6)%>]&nbsp;<%=rs("hx")%>&nbsp;<font color="#FF6600"><%=rs("pay")%>(元/月)</font> 
                        <%=replace(rs("date"),right(rs("date"),8),"")%> </td>
                      </a> </tr>
                    <%
		rs.movenext
		loop%>
                    <tr align="right" valign="bottom"> 
                      <td height="23"><img src="images/index_r20_c15.gif" width="131" height="3"><br>
                        <a href="hack.asp" class="ffbyfont2">更多信息&gt;&gt;&gt;</a></td>
                    </tr>
                  </table>
                </td>
                <td width="10" align="center" valign="top" height="143"><img src="images/index2_line2.gif" width="3" height="145"></td>
              </tr>
            </table>
          </td>
          <td align="center" height="174" width="293"> 
            <table width="285" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td class="font">　<b><font color="#FF6600">求 租</font></b></td>
              </tr>
              <tr align="left" valign="top"> 
                <td height="5"><img src="images/index2_line.gif" width="280" height="3"></td>
              </tr>
              <tr> 
                <td align="left" valign="top" height="142"> 
                  <table width="280" border="0" cellspacing="0" cellpadding="0" background="images/index_r13_c7.gif">
                    <%
	strSql="select top 6 * from [house_hire] where pass='是' order by id desc"
	set rs=Server.CreateObject("ADODB.RecordSet")
	rs.open strSql,conn,3,3
%>
                    <%do while not rs.eof%>
                    <tr align="center" valign="middle" onMouseOver="mOvr(this,'#fff7e6');"  onMouseOut="mOut(this,'#ffffff');"> 
                      <a href="sub_hire.asp?id=<%=rs("id")%>" target="_blank" > 
                      <td height="19" class="smallfont" align="left">[<%=rs("qy")%>]&nbsp;<%=rs("hx")%>&nbsp;<font color="#FF6600"><%=rs("min_pay")%></font>~<font color="#FF6600"><%=rs("max_pay")%>(元/月)</font> 
                        <%=replace(rs("date"),right(rs("date"),8),"")%></td>
                      </a> </tr>
                    <%
		rs.movenext
		loop%>
                    <tr align="right" valign="bottom"> 
                      <td height="23"><img src="images/index_r20_c15.gif" width="131" height="3"><br>
                        <a href="hire.asp" class="ffbyfont2">更多信息&gt;&gt;&gt;</a></td>
                    </tr>
                  </table>
                </td>
              </tr>
            </table>
          </td>
          <td width="12" height="174" background="images/index2_r5_c16.gif" align="right"><img src="images/index2_r5_c16.gif" width="12" height="4"></td>
        </tr>
        <tr align="left" valign="top"> 
          <td width="13" height="9"><img src="images/index2_r11_c1.gif" width="13" height="10"></td>
          <td height="9" background="images/index2_r11_c4.gif" colspan="2"><img src="images/index2_r11_c4.gif" width="4" height="10"></td>
          <td width="12" height="9"><img src="images/index2_r11_c15.gif" width="12" height="10"></td>
        </tr>
      </table>
      <table width="615" border="0" cellspacing="0" cellpadding="0">
        <tr align="left" valign="top"> 
          <td width="126" height="45"><img src="images/index3_r1_c1.jpg" width="126" height="58"></td>
          <td width="483" background="images/index3_r1_c11.jpg" align="right" height="45" valign="middle">&nbsp; 
            &nbsp; </td>
          <td width="10" align="right" height="45" valign="top"><img src="images/index3_r1_c31.jpg" width="14" height="58"></td>
        </tr>
      </table>
      <table width="615" border="0" cellspacing="0" cellpadding="0">
        <tr align="left" valign="top"> 
          <td width="13" background="images/index2_r6_c1.gif" height="174"><img src="images/index2_r6_c1.gif" width="13" height="4"></td>
          <td width="297" height="174"> 
            <table width="299" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td width="292" class="font">　<font color="#FF6600"><b>出 售</b></font></td>
                <td width="10" class="font">&nbsp;</td>
              </tr>
              <tr align="left" valign="top"> 
                <td colspan="2" height="5"><img src="images/index2_line.gif" width="280" height="3"></td>
              </tr>
              <tr> 
                <td width="292" align="left" valign="top" height="143"> 
                  <table width="280" border="0" cellspacing="0" cellpadding="0" background="images/index_r13_c7.gif">
                    <%
	strSql="select top 6 * from [house_sell] where pass='是' order by id desc"
	set rs=Server.CreateObject("ADODB.RecordSet")
	rs.open strSql,conn,3,3
    do while not rs.eof%>
                    <tr align="center" valign="middle" onMouseOver="mOvr(this,'#fff7e6');"  onMouseOut="mOut(this,'#ffffff');"> 
                      <a href="sub_sell.asp?id=<%=rs("id")%>" target="_blank" > 
                      <td height="19" class="smallfont" align="left">[<%=left(rs("house_name"),6)%>]&nbsp;<%=rs("hx")%>&nbsp;<font color="#FF6600"><%=rs("pay")%>(万)</font> 
                        <%=replace(rs("date"),right(rs("date"),8),"")%> </td>
                      </a> </tr>
                    <%
		rs.movenext
		loop%>
                    <tr align="right" valign="bottom"> 
                      <td height="23"><img src="images/index_r20_c15.gif" width="131" height="3"><br>
                        <a href="hack.asp" class="ffbyfont2">更多信息&gt;&gt;&gt;</a></td>
                    </tr>
                  </table>
                </td>
                <td width="10" align="center" valign="top" height="143"><img src="images/index2_line2.gif" width="3" height="145"></td>
              </tr>
            </table>
          </td>
          <td align="center" height="174" width="293"> 
            <table width="285" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td class="font">　<b><font color="#FF6600">求 购</font></b></td>
              </tr>
              <tr align="left" valign="top"> 
                <td height="5"><img src="images/index2_line.gif" width="280" height="3"></td>
              </tr>
              <tr> 
                <td align="left" valign="top" height="142"> 
                  <table width="280" border="0" cellspacing="0" cellpadding="0" background="images/index_r13_c7.gif">
                    <%
	strSql="select top 6 * from [house_buy] where pass='是' order by id desc"
	set rs=Server.CreateObject("ADODB.RecordSet")
	rs.open strSql,conn,3,3
%>
                    <%do while not rs.eof%>
                    <tr align="center" valign="middle" onMouseOver="mOvr(this,'#fff7e6');"  onMouseOut="mOut(this,'#ffffff');"> 
                      <a href="sub_buy.asp?id=<%=rs("id")%>" target="_blank" > 
                      <td height="19" class="smallfont" align="left">[<%=rs("qy")%>]&nbsp;<%=rs("hx")%>&nbsp;<font color="#FF6600"><%=rs("min_pay")%></font>~<font color="#FF6600"><%=rs("max_pay")%>(万)</font> 
                        <%=replace(rs("date"),right(rs("date"),8),"")%></td>
                      </a> </tr>
                    <%
		rs.movenext
		loop%>
                    <tr align="right" valign="bottom">