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

📄 building_dir.asp

📁 默认管理员:etaodu 密码:etaodu 陶都房市++介绍: 本版本是基于<住易江南>美化
💻 ASP
📖 第 1 页 / 共 2 页
字号:
                            <option value=E>110-150平方</option>
                            <option value=F>150平方以上</option>
                          </select></span></span> </TD>
            </tr>
            <tr>
                <TD class=12 height=27 width="44"><FONT color=#ffffff>&nbsp;</FONT><span class=9size><span style="font-size: 9pt"><span id=fps3>租金:</span></span></span></TD>
                <TD class=12 height=27 width="111">
                <span style="font-size: 9pt" id="fps5"> 
                          <select name=txtJiag class=form>
                            <option value=% selected>---不 
                            限---</option>
                            <option value=A>1-3百/月</option>
                            <option value=B>3-5百/月</option>
                            <option value=C>5-7百/月</option>
                            <option value=D>7百-1千/月</option>
                            <option value=E>1千以上/月</option>
                          </select></span>
                         </TD>
              </tr>
            <tr>
                <TD class=12 height=27 width="44"><FONT color=#ffffff>&nbsp;</FONT><FONT 
                  color=#000000>时间:</FONT></TD>
                <TD class=12 height=27 width="111"> 
                    <span class=9size>
                        <span style="font-size: 9pt" id="fps6"> 
                          <select name=txtsj class=form>
                            <option value=3600 selected>---不 
                            限---</option>
                            <option value=7>七天内信息</option>
                            <option value=15>半月内信息</option>
                            <option value=30>一月内信息</option>
                            <option value=90>三月内信息</option>
                          </select></span></span> 
                   </TD>
            </tr>
            <tr>
                <TD align=middle colSpan=2 height=9 width="155"><INPUT name=Submit type=submit value=搜索> <INPUT name=Submit2 type=reset value=重置> </TD>
            </tr>
          </table>
          </div>
          </TD></TR>
        <TR>
          <TD align=middle height=30>
          <p align="left"> </TD></TR></FORM>
        <TR>
          <TD align=right> </TD></TR></TBODY></TABLE>
                                </div></TD>
                            </TR>
                          
                        </TABLE>
                      </TD>
                  </TR>
              </TABLE>
                <TABLE cellSpacing=0 cellPadding=0 width="208" border=0>
                  <TBODY>
              <TR>
                <TD height=5></TD></TR></TBODY></TABLE>
                <TABLE cellSpacing=0 cellPadding=0 width=208 bgColor=#e9eaf2 
            border=0>
                  <TBODY>
              <TR>
                      <TD align=middle height=20><img src="images/com_diaocha.gif" width="208" height="34"></TD>
                    </TR>
              <TR>
                      <TD align=center valign="top"> 
                        <table width="90%" border="0">
                          <tr> 
                            <td height="10">&nbsp;</td>
                          </tr>
                          <tr>
                            <td><script language="JavaScript" src="vote/vote.asp?top=1"></script></td>
                          </tr>
                        </table>
                      </TD>
                </TR></TBODY></TABLE>
              </TD>
              <TD width=538 align="center" vAlign=top> 
                <TABLE cellSpacing=0 cellPadding=0 width=528 border=0>
                  <TBODY>
                <TR> 
                  <TD width=528></TD>
                </TR>
                <TR> 
                      <TD width=528> 
                        <TABLE cellSpacing=0 cellPadding=0 width=528 border=0>
                      <TBODY>
                        <TR> 
                              <TD vAlign=top width=514 height=45><img src="images/new_bot1.gif" width="528" height="45"></TD>
                        </TR>
                        <TR> 
                          <TD class=out_grey width=528> <TABLE cellSpacing=0 cellPadding=0 width=100% border=0>
                                  <TBODY>
                                    <TR align=middle> 
                                      <TD>
<IFRAME frameBorder=0 height=100 marginHeight=1 
                  marginWidth=1 scrolling=no src="scroll_view/scroll_view.htm" 
                  width="98%" name="t1"></IFRAME></TD>
                                    </TR>
                                    <TR align=middle>
                                      <TD>
                                        <%   
set rs=server.createobject("adodb.recordset")   
sql= "SELECT *  FROM building   order by ID Desc "   
rs.open sql,conn,1,1   
if rs.eof and rs.bof then %>
                                        <p align="center"><font color="#FF0000">还没有商品房信息!</font></p>
                                        <% else %>
                                      </TD>
                                    </TR>
                                  </TBODY>
                                </TABLE></TD>
                        </TR>
                      </TBODY>
                    </TABLE></TD>
                </TR>
                <TR> 
                  <TD width=528> <TABLE cellSpacing=0 cellPadding=0 width=528 border=0>
                          <TBODY>
                        <TR> 
                          <TD height=8>&nbsp;</TD>
                        </TR>
                      </TBODY>
                    </TABLE>
                        <TABLE cellSpacing=0 cellPadding=0 width=528 border=0>
                          <TBODY>
                        <TR> 
                              <TD vAlign=top width=528 height=45><img src="images/a_loupan.gif" width="528" height="45"></TD>
                        </TR><%   
   rs.pagesize=20   
   totalPut=rs.recordcount '记录总数    
   totalPage=rs.pagecount    
   MaxPerPage=rs.pagesize    
      if currentpage<1 then    
          currentpage=1    
      end if    
      if currentpage>totalPage then    
          currentpage=totalPage    
      end if    
   if currentPage=1 then    
      showpages    
      showContent    
      showpages1    
    else    
         if (currentPage-1)*MaxPerPage<totalPut then    
         rs.move  (currentPage-1)*MaxPerPage    
         dim bookmark    
         bookmark=rs.bookmark '移动到开始显示的记录位置    
         showpages    
         showContent    
         showpages1    
      else     
               
      end if    
   end if    
      rs.close    
end if    
set rs=nothing      
conn.close    
set conn=nothing      
    
sub showContent    
     dim i,j   
   
%>
                        <TR> 
                              <TD class=out_grey width=528><TABLE border=0 cellPadding=3 cellSpacing=1 width="100%" bordercolorlight="#FFFFFF" bordercolordark="#FFFFFF" style="border-collapse: collapse" bordercolor="#111111">
                                  <TBODY>
                    <TR align=middle bgColor=#ddeede>
                                      <TD bgColor=#ddeede height=20 width="12%"><STRONG><FONT 
                        color=#333333>区域</FONT></STRONG></TD>
                                      <TD bgColor=#ddeede width="28%"><STRONG><FONT 
                        color=#333333>地段</FONT></STRONG></TD>
                                      <TD width="15%"><STRONG><FONT color=#333333>设计用途</FONT></STRONG></TD>
                                      <TD width="15%"><STRONG><FONT color=#333333>信息价</FONT></STRONG></TD>
                                      <TD width="30%"> 
                                        <P><STRONG>开发单位</STRONG></P></TD></TR>
                         <% i=1   
       do while not (rs.eof or err)%>
                    <TR align=middle bgColor=#ffffff>
                                      <TD bgcolor="#F5FAF5"><span style="font-size:9pt"> 
                                        <font color="#003399"><%= rs("qushu") %></font></span></TD>
                                      <TD height=22 bgcolor="#F5FAF5"><span style="font-size:9pt"> 
                                        <a href="javascript:fc('building_list.asp?id=<%=rs("id")%>')"><font color="#0000FF"><%= rs("name") %></font></a></span></TD>
                                      <TD bgcolor="#F5FAF5"><span style="font-size:9pt"> 
                                        <font color="#003399"> <%= rs("cjyt") %></font></span></TD>
                                      <TD bgcolor="#F5FAF5"><span style="font-size:9pt"> 
                                        <font color="#003399"> <%= rs("price") %></font></span></TD>
                                      <TD bgcolor="#F5FAF5"><span style="font-size:9pt"> 
                                        <font color="#003399"> <%= rs("who") %></font></span></TD>
                                    </TR>
                         <%     
   if i>=MaxPerPage then exit do '循环时如果到尾部则先退出,如果记录达到页最大显示数,也退出     
   i=i+1     
    rs.movenext     
    loop     
%>
                    <TR align=middle bgColor=#ffffff>
                      <TD colSpan=5 height=22 width="528">
                      <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1">
                        <tr>
                          <td width="100%">
      <%end sub %>
      <%     
dim n     
n=totalPage     
%> <form action="building_dir.asp" method="GET" align="right">
        </form>
        <div align="center"> 
          <center>
            <table width="100%" height="30" border="0" cellpadding="0" cellspacing="0">
              <tr> 
                <td width="100%" height="30" bgcolor="#F5FAF5"> 
                <p align="center"><span style="font-size:9pt"> 
                     共<font color="#FF0000"><%=totalPage%></font>页/<font color="red"><%=totalPut%></font>条商品房信息</span> 
                    <% If currentPage <> 1 Then %>
                    <A href=building_dir.asp><font color="#FF6600"><span style="font-size:9pt">
                [首页]</span></font></A> 
                    <A href=building_dir.asp?Page=<%= (currentPage-1) %> ><font color="#FF6600"><span style="font-size:9pt">
                [上一页]</span></font></A> 
                    <% End If %>
                    <% If currentPage <> rs.PageCount Then %>
                    <A href=building_dir.asp?Page=<%= (currentPage+1) %> ><font color="#FF6600"><span style="font-size:9pt">
                [下一页]</span></font></A> 
                    <A href=building_dir.asp?Page=<%= totalPage %>><font color="#FF6600"><span style="font-size:9pt">
                [尾页]</span></font></A> 
                    <% End If %>
                    <span style="font-size:9pt">第<font color="#FF0000"><%=currentPage%></font>页/共<font color="#FF0000"><%=totalPage%></font>页 
                    <%   response.write " 转到:<select name='page' size=1 class=smallselsect style='font-family: 宋体; font-size: 9pt;'>"     
     
for i=1 to n     
   response.write "<option value="& i      
   if currentpage=i then      
     response.write " selected"     
   end if     
   response.write ">"& i &"</option>"     
next     
  response.write "</select>"     
  response.write "&nbsp;<input class=buttonface type='submit'  value='go'  style='font-family: 宋体; font-size: 9pt;'>"     
%>
 <% 
rs.close
set rs=nothing
 %>

</span></td>
              </tr>
            </table>
          </center>
                          </td>
                        </tr>
                      </table>
                      </TD></TR></TBODY></TABLE></TD>
                        </TR>
                      </TBODY>
                    </TABLE></TD>
                </TR>
                <TR> 
                  <TD width=528> <TABLE cellSpacing=0 cellPadding=0 width=528 border=0>
                      <TBODY>
                        <TR> 
                          <TD height=8>&nbsp;</TD>
                        </TR>
                      </TBODY>
                    </TABLE></TD>
                </TR>
              </TBODY>
            </TABLE>
              </TD>
            </TR>
        <TR>
          <TD width=750 colSpan=2 
height=0></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=750 align=center bgColor=#ffffff 
border=0>
  <TBODY>
  <TR>
    <TD>&nbsp;</TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=750 align=center bgColor=#ffffff 
border=0>
  <TBODY>
    <TR> 
      <TD bgColor=#ffffff height=1></TD>
    </TR>
  </TBODY>
</TABLE>
</BODY></HTML>
<!--#include file=inc/bottom.asp -->

⌨️ 快捷键说明

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