📄 house_fabu.asp
字号:
<td height="30" align="center">
<input type="image" name="submit" size="30" src="../ima/bu2.jpg">
</td>
</tr>
<tr>
<td height="40" align="center">注：请认真填写以上内容，带“<font color="#FF0000">*</font>”号为必填项</td>
</tr>
</form>
</table></TD>
</TR>
</TBODY>
</TABLE>
</div>
<%end sub
sub edit
%><TABLE width=710 border=0 align="center" cellPadding=0 cellSpacing=0>
<TBODY>
<TR>
<TD height=8></TD>
</TR>
<TR>
<TD align=middle
height=40><div align="center"><font color="#666666">您好!<font color="#FF0000"><%=session("loginid")%></font>,欢迎您来到会员管理中心!您可以按左边的菜单进行管理.</font></div></TD>
</TR>
</TBODY>
</TABLE>
<TABLE width=710 border=0 align="center" cellPadding=0 cellSpacing=0>
<TBODY>
<TR>
<TD vAlign=top align=middle bgColor=#fafafa><table width="100%" height="221" border="0" cellpadding="0" cellspacing="0">
<tr>
<td align="center" valign="top"><table width="100%" height="75" border="0" cellpadding="0" cellspacing="0">
<tr>
<td align="center" valign="top"><form name="myform" onSubmit="return CheckForm();" method="post" action="?action=saveedit" enctype="multipart/form-data">
<br>
<%
set rs=server.CreateObject("adodb.recordset")
id=RtnReplaceInt(Trim(request("Id")),0)
if id=0 then
response.end
end if
opendataconn
set rs=server.createobject("adodb.recordset")
sql="select * from house where userid='"&session("loginid")&"' and id="&id&""
rs.open sql,conn,1,1
if not rs.eof then
%>
<table width="98%" border="0" cellpadding="0" cellspacing="1" bgcolor="#97C0FF">
<tr bgcolor="#FFFFFF" class="p13">
<td width="17%" align="center" height="28"><div align="center">信息类别：</div></td>
<td width="40%" height="23"> <select name="xxlb" id="select9">
<option value="<%=trim(rs("xxlb"))%>">
<%
xxlb_1=trim(rs("xxlb"))
%>
<!--#include file="xxlb.asp"-->
</option>
<option value="1">出租</option>
<option value="2">求租</option>
<option value="3">求购</option>
<option value="4">出售</option>
<option value="5">合租</option>
<option value="6">置换</option>
</select> <FONT
face=宋体 color=#ff0000><SPAN style="FONT-SIZE: 9pt">(*)</SPAN></FONT></td>
<td width="14%" align="center">方 位：</td>
<td width="31%"><%
set rscyte=server.CreateObject("adodb.recordset")
sqlcyte = "select * from cyte"
rscyte.Open sqlcyte,conn,1,1
%> <select name="fangwei" id="select11" class="inp">
<option value="">-- 请选择 --</option>
<%do while not rscyte.eof%>
<option value="<%=rscyte("cyte")%>" <%if rs("fangwei")=rscyte("cyte") then Response.write("selected")%>><%=rscyte("cyte")%></option>
<%
rscyte.movenext
loop
rscyte.close
set rscyte=nothing
%>
</select><FONT
face=宋体 color=#ff0000><SPAN style="FONT-SIZE: 9pt">(*)</SPAN></FONT></td>
</tr>
<tr bgcolor="#FFFFFF" class="p13">
<td width="17%" align="center" height="28">楼房类型：</td>
<td width="40%" height="23"> <select size="1" name="lflx"><%slflx=rs("lflx")%>
<%
if instr(lflx,"|")>0 then
dim lfArr,ilf
lfArr=split(lflx,"|")
for ilf = 0 to ubound(lfArr)
if slflx=lfArr(ilf) then
Response.write"<option value="&lfArr(ilf)&" selected>"&lfArr(ilf)&"</option>"
else
Response.write"<option value="&lfArr(ilf)&">"&lfArr(ilf)&"</option>"
end if
next
else
Response.write"<option value="&lflx&">"&lflx&"</option>"
end if
%></select></td>
<td width="14%" align="center">小区或标志物：</td>
<td width="31%"><input name="area" type="text" id="area3" value="<%=trim(rs("area"))%>" size="20"> (*)
</td>
</tr>
<tr bgcolor="#FFFFFF" class="p13">
<td width="17%" align="center" height="28">
发布者类型：</td>
<td width="40%" height="23"> <select size="1" name="fbzlx">
<%sfbzlx=rs("fbzlx")
if instr(fbzlx,"|")>0 then
Arr=split(fbzlx,"|")
for i= 0 to ubound(Arr)
if sfbzlx=Arr(i) then
Response.write"<option value="&Arr(i)&" selected>"&Arr(i)&"</option>"
else
Response.write"<option value="&Arr(i)&">"&Arr(i)&"</option>"
end if
next
else
Response.write"<option value="&fbzlx&">"&fbzlx&"</option>"
end if
%>
</select></td>
<td width="14%" align="center">房屋结构：</td>
<td width="31%"><select size="1" name="jiegou">
<%sjiegou=rs("jiegou")
if instr(jiegou,"|")>0 then
Arr=split(jiegou,"|")
for i= 0 to ubound(Arr)
if sjiegou=Arr(i) then
Response.write"<option value="&Arr(i)&" selected>"&Arr(i)&"</option>"
else
Response.write"<option value="&Arr(i)&">"&Arr(i)&"</option>"
end if
next
else
Response.write"<option value="&jiegou&">"&jiegou&"</option>"
end if
%>
</select></td>
</tr>
<tr bgcolor="#FFFFFF" class="p13">
<td width="17%" align="center" height="26"><div align="center">总 层 次：</div></td>
<td width="40%" height="26"><SPAN class=f>
<SELECT name=zcenci size=1 id="select12"
style="FONT-SIZE: 9pt; WIDTH: 100px" tabIndex=5>
<OPTION value=<%=trim(rs("zcenci"))%>><%=trim(rs("zcenci"))%></OPTION>
<OPTION value=不限>不限</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>
<OPTION value=11层>11层</OPTION>
<OPTION
value=12层>12层</OPTION>
<OPTION value=13层>13层</OPTION>
<OPTION
value=14层>14层</OPTION>
<OPTION value=15层>15层</OPTION>
<OPTION
value=16层>16层</OPTION>
<OPTION value=17层>17层</OPTION>
<OPTION
value=18层>18层</OPTION>
<OPTION value=19层>19层</OPTION>
<OPTION
value=20层>20层</OPTION>
<OPTION value=20层以上>20层以上</OPTION>
</SELECT>
</SPAN></td>
<td width="14%" align="center">所在层次：</td>
<td width="31%"><SELECT name=cenci size=1 id="cenci"
style="FONT-SIZE: 9pt; WIDTH: 100px" tabIndex=6>
<OPTION value=<%=trim(rs("cenci"))%>><%=trim(rs("cenci"))%></OPTION>
<OPTION value=不限>不限</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>
<OPTION value=11层>11层</OPTION>
<OPTION
value=12层>12层</OPTION>
<OPTION value=13层>13层</OPTION>
<OPTION
value=14层>14层</OPTION>
<OPTION value=15层>15层</OPTION>
<OPTION
value=16层>16层</OPTION>
<OPTION value=17层>17层</OPTION>
<OPTION
value=18层>18层</OPTION>
<OPTION value=19层>19层</OPTION>
<OPTION
value=20层>20层</OPTION>
<OPTION value=20层以上>20层以上</OPTION>
<OPTION
value=储藏间>储藏间</OPTION>
<OPTION value=地下室>地下室</OPTION>
<OPTION
value=平卧>平卧</OPTION>
<OPTION value=整栋楼>整栋楼</OPTION>
<OPTION value=不限>不限</OPTION>
</SELECT></td>
</tr>
<tr bgcolor="#FFFFFF" class="p13">
<td width="17%" align="center" height="30"><div align="center">
户 型：</div></td>
<td width="40%" height="30" > <SELECT name=fclx size=1 id="select13"
style="FONT-SIZE: 9pt; WIDTH: 100px" tabIndex=7>
<%shuxing=rs("fclx")%>
<%
if instr(hx,"|")>0 then
hxArr=split(hx,"|")
for i = 0 to ubound(hxArr)
if shuxing=hxArr(i) then
Response.write"<option value="&hxArr(i)&" selected>"&hxArr(i)&"</option>"
else
Response.write"<option value="&hxArr(i)&">"&hxArr(i)&"</option>"
end if
next
else
Response.write"<option value="&hx&">"&hx&"</option>"
end if
%> </SELECT>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -