addlhouse.asp

this a program about talent web database used asp and VB.

address=trim(Request.Form("address"))
district=trim(Request.Form("district"))
floor=trim(Request.Form("floor"))
hall=trim(Request.Form("hall"))
room=trim(Request.Form("room"))
toilet=trim(Request.Form("toilet"))
area=trim(Request.Form("area"))
areadis=trim(Request.Form("areadis"))
price=trim(Request.Form("price"))
intro=trim(Request.Form("intro"))
ctel=trim(Request.Form("ctel"))
tm=trim(Request.Form("tm"))


    if address="" or area="" or price="" then
          errdis="填写有误 带*的项目为必填"
     elseif not(isnumeric(area)) or not(isnumeric(price)) then
          errdis="面积与价格必须为数字"
     else
          strsql="insert tblLease (houseaddress,district,area,areadis,price,hall,room,floor,intro,uid,toilet,ctel,tm) values (" & _
                   sqlstr(address) & "," & sqlstr(district) & "," & area & "," & sqlstr(areadis) & "," & price & "," & hall & _
                   "," & room & "," &  sqlstr(floor) & "," & sqlstr(intro) & "," & sqlstr(uid) & "," & toilet & "," & sqlstr(ctel) & "," & sqlstr(tm) & ")"
          conn.execute(strsql)

dim mid
strsql="select max(hid) mid from tbllease"
set rsd=server.CreateObject("adodb.recordset")
rsd.Open strsql,conn
mid=0
mid=rsd("mid")
rsd.Close
set rsd=nothing

%>
<SCRIPT LANGUAGE=javascript>
<!--
window.open('finishl.asp?hid=<%=mid%>','','resizable=1,scrollbars=yes,width=480,height=100')
//-->
</SCRIPT>
<%end if
end if
%>

<table class="shuang" cellSpacing="0" cellPadding="0" width="778" align="center"
background="images/bg4.gif" border="0">
<!--整体的大表格-->
<tbody>
  <tr>
    <td><!--begin--> <div align="center"><center><table width="100%" border="0" cellspacing="0"
    cellpadding="10" align="center" background="images/bg4.gif">
      <tr>
        <td class="bodyline"><div align="center"><center><table width="100%" cellpadding="0"
        cellspacing="0" border="0">
          <tr>
            <td><form name="form2" id="form2" action="addlhouse.asp" method="post">
              <table cellpadding="1" cellspacing="0" border="0" bgcolor="#ffffff" width="100%"
              align="center">
                <tr>
                  <td width="100%" style="font-family: 宋体; font-size: 10.5pt; color: rgb(255,0,0)"><%=errdis%></td>
                </tr>
                <tr>
                  <td><table cellpadding="4" cellspacing="1" border="0" width="758">
<!-- *** -->
                    <tr>
                      <td bgcolor="#006699" colspan="2" width="778"><font style="FONT-SIZE: 12px"
                      color="#ffffff" class="thtcolor">房源信息</font><font face="verdana, arial, helvetica"
                      style="FONT-SIZE: 12px" color="#ffffff" class="thtcolor">: </font><font
                      style="FONT-SIZE: 12px" color="#ffffff" class="thtcolor">带 </font><font
                      face="verdana, arial, helvetica" style="FONT-SIZE: 12px" color="#ffffff" class="thtcolor"><b>*</b> 
                      </font><font style="FONT-SIZE: 12px" color="#ffffff" class="thtcolor">的必填</font><font
                      face="verdana, arial, helvetica" style="FONT-SIZE: 12px" color="#ffffff" class="thtcolor">.</font></td>
                    </tr>
<!-- *** -->
                    <tr>
                      <td bgcolor="#dee3e7" width="260"><font style="FONT-SIZE: 12px">地址：</font></td>
                      <td bgcolor="#dee3e7" width="448"><font style="FONT-SIZE: 12px"><input class="bginput"
                      name="address" size="25" maxlength="60" id="uid"> </font><font
                      face="verdana, arial, helvetica" style="FONT-SIZE: 12px"><b>*</b></font></td>
                    </tr>
                    <tr>
                      <td bgcolor="#EFEFEF" width="260"><font style="FONT-SIZE: 12px">所属区：</font></td>
                      <td bgcolor="#EFEFEF" width="448"><select name="district" size="1" class="zzz">
                        <option value="宝山">宝山区</option>
                        <option value="杨浦">杨浦区</option>
                        <option value="虹口">虹口区</option>
                        <option value="闸北">闸北区</option>
                        <option value="普陀">普陀区</option>
                        <option value="嘉定">嘉定区</option>
                        <option value="长宁">长宁区</option>
                        <option value="闵行">闵行区</option>
                        <option value="徐汇">徐汇区</option>
                        <option value="卢湾">卢湾区</option>
                        <option value="黄浦">黄浦区</option>
                        <option value="浦东">浦东新区</option>
                      </select></td>
                    </tr>
                    <tr>
                      <td bgcolor="#DEE3E7" width="260"><font style="FONT-SIZE: 12px">楼层：</font></td>
                      <td bgcolor="#DEE3E7" width="448"><font style="FONT-SIZE: 12px"><input class="bginput"
                      name="floor" size="10" maxlength="15" id="uid"></font></td>
                    </tr>
                    <tr>
                      <td bgcolor="#EFEFEF" width="260"><font style="FONT-SIZE: 12px">室：</font></td>
                      <td bgcolor="#EFEFEF" width="448"><select name="room" size="1" class="zzz">
                        <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>
                      </select></td>
                    </tr>
