?? new.asp
字號:
<%
city=request("s2")
if city="地級市" then
%>
<script language=javascript>
history.back()
alert("請先選擇站點！")
</script>
<%
Response.End
end if
if request("s004")="0" or request("s005")="0" then
%>
<script language=javascript>
history.back()
alert("請選擇新樓類型或物業類型！")
</script>
<%
Response.End
end if
%>
<!--#include file="head.asp"-->
<!--#include file="diao.asp"-->
<TABLE width=760 border=0 align=center cellPadding=0 cellSpacing=0 bgcolor="#FFFFFF" class=bk>
<TBODY>
<TR>
<TD vAlign=top align=middle width=150
background=images/index_00.gif
height=500>
<!--#include file="left.asp"-->
<br> </TD>
<TD vAlign=top align=middle height=300 rowSpan=12>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD align=middle> <table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/sj_dhtp.jpg" >
<tr>
<td width="4%"><img src="images/sj_dh.jpg" width="29" height="28"></td>
<td width="71%"> </td>
<td width="25%"> </td>
</tr>
</table></TD>
</TR>
<TR>
<TD align=left valign="top">
<% s003=request("s003")
s004=request("s004")
if s003="snew_" then
y003="在售"
else
y003="預開"
end if
if s004="zhu_zai" then
y004="住宅"
else if s004="xie_zi" then
y004="寫字樓"
else
y004="商鋪"
end if
end if
s3=trim(request("s3"))
city2=s3
if city2="任意區縣" then
city2="任意區縣"
end if
response.Write "<div align=center><b>"&city&" - "&city2&"<br>新樓盤 — "&y003&" — "&y004&" — 信息</div></b><br>"
%>
</div>
<% table=s003&s004
set rs=server.createobject("adodb.recordset")
s005=trim(request("s005"))
sql ="select * from "&table&" where 1=1 "
if s005="1" then '不限物業類型
else
sql =sql & " and ttype='"&s005&"' "
end if
if s3="任意區縣" then '任意區縣
sql =sql & " and area2='"&city&"' "
else
sql =sql & " and area3='"&s3&"' "
end if
sql =sql & " order by id desc "
rs.open sql,conn,1,1
if rs.eof or rs.bof then
response.Write("<br><div align=center>數據庫中暫無任何記錄！</div>")
else%>
<TABLE style="BORDER-COLLAPSE: collapse"
borderColor=#dedede cellSpacing=0 cellPadding=4
width="98%" align=center border=0>
<TR vAlign=bottom bgColor=#00ccff>
<TD width="19%"
bgColor=#99ccff
style="BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; BORDER-LEFT: 1px solid; BORDER-BOTTOM: 1px solid"><div align="center">樓盤名稱</div></TD>
<TD width="27%"
bgColor=#99ccff
style="BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; BORDER-LEFT: 1px solid; BORDER-BOTTOM: 1px solid"><div align="center">地段</div></TD>
<TD width="13%"
bgColor=#99ccff
style="BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; BORDER-LEFT: 1px solid; BORDER-BOTTOM: 1px solid"><div align="center">物業類型</div></TD>
<TD width="12%"
bgColor=#99ccff
style="BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; BORDER-LEFT: 1px solid; BORDER-BOTTOM: 1px solid"> <div align="center">面積<br>
(平方米)</div></TD>
<TD width="14%"
bgColor=#99ccff
style="BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; BORDER-LEFT: 1px solid; BORDER-BOTTOM: 1px solid"><div align="center">
<% if s003="snew_" then
response.Write("售價<br>(元／平方米)")
else
response.Write("預計開盤價<br>(元／平方米)")
end if%>
</div></TD>
<TD width="15%"
bgColor=#99ccff
style="BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; BORDER-LEFT: 1px solid; BORDER-BOTTOM: 1px solid">
<div align="center">開發商</div></TD>
</TR>
<%if request.querystring("page")="" then
curpage = 1
else
curpage = cint(request.querystring("page"))
end if
'================================修改2處：顯示的記錄數===============
rs.pagesize=15 '每頁顯示15條新聞
rs.absolutepage = curpage
pagecount=curpage
n=1
do while not rs.eof%>
<TR bgColor=#f8f8f8>
<TD
style="BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; BORDER-LEFT: 1px solid; BORDER-BOTTOM: 1px solid"
align=middle><a target="_blank" href="new_show.asp?id=<%=rs("id")%>&s003=<%=s003%>&s004=<%=s004%>&name2=<%=rs("name2")%>"><font color="#CC3300"><%=rs("name2")%></font></a></TD>
<TD
style="BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; BORDER-LEFT: 1px solid; BORDER-BOTTOM: 1px solid">
<%
add=rs("address")
if len(add)>10 then
add=left(rs("address"),10)&"..."
end if
response.write add
%>
</TD>
<TD
style="BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; BORDER-LEFT: 1px solid; BORDER-BOTTOM: 1px solid"><%=rs("ttype")%></TD>
<TD
style="BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; BORDER-LEFT: 1px solid; BORDER-BOTTOM: 1px solid"><%=rs("mian_ji")%></TD>
<TD
style="BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; BORDER-LEFT: 1px solid; BORDER-BOTTOM: 1px solid">
<% if s003="snew_" then
response.write rs("price")
else
response.write rs("date1")
end if%></TD>
<TD
style="BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; BORDER-LEFT: 1px solid; BORDER-BOTTOM: 1px solid"><%=rs("kfs")%></TD>
</TR>
<%rs.movenext
n=n+1
if n>rs.pagesize then exit do
loop
%>
</table>
<% response.Write("<br><div align=center> ")
filename="?s003="&s003&"&s004="&s004&"&s3="&s3&"&s2="&city&"&s005="&s005&"&"
if PageCount=1 then
response.write "<font color='#000064'>首頁 上頁</font> "
else
response.write "<a href="&filename&"page=1><font color='0000BE'>首頁</font></a> "
response.write "<a href="&filename&"page="&(pagecount-1)&"><font color='0000BE'>上頁</font></a> "
end if
if rs.PageCount-pagecount<1 then
response.write "<font color='#000064'>下頁 尾頁</font>"
else
response.write "<a href="&filename&"page="&(pagecount+1)&"><font color='0000BE'>下頁</font></a> "
response.write "<a href="&filename&"page="&rs.PageCount&"><font color='0000BE'>尾頁</font></a>"
end if
response.write "<font color='000064'> 頁次:<font color=blue>"&pagecount&"</font>/"&rs.PageCount&"頁</font></div><br> "
'end end*********************
end if
rs.close
set rs=nothing
%>
</TD>
</TR>
</TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD align=middle vAlign=top> <IMG
height=3
src="images/index_li2.gif"></TD>
</TR>
</TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR></TR>
</TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR></TR>
</TBODY>
</TABLE>
</TD>
</TR>
<TR></TR>
<TR></TR>
<TR></TR>
<TR>
</TR>
</TBODY>
</TABLE>
<!--#include file="footer.asp"-->
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -