l_write.asp

一个朋友购买的商业版房产网源程序

<!--#include file="top.asp"-->
<SCRIPT language="javascript">
<!--

function del_space(s)
{
	for(i=0;i<s.length;++i)
	{
	 if(s.charAt(i)!=" ")
		break;
	}

	for(j=s.length-1;j>=0;--j)
	{
	 if(s.charAt(j)!=" ")
		break;
	}

	return s.substring(i,++j);
}

function VerifySubmit()
{
	fbr= del_space(document.all("fbr").value);
     if (fbr.length == 0)
     {
        alert("您忘了填写用户名!");
	return false;
     }
 	 
	email = del_space(document.all("email").value);
     if (email.length == 0)
     {
        alert("您忘了填 Email!");
	return false;
     }
	 
	email = del_space(document.all("email").value);
     if (email.indexOf("@")==-1)
     {
        alert("Email 输入有误！");
	return false;
     }
	 
	email = del_space(document.all("email").value);
     if (email.indexOf(".")==-1)
     {
        alert("Email 输入有误！");
	return false;
     }
	 	
	title = del_space(document.all("title").value);
     if (title.length == 0)
     {
        alert("主题不能为空,请重新填写!");
		return false;
     }

	nr = del_space(document.all("nr").value);
     if (nr.length == 0)
     {
        alert("留言内容不能为空，请重新填写!");
        return false;
     }
	 
	nr = del_space(document.all("nr").value);
     if (nr.length > 300)
     {
        alert("内容不能大于300字");
        return false;
     }

	return true;
}
//-->
</SCRIPT>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td background="images/topb.gif"><table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td width="5%"><img src="images/cent_01.gif" width="37" height="20"></td>
          <td width="93%" background="images/cent_02.gif">&nbsp;</td>
          <td width="2%"><img src="images/cent_03.gif" width="51" height="20"></td>
        </tr>
      </table></td>
  </tr>
  <tr> 
    <td background="images/topb.gif"> <div align="center"> 
        <table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr> 
            <td><form name="form2" method="post" action="L_writeok.asp" onSubmit="return VerifySubmit()">
                <table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
                  <tr> 
                    <td colspan="2"><div align="center"><font color="#FF0000"><strong>注意</strong></font>：以下星号（ 
                        <font color="#FF0000">*</font> ）标出的项目必需填写</div></td>
                  </tr>
                  <tr> 
                    <td width="69%" rowspan="2"><table width="99%" height="133" border="0" cellpadding="0" cellspacing="0">
                        <tr> 
                          <td width="27%">你的名字：</td>
                          <td width="73%"><input name="fbr" type="text" id="fbr3"> 
                            <font color="#FF0000">*</font></td>
                        </tr>
                        <tr> 
                          <td>姓别：</td>
                          <td><input name="xb" type="radio" value="1" checked>
                            boy 
                            <input type="radio" name="xb" value="2">
                            girl</td>
                        </tr>
                        <tr> 
                          <td>QQ：</td>
                          <td><input name="qq" type="text" id="qq"></td>
                        </tr>
                        <tr> 
                          <td height="19">电子邮件：</td>
                          <td><input  name="email" type="text" id="email"> <font color="#FF0000">*</font></td>
                        </tr>
                        <tr> 
                          <td>你的主页： </td>
                          <td><input value=http://  name="homepage" type="text" id="homepage"> 
                        </tr>
                        <tr> 
                          <td>留言主题：</td>
                          <td><input name="title" type="text" id="title3"> <font color="#FF0000">*</font></td>
                        </tr>
                      </table></td>
                    <td width="31%"><a href="user_face.asp" target="_blank">查看所有头像</a> 
                      <select name="pic" id="pic">
                        <option value="image/face/em01.gif" selected>01</option>
                        <option value="image/face/em02.gif">02</option>
                        <option value="image/face/em03.gif">03</option>
                        <option value="image/face/em04.gif">04</option>
                        <option value="image/face/em05.gif">05</option>
                        <option value="image/face/em06.gif">06</option>
                        <option value="image/face/em07.gif">07</option>
                        <option value="image/face/em08.gif">08</option>
                        <option value="image/face/em09.gif">09</option>
                        <option value="image/face/em10.gif">10</option>
                        <option value="image/face/em11.gif">11</option>
                        <option value="image/face/em12.gif">12</option>
                        <option value="image/face/em13.gif">13</option>
                        <option value="image/face/em14.gif">14</option>
                        <option value="image/face/em15.gif">15</option>
                        <option value="image/face/em16.gif">16</option>
                        <option value="image/face/em17.gif">17</option>
                        <option value="image/face/em18.gif">18</option>
                        <option value="image/face/em19.gif">19</option>
                        <option value="image/face/em20.gif">20</option>
                        <option value="image/face/em21.gif">21</option>
                        <option value="image/face/em22.gif">22</option>
                        <option value="image/face/em23.gif">23</option>
                      </select> </td>
                  </tr>
                  <tr> 
                    <td>&nbsp;</td>
                  </tr>
                  <tr> 
                    <td colspan="2"><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
                        <tr> 
                          <td width="18%">你的留言：<br> <br>
                            ≤300</td>
                          <td width="82%"><TEXTAREA name="nr" cols="58" rows="6" id="textarea2" title="按 Ctrl+Enter 可直接发送" onkeydown=javascript:frm_quicksubmit(); ></TEXTAREA></td>
                        </tr>
                        <tr> 
                          <td>&nbsp;</td>
                          <td><input type="submit" name="Submit2" value="提交"> 
                            <INPUT name="reset" type=reset onclick="return reset()" value=" 重 新 再 来 "> 
                          </td>
                        </tr>
                      </table></td>
                  </tr>
                </table>
              </form></td>
          </tr>
        </table>
      </div></td>
  </tr>
</table>
<!--#include file="let.asp"-->