📄 house_fabu.asp
字号:
</td>
<td width="14%" align="center">面 积：</td>
<td width="31%"><INPUT name=mianji style="FONT-SIZE: 9pt" tabIndex=8 value="<%=trim(rs("mianji"))%>" size=10 >㎡(*)</td>
</tr>
<tr bgcolor="#FFFFFF" class="p13">
<td width="17%" align="center" height="28">杂物间面积：</td>
<td width="40%" height="23"><SPAN class=f>
<INPUT name=zwmianji style="FONT-SIZE: 9pt" tabIndex=8 value="<%=trim(rs("zwmianji"))%>" size=10 ></SPAN>㎡(*)
</td>
<td width="14%" align="center">装潢标准：</td>
<td width="31%"><SELECT name=zhbz size=1 id="select14"
style="FONT-SIZE: 9pt; WIDTH: 100px" tabIndex=9>
<%szxqk=rs("zhbz")
if instr(zxqk,"|")>0 then
dim zxArr,izx
zxArr=split(zxqk,"|")
for izx = 0 to ubound(zxArr)
if szxqk=zxArr(izx) then
Response.write"<option value="&zxArr(izx)&" selected>"&zxArr(izx)&"</option>"
else
Response.write"<option value="&zxArr(izx)&">"&zxArr(izx)&"</option>"
end if
next
else
Response.write"<option value="&zxqk&">"&zxqk&"</option>"
end if
%>
</SELECT></td>
</tr>
<tr bgcolor="#FFFFFF" class="p13">
<td width="17%" align="center" height="28"><div align="center">装 潢 价：</div></td>
<td width="40%" height="23">
<SPAN class=f> <INPUT name=zhprice
style="FONT-SIZE: 9pt" tabIndex=10 value="<%=trim(rs("zhprice"))%>" size=10 onKeyUp="this.value=this.value.replace(/\D/gi,'')"></SPAN> 元(可不填)</td>
<td width="14%" align="center">交易价格：</td>
<td width="31%"><SPAN class=f>
<INPUT name=jyprice
style="FONT-SIZE: 9pt" tabIndex=12 value="<%=trim(rs("jyprice"))%>" size=10 >
</SPAN><select id="jgdw" size="1" name="jgdw">
<%sjgdw=rs("jgdw")
if instr(jgdw,"|")>0 then
dim jgArr,ijg
jgArr=split(jgdw,"|")
for ijg = 0 to ubound(jgArr)
if sjgdw=jgArr(ijg) then
Response.write"<option value="&jgArr(ijg)&" selected>"&jgArr(ijg)&"</option>"
else
Response.write"<option value="&jgArr(ijg)&">"&jgArr(ijg)&"</option>"
end if
next
else
Response.write"<option value="&jgdw&">"&jgdw&"</option>"
end if
%>
</select><SPAN class=f><FONT face=宋体
color=#ff0000><SPAN
style="FONT-SIZE: 9pt">(*)</SPAN></FONT></SPAN></td>
</tr>
<tr bgcolor="#FFFFFF" class="p13">
<td width="17%" align="center" height="28">产 权：</td>
<td width="40%" height="23"> <select id="chanquan" size="1" name="chanquan">
<%schanquan=rs("chanquan")
if instr(cq,"|")>0 then
dim cqArr,icq
cqArr=split(cq,"|")
for icq = 0 to ubound(cqArr)
if schanquan=cqArr(icq) then
Response.write"<option value="&cqArr(icq)&" selected>"&cqArr(icq)&"</option>"
else
Response.write"<option value="&cqArr(icq)&">"&cqArr(icq)&"</option>"
end if
next
else
Response.write"<option value="&cq&">"&cq&"</option>"
end if
%>
</select></td>
<td width="14%" align="center">付款方式：</td>
<td width="31%"><select id="fkfs" size="1" name="fkfs">
<%sfkfs=rs("fkfs")
if instr(fkfs,"|")>0 then
dim fkfsArr,ifkfs
fkfsArr=split(fkfs,"|")
for ifkfs = 0 to ubound(fkfsArr)
if sfkfs=fkfsArr(ifkfs) then
Response.write"<option value="&fkfsArr(ifkfs)&" selected>"&fkfsArr(ifkfs)&"</option>"
else
Response.write"<option value="&fkfsArr(ifkfs)&">"&fkfsArr(ifkfs)&"</option>"
end if
next
else
Response.write"<option value="&fkfs&">"&fkfs&"</option>"
end if
%>
</select></td>
</tr>
<tr bgcolor="#FFFFFF" class="p13">
<td width="17%" align="center" height="28" valign="middle">始 建 于：</td>
<td width="85%" height="28" colspan="3"> <INPUT name=year value="<%=trim(rs("createyear"))%>" size=10> <SPAN
style="FONT-SIZE: 9pt">左右(例：2007.5)</SPAN></td>
</tr>
<tr bgcolor="#FFFFFF" class="p13">
<td align="center" height="23">房屋地址：</td>
<td width="78%" colspan="3" height="30"><input type="text" name="houseadd" size="61" value="<%=trim(rs("houseadd"))%>"></td>
</tr>
<tr bgcolor="#FFFFFF" class="p13">
<td align="center" height="23">图<p>片</p>
<p>地</p>
<p>址</td>
<td width="78%" colspan="3" height="30"><input type="hidden" name="PhotoUrls" value="">
<br>
<select name="PhotoUrl" style="width:515;height:91" size="2" ondblclick="return ModifyUrl('图片地址','PhotoUrl');">
<%
dim StrPhotoUrl
StrPhotoUrl=Trim(rs("bimg"))
if Instr(StrPhotoUrl,"@@@") >0 then
StrPhotoUrl=Split(StrPhotoUrl,"@@@")
for i=0 to Ubound(StrPhotoUrl)
%>
<option value="<%=StrPhotoUrl(i)%>"><%=StrPhotoUrl(i)%></option>
<%
Next
else
%>
<option value="<%=StrPhotoUrl%>"><%=StrPhotoUrl%></option>
<%end if%>
</select><br>
<br />
<input type="button" name="addurl" value="添加图片地址" onClick="AddUrl('图片地址','PhotoUrl');">
<input type="button" name="addurl" value="修改当前地址" onClick="ModifyUrl('图片地址','PhotoUrl');">
<input type="button" name="addurl" value="删除当前地址" onClick="DelUrl('图片地址','PhotoUrl');">
<input type="button" name="upurl" value="↑" onClick="UpUrl('图片地址','PhotoUrl');">
<input type="button" name="downurl" value="↓" onClick="DownUrl('图片地址','PhotoUrl');"><br>
</td>
</tr>
<tr bgcolor="#FFFFFF" class="p13">
<td align="center" height="23">
<font color="#FF0000">上传图片：</font></td>
<td width="78%" colspan="3" height="30"> </td>
</tr>
<tr bgcolor="#FFFFFF" class="p13">
<td align="center" height="23" colspan="2">
已上传<br>
<select name="TempUploadFiles" style="width:349;height:120" size="2" onclick="doPreview('TempUploadFiles','<%=WebDir%>','<%=UploadDir%>')"><%
dim sUploadFiles
sUploadFiles = Trim(rs("UploadFiles"))
if Instr(sUploadFiles,"|") >0 then
sUploadFiles = Split(sUploadFiles,"|")
for i=0 to Ubound(sUploadFiles)
%>
<option value="<%=sUploadFiles(i)%>"><%=sUploadFiles(i)%></option>
<%
Next
elseif sUploadFiles<>"" then
%>
<option value="<%=sUploadFiles%>"><%=sUploadFiles%></option>
<%end if%></select><input type="hidden" name="UploadFiles" value=""></td>
<td align="center" height="23" colspan="2"><fieldset style="height:90px; width:184px">
<legend>预览</legend>
<table border=0 cellpadding=0 cellspacing=1 width="180" height="90" valign=top>
<tr><td align=center valign=middle id=tdPreview height="90%">
</td></tr>
</table>
</fieldset></td>
</tr>
<tr bgcolor="#FFFFFF" class="p13">
<td align="center" height="23">配置设施：</td>
<td width="78%" colspan="3" height="30"> <%speizhi=rs("peizhi")%><br>
水<INPUT type=checkbox value="水--" name=p1 <%if InStr(speizhi,"水--")>0 then Response.write "checked" end if%>> 电<INPUT type=checkbox
value=电-- name=p2 <%if InStr(speizhi,"电--")>0 then Response.write "checked" end if%>> 燃气<INPUT type=checkbox
value=燃气-- name=p3 <%if InStr(speizhi,"燃气--")>0 then Response.write "checked" end if%>> 暖气<INPUT type=checkbox
value=暖气-- name=p12 <%if InStr(speizhi,"暖气--")>0 then Response.write "checked" end if%>> 地热<INPUT type=checkbox
value=地热-- name=p13 <%if InStr(speizhi,"地热--")>0 then Response.write "checked" end if%>> 有线电视<INPUT type=checkbox
value=有线电视-- name=p4 <%if InStr(speizhi,"有线电视--")>0 then Response.write "checked" end if%>> 电梯<INPUT type=checkbox
value=电梯-- name=p18 <%if InStr(speizhi,"电梯--")>0 then Response.write "checked" end if%>> 地板砖<INPUT type=checkbox
value=地板砖-- name=p19 <%if InStr(speizhi,"地板砖--")>0 then Response.write "checked" end if%>> 木地板<INPUT type=checkbox
value=木地板-- name=p20 <%if InStr(speizhi,"木地板--")>0 then Response.write "checked" end if%>>
<br>
<br>水泥地<INPUT type=checkbox
value=水泥地 name=p21 <%if InStr(speizhi,"水泥地")>0 then Response.write "checked" end if%>>
空调<INPUT type=checkbox
value=空调-- name=p5 <%if InStr(speizhi,"空调--")>0 then Response.write "checked" end if%>> 彩电<INPUT type=checkbox
value=彩电-- name=p6 <%if InStr(speizhi,"彩电--")>0 then Response.write "checked" end if%>> 电话<INPUT type=checkbox
value=电话-- name=p7 <%if InStr(speizhi,"电话--")>0 then Response.write "checked" end if%>> 宽带<INPUT type=checkbox
value=宽带-- name=p14 <%if InStr(speizhi,"宽带--")>0 then Response.write "checked" end if%>> 淋浴<INPUT type=checkbox
value=淋浴-- name=p8 <%if InStr(speizhi,"淋浴--")>0 then Response.write "checked" end if%>> 防盗门<INPUT type=checkbox
value=防盗门-- name=p15 <%if InStr(speizhi,"防盗门--")>0 then Response.write "checked" end if%>><br>
<br>
储藏室<INPUT type=checkbox
value=储藏室-- name=p9 <%if InStr(speizhi,"储藏室--")>0 then Response.write "checked" end if%>> 集体车棚<INPUT type=checkbox
value=集体车棚-- name=p10 <%if InStr(speizhi,"集体车棚--")>0 then Response.write "checked" end if%>> 车库<INPUT type=checkbox
value=车库-- name=p11 <%if InStr(speizhi,"车库--")>0 then Response.write "checked" end if%>> 封阳台<INPUT type=checkbox
value=封阳台-- name=p16 <%if InStr(speizhi,"封阳台--")>0 then Response.write "checked" end if%>> 防盗网<INPUT type=checkbox
value=防盗网-- name=p17 <%if InStr(speizhi,"防盗网--")>0 then Response.write "checked" end if%>><br>
</td>
</tr>
<tr bgcolor="#FFFFFF" class="p13">
<td align="center" height="30">其它配置：</td>
<td colspan="3">
<input type="text" name="peizhi1" size="30" value="<%=rs("peizhi1")%>"></td>
</tr>
<tr bgcolor="#FFFFFF" class="p13">
<td align="center" height="23">周边设施：</td>
<td colspan="3"><%szhoubian=rs("zhoubian")%>
<br>
医院<INPUT type=checkbox
value=医院-- name=z1 <%if InStr(szhoubian,"医院--")>0 then Response.write "checked" end if%>> 银行<INPUT type=checkbox
value=银行-- name=z2 <%if InStr(szhoubian,"银行--")>0 then Response.write "checked" end if%>> 学校<INPUT type=checkbox
value=学校-- name=z3 <%if InStr(szhoubian,"学校--")>0 then Response.write "checked" end if%>> 幼儿园<INPUT type=checkbox
value=幼儿园-- name=z7 <%if InStr(szhoubian,"幼儿园--")>0 then Response.write "checked" end if%>> 小学<INPUT type=checkbox
value=小学-- name=z8 <%if InStr(szhoubian,"小学--")>0 then Response.write "checked" end if%>> 中学<INPUT type=checkbox
value=中学-- name=z9 <%if InStr(szhoubian,"中学--")>0 then Response.write "checked" end if%>><br>
<BR>超市<INPUT type=checkbox
value=超市-- name=z4 <%if InStr(szhoubian,"超市--")>0 then Response.write "checked" end if%>> 公园<INPUT type=checkbox
value=公园-- name=z5 <%if InStr(szhoubian,"公园--")>0 then Response.write "checked" end if%>> 市场<INPUT type=checkbox
value=市场-- name=z6 <%if InStr(szhoubian,"市场--")>0 then Response.write "checked" end if%>> 公交<INPUT type=checkbox
value=公交 name=z10 <%if InStr(szhoubian,"公交")>0 then Response.write "checked" end if%>><br>
</td>
</tr>
<tr bgcolor="#FFFFFF" class="p13">
<td align="center" height="30">其它设施：</td>
<td colspan="3">
<input type="text" name="zhoubian1" size="30" value="<%=rs("zhoubian1")%>"></td>
</tr>
<tr bgcolor="#FFFFFF" class="p13">
<td><div align="center">备 注：</div></td>
<td colspan="3"><textarea name="meno" cols="50" rows="5"><%=bbHTMLDecode(rs("meno"))%></textarea>
<input name="id" type="hidden" id="id3" value="<%=trim(rs("id"))%>"></td>
</tr> <tr bgcolor="#FFFFFF" class="p13">
<td height="30" align="center">是否欢迎中介：</td>
<td colspan="3"><select size="1" name="sfhyzj">
<%ssfhyzj=rs("sfhyzj")
if instr(sfhyzj,"|")>0 then
Arr=split(sfhyzj,"|")
for i= 0 to ubound(Arr)
if ssfhyzj=Arr(i) the⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -