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

📄 view_house.asp

📁 使用asp开发的一个标准的房地产管理系统。有销售登记
💻 ASP
字号:
<!--#include file=../system/include/config.asp-->
<!--#include file=../share/conn_view.asp-->
<!--#include file=../system/include/function.asp-->
<!--#include file=../system/include/access_zj.asp-->
<%
if request("house")="" then
session("house")="hack"
else
session("house")=request("house")
end if
%>
<html>
<head>
<title><%=title%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../style.css" type="text/css">
</head>
<style> body{ scrollbar-face-color:fd9035; scrollbar-shadow-color:ffffff;  scrollbar-highlight-color:ffffff; scrollbar-3dlight-color:ffffff;  scrollbar-darkshadow-color:ffffff; scrollbar-track-color:ffefd7;  scrollbar-arrow-color:ffffff;} 
.rightkuan {  border-color: black #FFFFFF black black; border-style: solid; border-top-width: 0px; border-right-width: 2px; border-bottom-width: 0px; border-left-width: 0px}
.leftkuan {  border-color: black black black #FFFFFF; border-style: solid; border-top-width: 0px; border-right-width: 0px; border-bottom-width: 0px; border-left-width: 2px}
.textinput2 {  border: 1px #9c9a9c solid;BACKGROUND: #ffffff;FONT-SIZE: 9pt; FONT-FAMILY: arial}
</style>
 <script language="JavaScript">
 function openwin(page,size)
{
window.open(page,"newuser","toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=no,"+ size);
} 
function mOvr(src,clrOver) { if (!src.contains(event.fromElement)){ src.bgColor = clrOver; }}function mOut(src,clrIn){ if (!src.contains(event.toElement)) { src.style.cursor = 'default'; src.bgColor = clrIn; }} function mClk(src) { if(event.srcElement.tagName=='TD'){src.children.tags('A')[0].click();} }

 </script>
<SCRIPT>
    function Toggle(e)
    {
	if (e.checked) {
	    document.form4.toggleAll.checked = AllChecked();
	}
	else {
	    document.form4.toggleAll.checked = false;
	}
    }

    function ToggleAll(e)
    {
	if (e.checked) {
	    CheckAll();
	}
	else {
	    ClearAll();
	}
    }

    function CheckAll()
    {
	var ml = document.form4;
	var len = ml.elements.length;
	for (var i = 0; i < len; i++) {
	    var e = ml.elements[i];
	    if (e.name == "checkbox") {
		e.checked = true;
	    }
	}
	ml.toggleAll.checked = true;
    }

    function ClearAll()
    {
	var ml = document.form4;
	var len = ml.elements.length;
	for (var i = 0; i < len; i++) {
	    var e = ml.elements[i];
	    if (e.name == "checkbox") {
		e.checked = false;
	    }
	}
	ml.toggleAll.checked = false;
    }

    function AllChecked()
    {
	ml = document.form4;
	len = ml.elements.length;
	for(var i = 0 ; i < len ; i++) {
	    if (ml.elements[i].name == "checkbox" && !ml.elements[i].checked) {
		return false;
	    }
	}
	return true;
    }
</SCRIPT>

<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0">
<!--#include file="../share/gg_top.htm"-->
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr align="left" valign="top"> 
    <td width="198"><img src="images/zjuser_r2_c1.gif" width="198" height="139"></td>
    <td width="184"><img src="images/zjuser_r2_c8.gif" width="201" height="139"></td>
    <td width="396" background="images/zjuser_r2_c13.jpg"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="379" height="139">
        <param name="movie" value="../images/member.swf">
		<param name=WMODE value=Transparent>
        <param name="quality" value="high">
        <embed src="../images/member.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="379" height="139"></embed></object></td>
  </tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr align="left" valign="top"> 
  <form name="form4" method="post" action="del_house.asp" onSubmit="return checkdel()">
    <td width="10" height="406" background="../images/member_r6_c1.jpg"><img src="../images/member_r3_c1.gif" width="10" height="28"></td>
    <td width="584" align="left" height="406"> 
      <table width="582" height="28" border="0" cellpadding="0" cellspacing="0">
        <tr>
            <td width="582" height="28" align="left" valign="bottom" background="../images/member_r3_c2.gif" class="font"><a href="index.asp" class="menu">首  页 
              </a>&gt;&gt;&gt; <a href="index.asp" class="menu">房产中介管理</a> &gt;&gt;&gt; 
              查看房源信息</td>
        </tr>
      </table>
        <div align="center"><br>
          <span class="font"><font color="#999999">您 好,以 下 是 您 在 本 站 所 发 布 的 房 
          源 信 息</font></span> <br>
        </div>
        <table width="565" border="0" cellspacing="0" cellpadding="0">
          <tr> 
            <td width="21" height="35">&nbsp;</td>
            <td width="487" height="35" valign="middle" align="left"> <span class="font">请选择信息</span> 
              <select name="select" class="textinput" onChange="javascript:window.open('view_house.asp?house='+this.options[this.selectedIndex].value,'_self')">
                <%if session("house")="hack" then %>
                <option value="hack" selected>出租信息</option>
                <%else%>
                <option value="hack" >出租信息</option>
                <%end if%>
                <%if session("house")="hire" then %>
                <option value="hire" selected>求租信息</option>
                <%else%>
                <option value="hire">求租信息</option>
                <%end if%>
                <%if session("house")="sell" then %>
                <option value="sell" selected>出售信息</option>
                <%else%>
                <option value="sell">出售信息</option>
                <%end if%>
                <%if session("house")="buy" then %>
                <option value="buy" selected>求购信息</option>
                <%else%>
                <option value="buy">求购信息</option>
                <%end if%>
              </select>
            </td>
            <td width="57" height="35" valign="middle" align="center"> 
              <input type="submit" name="Submit2" value="删除">
            </td>
          </tr>
        </table>
        <center>
          <table width="546" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFCC99" class="xu_kuan">
            <%
	dim strSql,rs,i,PageNo
	if session("house")="hack" then
	strSql="select * from [house_hack]  where zj_id='" & session("zj_id") & "'order by id desc"
	end if
	if session("house")="hire" then
	strSql="select * from [house_hire]  where zj_id='" & session("zj_id") & "'order by id desc"
	end if
	if session("house")="sell" then
	strSql="select * from [house_sell]  where zj_id='" & session("zj_id") & "'order by id desc"
	end if
    if session("house")="buy" then
	strSql="select * from [house_buy]  where zj_id='" & session("zj_id") & "'order by id desc"
	end if
	set rs=Server.CreateObject("ADODB.RecordSet")
	rs.open strSql,conn,3,3
	rs.PageSize=15
	PageNo=request("PageNo")
	if PageNo<1 or not isnumeric(PageNo) then
		PageNo=1
	end if
	if cint(PageNo)>rs.PageCount then
		PageNo=rs.PageCount
	end if
%>
            <tr align="center" valign="middle" bgcolor="#FFEAB3"> 
              <td width="69" height="21" class="font"><font color="#FF6600" class="font">发布时间</font></td>
              <td width="98" height="25" class="font"><font color="#FF6600">房源编号</font></td>
              <td width="168" height="21" class="font"><font color="#FF6600">物业地址</font></td>
              <td width="54" height="21"><font color="#FF6600" class="font">通过验证</font></td>
              <td width="108" height="21"><font color="#FF6600" class="font">房型</font></td>
              <td width="49" height="21"> 
                <input type="checkbox" name="toggleAll" onClick=ToggleAll(this)>
              </td>
            </tr>
            <%
		  dim yy
		if rs.recordcount>0 then
		   rs.AbsolutePage =PageNo
		   for i=1 to rs.pageSize

			  if i/2=int(i/2) then
			  yy="#ffffff"
			  else
			  yy="#fff9e1"
			  end if
  %>
            <tr align="center" valign="middle" bgcolor="<%=yy%>" onMouseOver="mOvr(this,'#FFECD9');"  onMouseOut="mOut(this,'<%=yy%>');"> 
              <%if rs.eof then
			response.write ("<td height=21></td>")
            response.write ("<td height=21></td>")
            response.write ("<td height=21></td>")
            response.write ("<td height=21></td>")
            response.write ("<td height=21></td>")
            response.write ("<td></td>")
			else%>
              <td height="21" class="font" width="69" ><%=replace(rs("date"),right(rs("date"),8),"")%></td>
              <% if session("house")="hack" then %>
              <td height="21" width="98" class="font" ><a href="../sub_hack.asp?id=<%=rs("id")%>" class="ffbyfont"  target="_blank" ><%=rs("bh")%></a></td>
              <% end if %>
              <% if session("house")="hire" then %>
              <td height="21" width="98" class="font" ><a href="../sub_hire.asp?id=<%=rs("id")%>" class="ffbyfont"  target="_blank" ><%=rs("bh")%></a></td>
              <% end if %>
              <% if session("house")="sell" then %>
              <td height="21" width="98" class="font" ><a href="../sub_sell.asp?id=<%=rs("id")%>" class="ffbyfont"  target="_blank" ><%=rs("bh")%></a></td>
              <% end if %>
              <% if session("house")="buy" then %>
              <td height="21" width="98" class="font" ><a href="../sub_buy.asp?id=<%=rs("id")%>" class="ffbyfont"  target="_blank" ><%=rs("bh")%></a></td>
              <% end if %>
              <td height="21" class="font" width="168" ><%=left(rs("address"),12)%></td>
              <td height="21" class="font" width="54" ><font color=red><%=rs("pass")%></font></td>
              <td height="21" class="font" width="108" ><%=rs("hx")%></td>
              <td height="21" width="49" > 
                <input type="checkbox" name="checkbox" value="<%=rs("id")%>" >
              </td>
              <%end if%>
            </tr>
            <%
		  if not rs.eof then
				rs.movenext
		  end if
			next
  %>
            <tr align="right" valign="middle" bgcolor="#FFE7CE"> 
              <td height="28" colspan="6" class="font" > 
                <%
				session("pagecount")=rs.pagecount
			out("<font color=#929292>当前页次:</font><font color=red>" & PageNo & "/" & rs.pagecount & "</font> &nbsp;&nbsp;")
			out("<font color=#929292>共</font><font color=red>" & rs.pagecount & "</font><font color=#929292>页</font> &nbsp;&nbsp;")
			out("<font color=#929292>共</font><font color=red>" & rs.recordcount & "</font><font color=#929292>条记录</font> &nbsp;&nbsp;")
	  dim pag
	  %>
                <a href="view_house.asp?pageno=1&amp;house=<%=session("house")%>" class="menu1">[首页]</a> 
                <a href="view_house.asp?pageno=<%=pageno-1%>&amp;house=<%=session("house")%>" class="menu1">[上一页]</a> 
                <a href="view_house.asp?pageno=<%=pageno+1%>&amp;house=<%=session("house")%>" class="menu1">[下一页]</a> 
                <a href="view_house.asp?pageno=<%=rs.pagecount%>&amp;house=<%=session("house")%>" class="menu1">[尾页]</a> 
                <select name="jump" class="textinput" onChange="javascript:window.open('view_house.asp?pageno='+this.options[this.selectedIndex].value + '&amp;house=<%=session("house")%>','_self')">
                  <% for pag=1 to rs.pagecount
				if int(pageno)=pag then %>
                  <option value=<%=pageno%> selected><%=pageno%></option>
                  <%else%>
                  <option value="<%=pag%>"><%=pag%></option>
                  <%
				end if
				next %>
                </select>
                &nbsp; </td>
            </tr>
            <% else %>
            <tr> 
              <td colspan="6" height="88" bgcolor="#fff9e1"> 
                <div align="center" class="font">没有数据!</div>
              </td>
            </tr>
            <%
		end if 
		rs.close
		set rs=nothing
  %>
          </table>
        </center>
        <center>
          <br>
        </center>
    </td>
    <td width="184" align="center" valign="top" background="../images/member_r4_c6.gif" height="406"><img src="../images/member_r3_c6.gif" width="186" height="13"><br>
      <br><!--#include file="share_menu.htm"-->
<br>
    </td>
	</form>
  </tr>
</table>
<!--#include file="../share/gg_foot.htm"-->
</body>
</html>
<!--#include file=../system/include/foot.asp-->

⌨️ 快捷键说明

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