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

📄 editreg.asp

📁 三鸟个人网站源码。
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="session.asp"-->
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<LINK href="style.css" rel=stylesheet>
<title>会员/代理注册</title>
</head>
<script language="VBScript">
<!--
Sub Checkdata()
If reg1.d_pass.value = empty then
Window.Alert"填写密码没有填写"
Exit Sub
end if
If len(reg1.d_pass.value)>15 then
Window.Alert"填写密码的字符超过15个"
Exit Sub
end if
If reg1.d_pass2.value = empty then
Window.Alert"重复密码没有填写"
Exit Sub
end if
If reg1.d_pass.value<>reg1.d_pass2.value then
Window.Alert"“填写密码”与“重复密码”不一样"
Exit Sub
end if
If reg1.d_question.value = empty then
Window.Alert"密码问题没有填写"
Exit Sub
end if
If reg1.d_answer.value = empty then
Window.Alert"密码答案没有填写"
Exit Sub
end if
If reg1.d_mail.value = empty then
Window.Alert"邮箱地址没有填写"
Exit Sub
end if
If reg1.d_name.value = empty then
Window.Alert"真实姓名没有填写"
Exit Sub
end if
If reg1.d_tel.value = empty then
Window.Alert"联系电话没有填写"
Exit Sub
end if
If reg1.d_tex.value = empty then
Window.Alert"联系地址没有填写"
Exit Sub
end if
If reg1.d_oicq.value = empty then
Window.Alert"OICQ没有填写"
Exit Sub
end if
If reg1.d_grade.value = empty then
Window.Alert"代理级别没有填写"
Exit Sub
end if
If reg1.d_money.value = empty then
Window.Alert"剩预制费没有填写"
Exit Sub
end if
reg1.submit
end sub
-->
</script>
<body>

<%
Set rs1 = Server.CreateObject("ADODB.Recordset")
sql="select * from duser where d_id="&request("d_id")        
rs1.open sql,conn,3,3
        %>
<div align="center">
  <center>
  <table border="0" cellpadding="0" cellspacing="0" width="758">
    <tr>
      <td width="565" valign="top">
        <table border="0" cellpadding="0" cellspacing="0" width="100%" height="1">
          <tr>
            <td width="100%" height="14" valign="top"><form method="post" action="EDITsave.asp?d_id=<%=rs1("d_id")%>" name="reg1">
                <div align="center">
                  <center>
                <table border="0" cellpadding="0" cellspacing="0" width="100%" height="309">
                  <tr>
                    <td width="100%" colspan="3" height="22">
                      <p align="center">...:::以下信息必须填写完整、正确、<font color="#FF0000">*</font>为必须填写:::...</td>
                  </tr>
                  <tr>
                    <td width="100%" height="14" colspan="3">
                      <table border="0" cellpadding="0" cellspacing="1" width="200" height="21">
                        <tr>
                          <td bgcolor="#EEEEEE" width="99" height="19">
                            <p align="center"><b><font color="#000000">简要信息</font></b></td>
                          <td bgcolor="#ECE9D8" width="99" height="19"> </td>
                        </tr>
                      </table>
                    </td>
                  </tr>
                  <tr>
                    <td width="19%" height="27" align="center">用 户 名:</td>
                    <td width="30%" height="27"><font color="#FF0000"><%=rs1("d_webname")%></font></td>
                    <td width="51%" height="27"><font color="#FF0000">*</font>不能修改</td>
                  </tr>
                  <tr>
                    <td width="19%" height="27" align="center">密&nbsp;&nbsp;&nbsp;        
                      码:</td>
                    <td width="30%" height="27"><input name="d_pass" size="20" style="border: 1 solid #000000" value="<%=rs1("d_pass")%>"></td>
                    <td width="51%" height="27"><font color="#FF0000">*</font>尽量复杂,不要超过15个字符</td>
                  </tr>
                  <tr>
                    <td width="19%" height="27" align="center">重复密码:</td>
                    <td width="30%" height="27"><input name="d_pass2" size="20" style="border: 1 solid #000000" value="<%=rs1("d_pass2")%>"></td>
                    <td width="51%" height="27"><font color="#FF0000">*</font>重复密码</td>
                  </tr>
                  <tr>
                    <td width="19%" height="27" align="center">密码问题:</td>
                    <td width="30%" height="27"><input name="d_question" size="20" style="border: 1 solid #000000" value="<%=rs1("d_question")%>"></td>
                    <td width="51%" height="27"><font color="#FF0000">*</font>忘记密码的问题</td>
                  </tr>
                  <tr>
                    <td width="19%" height="27" align="center">密码答案:</td>
                    <td width="30%" height="27"><input name="d_answer" size="20" style="border: 1 solid #000000" value="<%=rs1("d_answer")%>"></td>
                    <td width="51%" height="27"><font color="#FF0000">*</font>忘记密码的答案</td>
                  </tr>
                  <tr>
                    <td width="19%" height="14" align="center">邮件地址:</td>
                    <td width="30%" height="14"><input type="text" name="d_mail" size="20" style="border: 1 solid #000000" value="<%=rs1("d_mail")%>"></td>
                    <td width="51%" height="14"><font color="#FF0000">*</font>最重要的联系方式,填写最常用的邮箱</td>
                  </tr>
                  <tr>
                    <td width="100%" height="14" colspan="3">
                      <table border="0" cellpadding="0" cellspacing="1" width="200" height="21">
                        <tr>
                          <td bgcolor="#EEEEEE" width="99" height="18">
                            <p align="center"><b><font color="#000000">完整信息</font></b></td>
                          <td bgcolor="#ECE9D8" width="99" height="18"> </td>
                        </tr>
                      </table>
                    </td>
                  </tr>
                  <tr>
                    <td width="19%" height="25" align="center">真实姓名:</td>
                    <td width="30%" height="25"><input type="text" name="d_name" size="20" style="border: 1 solid #000000" value="<%=rs1("d_name")%>"></td>
                    <td width="51%" height="25"><font color="#FF0000">*</font>付款的有效证明</td>
                  </tr>
                  <tr>
                    <td width="19%" height="26" align="center">联系电话:</td>
                    <td width="30%" height="26"><input type="text" name="d_tel" size="20" style="border: 1 solid #000000" value="<%=rs1("d_tel")%>"></td>
                    <td width="51%" height="26"><font color="#FF0000">*</font>可以是住宅电话、手机、公司电话</td>
                  </tr>
                  <tr>
                    <td width="19%" height="26" align="center">联系地址:</td>
                    <td width="30%" height="26"><input type="text" name="d_tex" size="20" style="border: 1 solid #000000" value="<%=rs1("d_tex")%>"></td>
                    <td width="51%" height="26"><font color="#FF0000">*</font>住宅地址或者是公司地址</td>
                  </tr>
                  <tr>
                    <td width="19%" height="26">
                      <p align="center"><b>O I C Q:</b></td>      
                    <td width="30%" height="26"><input type="text" name="d_oicq" size="20" style="border: 1 solid #000000" value="<%=rs1("d_oicq")%>"></td>
                    <td width="51%" height="26">&nbsp;有则填写,无不需更改。方便与我们联系</td>
                  </tr>
  </center>
                  <tr>
                    <td width="19%" height="26" align="center">
                      代理级别:</td>    
                    <td width="30%" height="26"><input type="text" name="d_grade" size="20" style="border: 1 solid #000000" value="<%=rs1("d_grade")%>"></td>
                    <td width="51%" height="26">是本站代理的级别</td>
                  </tr>
                  <tr>
                    <td width="19%" height="26" align="center">
                      剩预制费:</td>    
                    <td width="30%" height="26"><input type="text" name="d_money" size="20" style="border: 1 solid #000000" value="<%=rs1("d_money")%>"></td>
                    <td width="51%" height="26">是本站代理的预制费</td>
                  </tr>
                <tr>
                  <td width="100%" height="31" colspan="3">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;     
                    <input type="button" value="确认提交" name="B1" ONCLICK="Checkdata"> <input type="reset" value="全部重写" name="B2"></td>    
                </tr>
              </table>
                </center>
              </div>
            </form></td>
          </tr>
        </table>
        <%rs1.Close
   set rs1=Nothing
   
   conn.Close
   set conn=Nothing%>
      </td>
    </tr>
  </table>
</div>

</body>

</html>

⌨️ 快捷键说明

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