📄 index.asp
字号:
<!--#include file="top.asp"-->
<TABLE cellSpacing=0 cellPadding=0 width=760 align=center bgColor=#ffffff border=0>
<TR vAlign=top>
<TD width=180>
<TABLE height=62 cellSpacing=0 cellPadding=0 width="100%" border=0>
<TR>
<TD><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="100%">
<img border="0" src="img/menu1.gif" width="180" height="34"></td>
</tr>
</table></TD>
</TR>
<TR>
<TD align=middle width="180" bgColor=#ffffff height=20>
<TABLE cellSpacing=0 cellPadding=0 border=0>
<% if session("user_id")="" then %>
<form action="../chkuser_login.asp" method="post" name="input" id="input" onsubmit=return(CheckInput())>
<TR height=30>
<TD>用户名称：</TD>
<TD><input name="username" type="text" id="username" size="10" maxlength="20"></TD>
</TR>
<TR height=26>
<TD>登陆密码：</TD>
<TD><input name="password" type="password" id="password" size="10" maxlength="20"></TD>
</TR>
<TR height=26>
<TD>验证码：</TD>
<TD><input name="getcode" type="text" id="getcode" size="4" style="ime-mode:disabled">
<img src="../inc/Code.asp"></TD>
</TR>
<TR height=26>
<TD align=middle colSpan=2> <TABLE cellSpacing=0 cellPadding=0 border=0>
<TR vAlign=bottom align=middle>
<TD><A href="../reg.asp" target="_blank">免费注册</A></TD>
<TD width=60> </TD>
<TD><INPUT name="submit" type=submit value="登 录"></TD>
</TR>
</TABLE></TD>
</TR>
</FORM>
</TABLE>
<TABLE width="178" border=0 cellPadding=0 cellSpacing=0>
<% else %><TR height=30>
<TD align=middle>你好，<B><FONT class=blue>
<% =session("user_name") %>
</FONT></B></TD>
</TR>
<TR>
<TD align=middle>你现在已登陆</TD>
</TR>
<TR height=30>
<% user_id=session("user_id")
set message=conn.execute("Select count(*) as message1 From message where jsr='"&uid&"' and ok='1'") %>
<TD height="30" align=middle><A href="../usercenter.asp">
<IMG src="images/new01.gif" align=absMiddle border=0 width="16" height="16">
<% if message("message1")="0" then %> 我的短信箱 （<FONT class=gray>0 新</FONT>）
<% else %>
我的短信箱 （<FONT class=red> <% =message("message1") %> 新</FONT>）
<embed src="images/mail.wav" width="0" height="0"></embed>
<% end if %></A>
</TD></TR>
<TR>
<TD align=middle><a href="../user_logout.asp">退出登陆</A> ┋ <a href="../user.asp">用户中心</a></TD>
</TR>
<% end if %>
</TABLE></TD></TR>
</TABLE>
<TABLE height=62 cellSpacing=0 cellPadding=0 width="100%" border=0>
<TR>
<TD><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="100%">
<img border="0" src="img/menu2.gif" width="180" height="34"></td>
</tr>
</table></TD>
</TR>
<TR>
<TD align=middle width="180" bgColor=#ffffff height=20>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="10%"><div align="center">
<img src="img/plus.gif" width="7" height="7"></div></td>
<% set house=conn.execute("Select count(*) as house1 From house") %>
<td width="90%">房产信息：<font color="#FF0000"><% =house("house1") %></font> 条
</td>
</tr>
<tr>
<td><div align="center">
<img src="img/plus.gif" width="7" height="7"></div></td>
<% set puser=conn.execute("Select count(*) as puser1 From user_info") %>
<td>注册会员：<font color="#FF0000"><% =puser("puser1") %></font> 人</td>
</tr>
</table></TD>
</TR>
</TABLE>
<!-- #include file="search01.asp"-->
</TD>
<TD width=2 bgColor=#FF8F2A></TD>
<TD>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="#FF8F2A" height="24">
<font color="#FFFFFF">房屋信息</font></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="1" cellpadding="0" bgcolor="#ffe7d0">
<tr>
<td width="49%" valign="top" bgcolor="#FFFFFF"><TABLE width="100%" border=0 cellPadding=0 cellSpacing=0 borderColor=#111111 style="BORDER-COLLAPSE: collapse">
<% set rscz=conn.execute("select top 6 * from house where mytype='出租 ' order by id desc")%>
<TR>
<TD><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="100%">最新<% =rscz("mytype") %></td>
</tr>
</table></TD>
</TR>
<TR>
<TD width="100%"><DIV align=center>
<table width="100%" border="0" cellpadding="0" cellspacing="0" >
<tr>
<td bordercolor="#ffe7d0"><TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<% if rscz.bof and rscz.eof then
response.write "暂时没有房源"
else
while not rscz.eof%>
<TR>
<TD width="6%"><div align="center">
<IMG src="img/dot.gif" width="9" height="15"></div></TD>
<TD align=right> <div align="left"><a href="h_open.asp?id=<% =rscz("id") %>">
<% =rscz("fw_jiegou") %>
<% =rscz("fw_louceng") %>
层
<% =rscz("fw_jiage") %><% =rscz("fw_jiageLX") %>
</a></div>
<div align="center"> </div></TD>
</TR>
<%
rscz.movenext
wend
end if
rscz.close
set rscz=nothing
%>
</TABLE></td>
</tr>
</table>
</DIV></TD>
</TR>
</TABLE></td>
<td width="49%" valign="top" bgcolor="#FFFFFF"><TABLE width="100%" border=0 cellPadding=0 cellSpacing=0 style="BORDER-COLLAPSE: collapse">
<% set rscs=conn.execute("select top 6 * from house where mytype='出售 ' order by id desc")%>
<TR>
<TD><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="100%">最新<% =rscs("mytype") %></td>
</tr>
</table></TD>
</TR>
<TR>
<TD width="100%"> <DIV align=center>
<table width="100%" border="0" cellpadding="0" cellspacing="0" >
<tr>
<td bordercolor="#ffe7d0"><TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<% if rscs.bof and rscs.eof then
response.write "暂时没有房源"
else
while not rscs.eof%>
<TR>
<TD width="6%"><div align="center">
<IMG src="img/dot.gif" width="9" height="15"></div></TD>
<TD align=right><div align="left"><a href="h_open.asp?id=<% =rscs("id") %>">
<% =rscs("fw_jiegou") %>
<% =rscs("fw_louceng") %>
层
<% =rscs("fw_jiage") %><% =rscs("fw_jiageLX") %>
</a></div>
<div align="center"> </div></TD>
</TR>
<%
rscs.movenext
wend
end if
rscs.close
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -