⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 editdata.asp

📁 本房地产网站功能强大
💻 ASP
字号:
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/getPartStrAndBytesLen.asp" -->
<!--#include file="../top.asp"-->

<%
 Dim Rs,Sql
 OpenDataConn
 Set Rs=Server.CreateObject("ADODB.Recordset") 
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="JavaScript" src="../inc/index.js"></script>
<link href="../inc/style.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0">
<table width="980" border="0" align="center" cellpadding="0" cellspacing="0" class="main">
  <tr> 
    <td>

    </td>
  </tr>
  <tr> 
    <td><table width="980" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td align="center"> <table width="980" height="75" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr> 
                <td align="center" valign="top">
				<TABLE height=28 cellSpacing=0 cellPadding=0 width=980 align=center 
background=../img/headbg4.gif border=0>
  <TBODY>
  <TR>
    <TD align=right width=35>
	<IMG height=13 src="../img/headarrow.gif" 
      width=17></TD>
    <TD align=middle width=10></TD>
    <TD class=TD_Place width=935>您现在的位置:<font color="#FFFFFF"><span style="text-decoration: none"><a href="../index.aspx"><%=homepage_title%>
	</a></span></font>&gt;&gt; <FONT 
    color=#ffffff>会员申请</FONT></TD></TR></TBODY></TABLE>
				</td>
              </tr>
              <tr> 
                <td align="center" valign="top" bgcolor="#CDEECA"><br>
                    <table width=710 border="0" cellpadding="0" cellspacing="1" bgcolor="#7cb721">
                    <form action="savedata.asp" method="post" name="reg" id="reg"><tr> 
                        <td height="23" bgcolor="#7cb721" class="white" width="700"> <span class="black"><font color="#000000">用
						户注册个人信息: 
                                     **为必填写字段&nbsp;&nbsp;</font></span></td>
                      </tr>
                      <tr> 
                        <td height="209" align="center" valign="top" bgcolor="#FFFFFF"> 
                          <table width="100%" height="237" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#7cb721" class="blackbox" hspace="12">
                            <tr bgcolor="#FEFAEE" class="black"> 
                              <td width="141" height="12" align="right" valign="middle" bgcolor="#D9F2D7">您的用户名:</td>
                              <td width="556" height="24" bgcolor="#D9F2D7"><%=session("loginid")%></td>
                            </tr><%If is_house_ot_user=1 then%>
                            <tr bgcolor="#FEFAEE" class="black"> 
                              <td width="141" height="12" align="right" valign="middle" bgcolor="#D9F2D7">您的密码:</td>
                              <td width="556" height="24" bgcolor="#D9F2D7"> = <a href="<%=house_ot_modIfypass1%>" target=_blank>点击修改密码</a> 
                                = </td>
                            </tr>
                            <%else%>
                            <tr bgcolor="#FEFAEE" class="black"> 
                              <td width="141" height="12" align="right" valign="middle" bgcolor="#D9F2D7">您的密码:</td>
                              <td width="556" height="24" bgcolor="#D9F2D7"> (<font color="#FF0000"><%=session("reg_pwd")%></font>) = <a href="#" onClick="window.open('editpwd.asp?id=<%=session("loginid")%>','','width=300,height=160,top=20,left=300')" >点击修改密码</a> 
                                = </td>
                            </tr><%end if%>
                            <tr bgcolor="#FEFAEE" class="black"> 
                              <td width="141" height="12" align="right" valign="middle" bgcolor="#D9F2D7">&nbsp;&nbsp;真实姓名:</td>
                              <td width="556" height="24" bgcolor="#D9F2D7"> <input type="text" name="name" size="16" maxlength="24" class="inputb"> 
                                <font color="#FF0000"> **</font> </td>
                            </tr>
                            <tr bgcolor="#FEFAEE" class="black"> 
                              <td height="12" align="right" valign="middle" bgcolor="#D9F2D7">联系电话:</td>
                              <td height="12" bgcolor="#D9F2D7"> <input type="text" name="phone" class="inputb"> 
                                <font color="#FF0000">**</font> </td>
                            </tr>
                            <tr bgcolor="#FEFAEE" class="black"> 
                              <td height="12" align="right" valign="middle" bgcolor="#D9F2D7">E-mail:</td>
                              <td height="12" bgcolor="#D9F2D7"> <input type="text" name="email" size="30" class="inputb"> 
                                <font color="#FF0000"> **</font> <font color="#FF6600">(此电子邮件非常重要,请认真填写!)</font></td>
                            </tr>
                            <tr bgcolor="#FEFAEE" class="black"> 
                              <td width="141" height="12" align="right" valign="middle" bgcolor="#D9F2D7">&nbsp;&nbsp;密码提示问题:</td>
                              <td width="556" height="12" bgcolor="#D9F2D7"> <input type="text" name="question" size="20" maxlength="28" class="inputb"> 
                                <font color="#FF0000">**</font>需要找回密码的时候,提示的问题“您叫什么名字?”</td>
                            </tr>
                            <tr bgcolor="#FEFAEE" class="black"> 
                              <td width="141" height="17" align="right" valign="middle" bgcolor="#D9F2D7">&nbsp;&nbsp;问题回答:</td>
                              <td width="556" height="17" bgcolor="#D9F2D7"> <input type="text" name="answer" maxlength="28" size="20" class="inputb"> 
                                <font color="#FF0000">**</font>您自设问题的答案,如您的答案是“小黄” 
                                <input name="reg_type" type="hidden" id="reg_type" value="0"></td>
                            </tr>
                          	<tr>
                              <td width="697" height="17" align="right" valign="middle" bgcolor="#D9F2D7" colspan="2">
								<p align="center"><input type="submit" name="Submit2" value=" 提 交 " onClick="javascript:return checkfield();"></td>
                            	</tr>
                          </table></td>
                      </tr></form>
                    </table>
                    
                    <SCRIPT language=VBScript>

function checkfield()
	if trim(reg.name.value)="" then
		msgbox "请填写您的真实姓名!"
		reg.name.focus
		checkfield=false
		exit function
	end if
	
	if trim(reg.phone.value)="" then
		msgbox "请填写电话!"
		reg.phone.focus
		checkfield=false
		exit function
	end if
	if trim(reg.email.value)="" then
		msgbox "邮件不能为空!"
		reg.email.focus
		checkfield=false
		exit function
	else
		str1=trim(reg.email.value)
		if instr(str1,"@")=0 then
			msgbox "邮件地址错误!"
			reg.email.focus
			checkfield=false
			exit function
	       end if
         end if
          if trim(reg.question.value)="" then
		msgbox "请填写密码提示问题!"
		reg.question.focus
		checkfield=false
		exit function
	end if

	if trim(reg.answer.value)="" then
		msgbox "请填写问题回答!"
		reg.answer.focus
		checkfield=false
		exit function
	end if
	

	checkfield=true
end function
</SCRIPT>
                  
                  <br> <br> </td>
              </tr>
            </table></td>
        </tr>
      </table></td>
  </tr>
  <tr> 
    <td> <!--#include file="../end.asp" --> <div align="center"></div></td>
  </tr>
</table>
</body>
</html>
<%
 Set Rs=Nothing
 CloseDataConn
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -