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

📄 show.asp

📁 一个专业的房地产门户网站
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT"%> 
<!--#include file="conn.asp"--> 
<%
 dim typeto,idtype
typeto=trim(request("typeto"))
idtype=trim(request("idtype"))
 %>

<% 
set rs=server.createobject("adodb.recordset")
sql="update "& typeto &" set dj=dj+1  where zid = "&request("zid")
rs.open sql,conn,1,3
sql="select * from "& typeto &" where zid = "&request("zid")
rs.open sql,conn,1,1 
name1=(rs.Fields.Item("username").Value)
fdat=(rs.Fields.Item("dat").Value)
Num1=Cstr(year(fdat))
Num2=Cstr(month(fdat))
Num3= Cstr(day(fdat))
%> 
<html>
<head>
<title>房源详细信息</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<SCRIPT language=JavaScript1.2> 
var bookmarkurl=<% =url %>
var bookmarktitle=<% =name %>
function addbookmark(){
if (document.all)
window.external.AddFavorite(bookmarkurl,bookmarktitle)
} 
</SCRIPT>
<LINK 
href="images/css.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2800.1106" name=GENERATOR></HEAD>
<BODY text=#000000 bgColor=#bcbe78 leftMargin=0 topMargin=0>
<TABLE cellSpacing=0 cellPadding=0 width=300 align=center border=0>
  <TBODY>
    <TR> 
      <TD height="20" bgColor=#CCCC66><font color="#FFFFFF"> &nbsp;&nbsp;</font>房源详细信息</TD>
    </TR>
    <TR>
      <TD bgColor=#808000><img src="images/5x5.gif" width="5" height="5"></TD>
    </TR>
    <TR> 
      <TD bgColor=#ffffff height=5></TD>
    </TR>
  </TBODY>
</TABLE>
<TABLE cellSpacing=1 borderColorDark=#ffffff cellPadding=0 width=300 
align=center bgColor=#bcbe78 border=0>
  <TBODY>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>点  击:</TD>
      <TD height=18><%=(Rs.Fields.Item("dj").Value)%></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>房屋编号:</TD>
      <TD height=18><b><font color="#FF0000"> 
        <% If (rs.Fields.Item("num").Value)="" Then %>
        <%=(rs.Fields.Item("zid").Value)%> 
        <% Else %>
        <%= (rs.Fields.Item("num").Value) %> 
        <% End If %>
        </font></b></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>区域所属:</TD>
      <TD height=18><font color="#FF0000"><%=(rs.Fields.Item("Diduan").Value)%></font></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>房屋座落:</TD>
      <TD height=18><%=(rs.Fields.Item("xiaoqm").Value)%></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>房产类型:</TD>
      <TD height=18><%=(rs.Fields.Item("Taox").Value)%></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18><span style="font-size: 9pt"><font color="#000000">房产权属</font></span>:</TD>
      <TD height=18><%=(rs.Fields.Item("changq").Value)%></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18><span style="font-size: 9pt"><font color="#000000">建成日期</font></span>:</TD>
      <TD height=18><font size="2"> 
        <% if (rs.Fields.Item("D").Value)=" " then %>
        <% else %>
        <% =(rs.Fields.Item("D").Value)%>
        <% end if %>
        </font></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>所在楼层:</TD>
      <TD height=18><span style="font-size: 9pt"><font color="#000000">楼层:</font><%=(rs.Fields.Item("lc").Value)%><font color="#000000">,共</font><%=(rs.Fields.Item("Tc").Value)%><font color="#000000">层</font> 
        </span></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>建筑面积:</TD>
      <TD height=18><%=(rs.Fields.Item("Mianj").Value)%><font color="#000000">平方米</font></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18><span style="font-size: 9pt"> 
        <% If typeto="sale" Then
					  response.Write("价 格")
					  else
					  response.Write("租 金")
					  end if %>
        </span>:</TD>
      <TD height=18><font size="2"><%=(rs.Fields.Item("jiag").Value)%><%=(rs.Fields.Item("fangshi").Value)%></font></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>装修情况:</TD>
      <TD height=18><font size="2"><%=(rs.Fields.Item("zx").Value)%></font></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>发布时间:</TD>
      <TD height=18><font size="2"> 
        <% =Num1 %>
        <font color="#000000">年</font> 
        <% =Num2 %>
        <font color="#000000">月</font> 
        <% =Num3 %>
        <font color="#000000">日</font> <span style="font-size: 9pt"><%=(rs.Fields.Item("time").Value)%></span></font></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>联 系 人:</TD>
      <TD height=18><font color="#FF0000"><%=(rs.Fields.Item("Contperson").Value)%></font></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>联系电话:</TD>
      <TD height=18><font color="#FF0000"><%=(rs.Fields.Item("tele").Value)%></font></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>E_mail:</TD>
      <TD height=18><font color="#FF0000"><%=(rs.Fields.Item("email").Value)%></font></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>其他说明:</TD>
      <TD style="WORD-BREAK: break-all" 
  height=18><font size="2"> 
        <% if (rs.Fields.Item("Content").Value)=" " then %>
        <% else %>
        <% =(rs.Fields.Item("Content").Value)%>
        <% end if %>
        </font></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=middle colSpan=2 height=18>[<A 
      href="javascript:window.close();">关闭窗口</A>]</TD>
    </TR>
  </TBODY>
  <% 
		rs.close
		set rs=nothing
		 %>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=300 align=center border=0>
  <TBODY>
  <TR>
      <TD align=middle height=20><FONT 
      face="Arial, Helvetica, sans-serif">2001-2004</FONT>&copy; 陶都房市 0510-7088995</TD>
    </TR>
  <TR>
      <TD align=middle height=20><FONT 
      face="Arial, Helvetica, sans-serif">E_mail:<A 
      href="mailto:webmaster@etaodu.com">webmaster@etaodu.com</A></FONT></TD>
    </TR></TBODY></TABLE></BODY></HTML>

⌨️ 快捷键说明

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