<!-- *** -->
                    <tr>
                      <td bgcolor="#DEE3E7" width="260"><font style="FONT-SIZE: 12px">厅：</font></td>
                      <td bgcolor="#DEE3E7" width="448"><select name="hall" size="1" class="zzz">
                        <option value="0">0</option>
                        <option value="1">1</option>
                        <option value="2">2</option>
                        <option value="3">3</option>
                        <option value="4">4</option>
                      </select></td>
                    </tr>
                    <tr>
                      <td bgcolor="#EFEFEF" width="260"><font style="FONT-SIZE: 12px">卫：</font></td>
                      <td bgcolor="#EFEFEF" width="448"><select name="toilet" size="1" class="zzz">
                        <option value="0">0</option>
                        <option value="1">1</option>
                        <option value="2">2</option>
                        <option value="3">3</option>
                      </select></td>
                    </tr>
                    <tr>
                      <td bgcolor="#DEE3E7" width="260"><font style="FONT-SIZE: 12px">面积：</font></td>
                      <td bgcolor="#DEE3E7" width="448"><font face="verdana, arial, helvetica"
                      style="FONT-SIZE: 12px"><input class="bginput" name="area" size="10" maxlength="10">M<sup>2</sup></font><font
                      face="verdana, arial, helvetica" style="FONT-SIZE: 12px"><b>*</b></font></td>
                    </tr>
                    <tr>
                      <td bgcolor="#EFEFEF" width="260"><font style="FONT-SIZE: 12px">面积描述：</font></td>
                      <td bgcolor="#EFEFEF" width="448"><font style="FONT-SIZE: 12px"><input class="bginput"
                      name="areadis" size="25" maxlength="30">（示例：厅15+房12+灶8）</font></td>
                    </tr>
                    <tr>
                      <td bgcolor="#DEE3E7" width="260"><font style="FONT-SIZE: 12px">价格：</font></td>
                      <td bgcolor="#DEE3E7" width="448"><font style="FONT-SIZE: 12px"><input class="bginput"
                      name="price" size="25" maxlength="50">元/月</font><font
                      face="verdana, arial, helvetica" style="FONT-SIZE: 12px"><b>*</b></font></td>
                    </tr>
                    <tr>
                      <td bgcolor="#EFEFEF" valign="top" width="260"><font style="FONT-SIZE: 12px">房屋介绍：</font></td>
                      <td bgcolor="#EFEFEF" width="448"><textarea name="intro" rows="5" wrap="physical"
                      cols="35" maxlength="200"></textarea></td>
                    </tr>
                    <tr>
                      <td bgcolor="#DEE3E7" width="260"><font style="FONT-SIZE: 12px">联系电话：</font></td>
                      <td bgcolor="#DEE3E7" width="448"><font style="FONT-SIZE: 12px"><input class="bginput"
                      name="ctel" size="25" maxlength="25"></font></td>
                    </tr>
                    <tr>
                      <td bgcolor="#EFEFEF" valign="top" width="260"><font style="FONT-SIZE: 12px">有效期：</font></td>
                      <td bgcolor="#DEE3E7" width="448"><font style="FONT-SIZE: 12px"><input class="bginput"
                      name="tm" size="30" maxlength="50">(yyyy-mm-dd)</font></td>
                    </tr>
                  </table>
                  </td>
                </tr>
              </table>
              <table cellpadding="2" cellspacing="0" border="0" width="100%" align="center">
                <tr>
                  <td align="middle"><font face="verdana, arial, helvetica" style="FONT-SIZE: 12px"><input
                  type="submit" class="bginput" name="Submit" value="提交"> <input type="reset"
                  class="bginput" name="Reset" value="重置"></font><!--end--></td>
                </tr>
              </table><input type="hidden" name="uid" value="<%=uid%>">
            </form>
            </td>
          </tr>
        </table>
        </center></div></td>
      </tr>
    </table>
    </center></div></td>
  </tr>
</tbody>
</table>
<%end if%>
<!--#include file="footer.asp"-->
</BODY></HTML>