亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb

首頁 > 學院 > 開發設計 > 正文

用戶注冊及跟蹤代碼(二)

2019-11-18 21:05:51
字體:
來源:轉載
供稿:網友
2. asp代碼(設立一DSN,請改動begin.asp)
----------------------------------
------文件begin.asp
<%
Set Con = Server.CreateObject( "ADODB.Connection" )
Con.Open "test" ,"test","test"
%>
-----文件reg_step1.asp
<html>
<head>
<title>會員注冊--基本信息</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<SCRipT LANGUAGE="javaScript1.1">
function verifyIt(form) {
    for (i = 0; i <document.forms[0].elements.length; i++) {
        if (document.forms[0].elements[i].type == "text" && document.forms[0].elements[i].value == ""){
            alert("所有內容必須填寫!")
            return false;
        }
    }
    if (document.forms[0].n_pass.value.length<6){
    alert("密碼不得少于6位")
    return false
    }
    if (document.forms[0].n_pass.value!=document.forms[0].nq_pass.value){
    alert("密碼與確認密碼不一致!")
    document.forms[0].n_pass.value=""
    document.forms[0].nq_pass.value=""
    return false;
    }
return true;
}
</SCRIPT>
</head>

<body bgcolor="#FFFFFF" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" text="#333333">
<table width="750" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td>&nbsp;</td>
  </tr>
  <tr>
    <td>
      <table width="777" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="149" valign="top" >&nbsp; </td>
          <td width="628" valign="top">
            <table width="628" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="464" height="12" valign="top">&nbsp;</td>
                <td width="164" height="12" valign="top">&nbsp;</td>
              </tr>
              <tr>
                <td width="464" height="203" valign="top">
                  <table width="460" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td width="10" height="198" valign="top">&nbsp;</td>
                      <td width="450" height="198" valign="top" align="center" class="txt105">
                                       <form name="ord_1" action="reg_step1_sub.asp" onSubmit="return verifyIt(this)" method="post">
                          <table width="400" border="0" cellspacing="0" cellpadding="0" align="center">
                            <tr align="center">
                              <td class="txt105" height="36"><font color="#336600">新會員注冊-基本信息</font>
                                <hr size="1" align="left" color="#669999">
                              </td>
                            </tr>
                            <tr valign="top">
                              <td height="45">
                                <table width="400" border="0">
                                  <tr>
                                    <td width="150" class="txt105" align="right"><font color="#336600">用戶名:</font></td>
                                    <td width="240" class="txt105">
                                      

<input type="text" name="n_name" class="txt9" size="20">
                                    </td>
                                  </tr>
                                  <tr>
                                    <td width="150" class="txt105" align="right"><font color="#336600">密碼:</font></td>
                                    <td width="240" class="txt105">
                                      <input type="passWord" name="n_pass" class="txt9" size="20">
                                      <font color="#336600"> 至少6位</font></td>
                                  </tr>
                                  <tr>
                                    <td width="150" class="txt105" align="right" height="33"><font color="#336600">確認密碼:</font></td>
                                    <td width="240" class="txt105" height="33">
                                      <input type="password" name="nq_pass" class="txt9" size="20">
                                    </td>
                                  </tr>
                                </table>
                              </td>
                            </tr>
                            <tr align="center">
                              <td height="41">
                                <hr size="1" align="left" color="#669999">
                                <input type="submit" name="Submit" value="申請" class="txt9">
                                <input type="reset" name="reset" value="重填" class="txt9">
                              </td>
                            </tr>
                            <tr align="center">
                              <td class="txt105">&nbsp;</td>
                            </tr>
                          </table>
                        </form>

                      </td>
                    </tr>
                  </table>
                </td>
                <td width="164" valign="top">&nbsp;</td>
              </tr>
            </table>
          </td>
        </tr>
      </table>
    </td>
  </tr>
  <tr align="center">
    <td>&nbsp;</td>
  </tr>
</table>
</body>
</html>

---文件reg_step1_sub.asp
<%
u_name=Request.Form("n_name")
u_pass=Request.Form("n_pass")

if u_name="" and u_pass="" then
Response.Redirect "reg_step1.asp"
Response.end
end if
%>
<!-- #include file = "../inc/adovbs.inc" -->
<!-- #include file = "../inc/begin.asp" -->
<html>
<head>
<title>會員注冊</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../CSS/sty1.css" type="text/css">
</head>

<body bgcolor="#FFFFFF" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" text="#333333">
<table width="750" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="49">&nbsp;</td>
  </tr>
  <tr>
    <td>
      <table width="777" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="147" valign="top" height="400">&nbsp; </td>
          <td width="630" valign="top" height="400">
            <table width="620" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="474" height="12" valign="top">&nbsp;</td>
                <td width="146" height="12" valign="top">&nbsp;</td>
              </tr>
              <tr>
                <td width="474" height="379" valign="top">
                  <table width="452" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td width="18" height="376" valign="top">&nbsp;</td>
                      <td width="434" height="376" valign="top" class="txt105">
                        <p>
                          <%

if trim(u_name)="" then
Response.write "<div align='center'><a class='link8' href='Javascript:history.go(-1)'>用戶名不能為空格,返回。</a></div>"
Response.write "</body></html>"
Response.end
else
u_name=rtrim(trim(u_name))
end if

if instr(u_name," ")<>0 then
Response.write "<div align='center'><a class='link8' href='javascript:history.go(-1)'>用戶名中不能包含空格,返回。</a></div>"
Response.write "</body></html>"
Response.end
end if

if instr(u_pass," ")<>0 then
Response.write "<div align='center'><a class='link8' href='javascript:history.go(-1)'>密碼中不能包含空格,返回。</a></div>"
Response.write "</body></html>"
Response.end
end if

Set MyCommand=Server.CreateObject("ADODB.Command")
Set MyCommand.ActiveConnection=Con
MyCommand.CommandType=adCmdStoredPRoc
MyCommand.CommandText="proc_UserRegBase"

MyCommand.Parameters.Append MyCommand.CreateParameter("u_name",adVarChar,adParamInput,30)
MyCommand.Parameters.Append MyCommand.CreateParameter("u_pass",adVarChar,adParamInput,30)

MyCommand.Parameters("u_name")=u_name
MyCommand.Parameters("u_pass")=u_pass


Set RS=MyCommand.Execute()

'Set RS=Server.CreateObject("ADODB.RecordSet")
'strSql="proc_userRegBase '"&u_name&"','"&u_pass&"'"
'SET RS=Con.Execute(strSql)

check_reg=RS("resultID")

if check_reg=0 then
set RS=rs.NextRecordSet
VailCodeLogin=rtrim(trim(RS("ValidCodeLogin")))
session("lotto_isLogin")=rtrim(trim(RS("ValidCodeLogin")))
Session("lotto_username")=u_name

end if

RS.Close
Con.Close
%>
                          <%if check_reg=0 then%>
                        </p>
                        <table width="400" border="0" align="center" cellspacing="0" cellpadding="0">
                          <tr>
                            <td class="txt105" align="center"><font color="#336600">注
                              冊 成 功!</font></td>
                          </tr>
                          <tr>
                            <td class="txt105" align="center">
                              <hr size="1" color="#669999">
                            </td>
                          </tr>
                          <tr>
                            <td class="txt105" align="center" height="35">
                              <p>用戶名:<b><%=u_name%></b><br>
                                密碼:<b><%=u_pass%></b></p>
                            </td>
                          </tr>
                          <tr>
                            <td class="txt9" height="188">
                              <hr size="1" color="#669999">
                              <table width="320" border="0" cellspacing="0" cellpadding="0" align="center">
                                <tr align="center">
                                  <td class="txt105" colspan="2">按<a href="reg_step2.asp?VailCodeLogin=<%=VailCodeLogin%>&name=<%=u_name%>"><font color="#336600">這里</font></a>,<a href="reg_step2.asp?VailCodeLogin=<%=VailCodeLogin%>&name=<%=u_name%>"><font color="#336600">填寫詳細的個人資料</font></a>。</td>
                                </tr>
                                <tr>
                                  <td class="txt105" colspan="2">&nbsp;</td>
                                </tr>
                                <tr>
                                  <td class="txt105" width="18">&nbsp;</td>
                                  <td class="txt105" width="302"><font color="#000000">注意,請仔細閱讀下列事項:</font></td>
                                </tr>
                                <tr>
                                  <td class="txt105" colspan="2" valign="top">
                                    <hr size="1" color="#669999">
                                  </td>
                                </tr>
                                <tr>
                                  <td class="txt105" width="18" valign="top">1.</td>
                                  <td class="txt105" width="302">如果您想進行網上訂購, 必須填寫更詳細的個人資料。</td>
                                </tr>
                                <tr>
                                  <td class="txt105" width="18" valign="top">2.</td>
                                  <td class="txt105" width="302">如果您想以后填寫, 請在登錄狀態,進入&quot;彩民社區&quot;-&quot;用戶服務&quot;
                                    功能區填寫。</td>
                                </tr>
                                <tr>
                                  <td class="txt105" width="18" valign="top">&nbsp;</td>
                                  <td class="txt105" width="302">&nbsp;</td>
                                </tr>
                              </table>
                            </td>
                          </tr>
                          <tr>
                            <td class="txt9" align="center">&nbsp;</td>
                          </tr>
                        </table>
                        <%end if%>
                        <%if check_reg=-1 then%>
                        <table width="400" border="0" align="center" cellpadding="0" cellspacing="0">
                          <tr align="center">
                            <td>&nbsp;</td>
                          </tr>
                          <tr align="center">
                            <td>&nbsp;</td>
                          </tr>
                          <tr align="center">
                            <td><a href="javascript:history.go(-1)" class="LINK8">該用戶名已經存在,返回。</a></td>
                          </tr>
                        </table>
                        <%end if%>
                      </td>
                    </tr>
                  </table>
                </td>
                <td width="147" valign="top" height="379">&nbsp;</td>
              </tr>
            </table>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
</body>
</html>



發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb
国产精品专区h在线观看| 97在线视频免费观看| 国产高清视频一区三区| 国产精品嫩草影院一区二区| 久久在线免费观看视频| 国产成人精品最新| 日韩精品一二三四区| 91久久久久久久| 亚洲欧洲日产国码av系列天堂| 97成人精品视频在线观看| 久久免费高清视频| 欧美视频精品一区| 伊人久久男人天堂| 91成人免费观看网站| 欧美专区中文字幕| 精品亚洲男同gayvideo网站| 久久91亚洲精品中文字幕| 一个人www欧美| 国产噜噜噜噜噜久久久久久久久| 国产自产女人91一区在线观看| 欧美性xxxxx极品娇小| 在线观看免费高清视频97| 欧美二区在线播放| 毛片精品免费在线观看| 成人黄色激情网| 欧美孕妇与黑人孕交| 国产在线精品成人一区二区三区| 韩国精品美女www爽爽爽视频| 日韩经典中文字幕| 欧美色videos| 国产一区在线播放| 日韩亚洲综合在线| 国产精品视频永久免费播放| 国产剧情日韩欧美| 一区二区亚洲精品国产| 九九热视频这里只有精品| 欧美性xxxxx极品| 中日韩美女免费视频网址在线观看| 欧美高清视频免费观看| 国产精品一久久香蕉国产线看观看| 国产精品旅馆在线| 亚洲天天在线日亚洲洲精| 欧美电影免费看| 国产精品91久久久久久| 国产区精品视频| 久久精品免费电影| 色婷婷av一区二区三区在线观看| 亚洲人成欧美中文字幕| 久久99精品久久久久久青青91| 色噜噜亚洲精品中文字幕| 欧美日韩在线视频一区| 久久久噜噜噜久久| 国产精品爽爽爽| 91久久精品日日躁夜夜躁国产| 亚洲人成在线免费观看| 国产+成+人+亚洲欧洲| 永久免费毛片在线播放不卡| 欧美一级在线亚洲天堂| 欧美日韩国产丝袜美女| 日韩精品视频中文在线观看| 永久免费精品影视网站| 亚洲免费视频观看| 久久香蕉国产线看观看av| 国产精品稀缺呦系列在线| 黄网站色欧美视频| 亚洲91精品在线观看| 亚洲国产日韩欧美在线动漫| 久久69精品久久久久久国产越南| 欧美国产精品人人做人人爱| 最近免费中文字幕视频2019| 欧美夫妻性生活视频| 久久777国产线看观看精品| 欧美大片欧美激情性色a∨久久| 福利视频第一区| 91久久综合亚洲鲁鲁五月天| 国产中文欧美精品| 97在线视频一区| 国产亚洲欧洲高清一区| 日韩亚洲在线观看| 国产欧美日韩免费看aⅴ视频| 久久综合伊人77777| 91精品国产99久久久久久| 亚洲国产精品va在看黑人| 久久久久www| 欧美中文在线视频| 久久在线免费视频| 亚洲第一精品夜夜躁人人爽| 亚洲免费人成在线视频观看| 两个人的视频www国产精品| 2019国产精品自在线拍国产不卡| 欧美激情综合亚洲一二区| 日韩综合视频在线观看| 久久九九热免费视频| 国产精品91免费在线| 中文字幕久热精品视频在线| 久久精品视频在线播放| 久久久国产一区二区| 成人妇女淫片aaaa视频| 在线精品91av| 国产中文字幕91| 欧美成人免费视频| 国产精品主播视频| 成人国产精品久久久久久亚洲| 欧美激情三级免费| 欧美精品在线免费观看| 欧美激情乱人伦一区| www.久久久久久.com| 91精品视频播放| 久久久久久久久久久网站| 久久综合伊人77777| 国产做受高潮69| 国产精品美女999| 久久成人精品一区二区三区| 欧美在线视频a| 国产精品日韩在线| 色综合五月天导航| 亚洲免费伊人电影在线观看av| 亚洲人成在线观看网站高清| 国产精品久久久久久搜索| 欧美日韩精品国产| 在线成人激情黄色| 亚洲最大av网站| 精品久久久91| 国产va免费精品高清在线观看| 九九视频这里只有精品| 国产日韩在线看| 亚洲第一在线视频| 亚洲精品免费网站| 午夜精品一区二区三区av| 亚洲国产成人一区| 国产精品一区二区三区成人| 日韩av电影在线播放| 亚洲一区二区三区四区视频| 久久综合网hezyo| 亚洲色图在线观看| 国产精品7m视频| 国产精品亚洲综合天堂夜夜| 国产欧美一区二区三区四区| 北条麻妃久久精品| 国产精品久久久久久久午夜| 久久亚洲国产精品| 欧美日韩精品中文字幕| 国产在线不卡精品| 亚洲综合第一页| 亚洲欧美综合v| 狠狠综合久久av一区二区小说| 中文字幕日韩电影| 欧美www视频在线观看| 国产精品香蕉在线观看| 在线观看日韩专区| 亚洲尤物视频网| 国产不卡视频在线| 欧美日韩中文字幕综合视频| 中文字幕精品视频| 日韩在线视频国产| 日韩视频在线一区| 亚洲天堂第一页| 欧美成人午夜激情| 亚洲国产97在线精品一区| 中文字幕日韩视频| 欧美大荫蒂xxx| 精品久久久久久亚洲国产300| 国产精品日韩一区| 久久躁狠狠躁夜夜爽|