📄 index.asp
字号:
<!--#include file=conn/adodb.asp -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>
<!--#include file=title.asp-->
</title>
<SCRIPT language=JavaScript>
function formCheck(document)
{
if(document.user.value == "")
{
alert("您忘了填写你的用户名了!");
return false;
}
if(document.pwd.value == "")
{
alert("您忘了填写你的密码了!");
return false;
}
}
</SCRIPT>
<script language="JavaScript">
function check()
{
if(frm1.lx.value=="")
{
alert("您忘记选择房源类型了！")
frm1.lx.focus()
return false;
}
}
</script>
<link href="css/css.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.STYLE2 {font-size: 38px}
.fontt { font-size: 10pt;
text-decoration: none;
}
-->
</style>
</head>
<body leftmargin="105" topmargin="0">
<table width="800" border="0" cellspacing="0" cellpadding="0">
<TR>
<td><!--#include file=top.asp-->
</td>
</tr>
</table>
<table width="800" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" class="index-zhi" >
<TR>
<td colspan="3"> </td>
</tr>
<TR>
<td width="205" align="center" valign="top"><table width="200" height="160" border="0" cellpadding="0" cellspacing="1" bgcolor="#3C80D2">
<TR>
<td height="38" background="image/t_1.gif" bgcolor="#A2D0FF"></td>
</tr>
<TR>
<td height="180" background="image/1.gif" bgcolor="#FFFFFF"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center" class="index-zhi"><p>
<marquee direction=up truespeed scrollamount=1 scrolldelay=40 height=170 onMouseOut=this.start(); onMouseOver=this.stop(); width=160 border="0">
<%
dim sqle,cs
sqle="select * from board"
set cs=db.execute(sqle)
if cs.bof and cs.eof then
response.Write "当前无公告信息！"
else
do while not cs.eof
aa=cs("content")
bb=split(aa,chr(10))
for each item in bb
response.write " <br>"&item&"<br>"
next
response.write cs("dateandtime")
cs.movenext
loop
end if
%>
</marquee>
</p></td>
</tr>
</table></td>
</tr>
</table>
<table width="200" height="175" border="0" cellpadding="0" cellspacing="1" bgcolor="#3C80D2">
<TR>
<td height="38" background="image/t_2.gif" bgcolor="#FFE8D9"><div align="center"> <strong></strong></div></td>
</tr>
<TR>
<td height="150" valign="top" bgcolor="#ffffff"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<TR>
<td><form name="frm1" method="post" onSubmit="return check()" action="xxcx.asp" >
<TABLE width="100%"
border=0 cellPadding=0 cellSpacing=0 borderColor=#000000
borderColorDark=#ffffff background="image/bj2.jpg" class="index-zhi">
<TBODY>
<TR>
<TD colSpan=3 height=16> </TD>
</TR>
<TR style="LINE-HEIGHT: 150%">
<TD width="38%" height=30 ><DIV align=right>类
型：</DIV></TD>
<TD width="62%" colSpan=2><SELECT name=lx>
<option value="" selected>请选择</option>
<OPTION value=出售>出售</OPTION>
<OPTION value=出租>出租</OPTION>
<OPTION value=求购>求购</OPTION>
<OPTION value=求租>求租</OPTION>
</SELECT>
</TD>
</TR>
<TR>
<TD height=29 style="LINE-HEIGHT: 150%"><DIV align=right>区 域：</DIV></TD>
<TD colSpan=2 height=29><SELECT name=qy id=select>
<option selected value="">--不限--</option>
<%
set us = Server.CreateObject("adodb.recordset")
sll="select * from class_type"
us.open sll,db,1,1
if us.bof and us.eof then
%>
<option value="">尚未添加类别</option>
<% Else %>
<% do while not us.eof %>
<option value="<%= us("type") %>"><%= us("type") %></option>
<%
us.movenext
loop
end if
us.close
%>
</SELECT></TD>
</TR>
<TR>
<TD height=30 ><DIV style="LINE-HEIGHT: 150%"
align=right>结 构：</DIV></TD>
<TD height=30 colSpan=2><SELECT size=1 name=s>
<OPTION value=0 selected>0</OPTION>
<OPTION value=1>1</OPTION>
<OPTION value=2>2</OPTION>
<OPTION value=3>3</OPTION>
<OPTION value=4>4</OPTION>
<OPTION value=5>5</OPTION>
<OPTION value=6>6</OPTION>
<OPTION value=7>7</OPTION>
<OPTION value=8>8</OPTION>
<OPTION value=9>9</OPTION>
<OPTION value=10>10</OPTION>
</SELECT>
室<br>
<SELECT size=1 name=t>
<OPTION value=0 selected>0</OPTION>
<OPTION value=1>1</OPTION>
<OPTION value=2>2</OPTION>
<OPTION value=3>3</OPTION>
<OPTION value=4>4</OPTION>
<OPTION value=5>5</OPTION>
<OPTION value=6>6</OPTION>
<OPTION value=7>7</OPTION>
<OPTION value=8>8</OPTION>
<OPTION value=9>9</OPTION>
<OPTION value=10>10</OPTION>
</SELECT>
厅<br>
<SELECT size=1 name=w>
<OPTION value=0 selected>0</OPTION>
<OPTION value=1>1</OPTION>
<OPTION value=2>2</OPTION>
<OPTION value=3>3</OPTION>
<OPTION value=4>4</OPTION>
<OPTION value=5>5</OPTION>
<OPTION value=6>6</OPTION>
<OPTION value=7>7</OPTION>
<OPTION value=8>8</OPTION>
<OPTION value=9>9</OPTION>
<OPTION value=10>10</OPTION>
</SELECT>
卫 </TD>
</TR>
<TR>
<TD height=30 ><DIV style="LINE-HEIGHT: 150%"
align=right>房类型： </DIV></TD>
<TD colSpan=2 height=30><SELECT name=flx >
<option selected value="">--不限--</option>
<%
set qs = Server.CreateObject("adodb.recordset")
sss="select * from class_housetype"
qs.open sss,db,1,1
if qs.bof and qs.eof then
%>
<option value="">尚未添加类别</option>
<% Else %>
<% do while not qs.eof %>
<option value="<%= qs("housetype") %>"><%= qs("housetype") %></option>
<%
qs.movenext
loop
end if
qs.close
%>
</SELECT></TD>
</TR>
<TR>
<TD height=30 ><DIV style="LINE-HEIGHT: 150%"
align=right>面 积：</DIV></TD>
<TD colSpan=2 height=30><INPUT maxLength=5 size=3
name=min>
<INPUT id=text22 maxLength=5 size=3
name=max>
m2 </TD>
</TR>
<TR valign="middle">
<TD height=15 colSpan=3><DIV align=center>
<TABLE cellSpacing=0 cellPadding=0 width="98%"
align=center
background=image/main_bg_dot.gif
border=0>
<TBODY>
<TR>
<TD
height=1></TD>
</TR>
</TBODY>
</TABLE>
</DIV>
<DIV align=center></DIV>
<DIV align=center></DIV></TD>
</TR>
<TR align="center">
<TD height=15 colSpan=3><input name="submit" type=submit value=查询 >
<input type=reset value=取消 name=Submit22></TD>
</TR>
<TR>
<TD colSpan=3 height=16><TABLE cellSpacing=0 cellPadding=0 width="98%"
align=center
background=image/main_bg_dot.gif
border=0>
<TBODY>
<TR>
<TD
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -