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

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

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

2019-11-18 21:05:51
字體:
來源:轉載
供稿:網友
2. asp代碼(設立一DSN,請改動begin.asp)
----------------------------------
-----文件reg_step2.asp
<%
ValidCodeLogin=Request.QueryString("VailCodeLogin")
u_name=Request.QueryString("name")

if ValidCodeLogin="" or u_name="" then
Response.Redirect "reg_step1.asp"
Response.end
end if
%>
<html>
<head>
<title>詳細信息填寫</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../CSS/lotsty1.css">
<SCRipT LANGUAGE="javaScript1.1">
function isPosInteger(inputVal) {
    inputStr = inputVal.toString()
    for (var i = 0; i < inputStr.length; i++) {
        var oneChar = inputStr.charAt(i)
        if (oneChar < "0" || oneChar > "9") {
            return false
        }
    }
    return true
}

function CheckForm(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].email.value.indexOf("@")==-1 || document.forms[0].email.value.indexOf(".")==-1 || document.forms[0].email.value.indexOf("@.")!=-1 || document.forms[0].email.value=="" || document.forms[0].email.value==null || document.forms[0].email.value.indexOf("@")==0){
    alert('E-mail未輸入或格式有誤,請查看!')
    return false
    }

    if(!isPosInteger(document.forms[0].year.value)){
    alert("年份必須是數字!")
    return false
    }
    if(!isPosInteger(document.forms[0].month.value)){
    alert("月份必須是數字!")
    return false
    }
    if(!isPosInteger(document.forms[0].date.value)){
    alert("日期必須是數字!")
    return false
    }
return true;
}
</SCRIPT>
<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="46">&nbsp;</td>
  </tr>
  <tr>
    <td height="426">
      <table width="777" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="149" valign="top" height="386">&nbsp; </td>
          <td width="628" valign="top" height="386">
            <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" valign="top" height="367">
                  <table width="474" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td width="12"  valign="top" height="368">&nbsp;</td>
                      <td width="462" valign="top" class="txt105" height="368">
                        <table width="400" border="0" cellspacing="0" cellpadding="0" align="center">
                          <tr align="center">
                            <td width="100%" class="txt105" height="20"><font color="#006600">個人詳細信息填寫
                              </font></td>
                          </tr>
                          <tr valign="top">
                            <td width="100%" height="346">
                              <form method="post"action="reg_step2_sub.asp" onSubmit="return CheckForm(this)">
                                <table width="400" border="0" cellspacing="4" cellpadding="0" align="center">
                                  <tr>
                                    <td colspan="2" class="txt9">
                                      <hr size="1" align="left" color="#669999">
                                    </td>
                                  </tr>
                                  <tr>
                                    <td width="111" class="txt9" align="right" valign="bottom"><font color="#336600">真實姓名:</font></td>
                                    <td width="277" class="txt9" valign="top">
                                      <input type="text" name="true_name" size="10" class="txt9">
                                    </td>
                                  </tr>
                                  <tr>
                                    <td width="111" class="txt9" align="right" valign="bottom"><font color="#336600">性別:</font></td>
                                    <td width="277" class="txt9" valign="top">
                                      <select name="sex" class="txt9">
                                        <option value="男" selected>男</option>
                                        <option value="女">女</option>
                                      </select>
                                    </td>
                                  </tr>
                                  <tr>
                                    <td width="111" class="txt9" align="right" valign="bottom"><font color="#336600">生日:</font></td>
                                    <td width="277" class="txt9" valign="top">
                                      <input type="text" name="year" size="4" class="txt9">
                                      年
                                      <input type="text" name="month" size="2" class="txt9">
                                      月
                                      <input type="text" name="date" size="2" class="txt9">
                                      日 </td>
                                  </tr>
                                  <tr>
                                    <td width="111" class="txt9" align="right"><font color="#336600">身份證編號:</font></td>
                                    <td width="277" class="txt9" valign="top">
                                      <input type="text" name="idcard" class="txt9">
                                      <br>
                                      作為取貨憑證,請務必正確填寫。 </td>
                                  </tr>
                                  <tr>
                                    <td width="111" class="txt9" align="right" valign="bottom"><font color="#336600">聯系地址:</font></td>
                                    <td width="277" class="txt9" valign="top">
                                      <input type="text" name="address" class="txt9">
                                    </td>
                                  </tr>
                                  <tr>
                                    <td width="111" class="txt9" align="right" height="23"><font color="#336600">聯系電話:</font></td>
                                    <td width="277" class="txt9" valign="top" height="23">
                                      <input type="text" name="telephone" class="txt9">
                                    </td>
                                  </tr>
                                  <tr>
                                    <td width="111" class="txt9" align="right"><font color="#336600">Email地址:</font></td>
                                    <td width="277" class="txt9" valign="top">
                                      <input type="text" name="email" class="txt9">
                                      <br>
                                      中獎信息將以此E-mail地址發送。 </td>
                                  </tr>
                                  <tr>
                                    <td colspan="2" class="txt9">
                                      <hr size="1" align="left" color="#669999">
                                    </td>
                                  </tr>
                                  <tr align="center">
                                    <td colspan="2" class="txt9">
                                      <input type="submit" name="Submit" value="提交" class="txt9">
                                      <input type="reset" name="reset" value="重填" class="txt9">
                                      <input type="hidden" name="isLogin" value="<%=ValidCodeLogin%>" >
                                      <input type="hidden" name="u_name" value="<%=u_name%>" >
                                    </td>
                                  </tr>
                                  <tr align="center">
                                    <td colspan="2" class="txt9">
                                      <hr size="1" align="left" color="#669999">
                                    </td>
                                  </tr>
                                  <tr align="center">
                                    <td colspan="2" class="txt9">
                                      <table width="353" border="0" cellspacing="0" cellpadding="0">
                                        <tr>
                                          <td width="353" class="txt9" height="26"><font color="#FF6666">請查看上述信息的正確性,我們將據此來確認您的真實身份。
                                            </font></td>
                                        </tr>
                                      </table>
                                    </td>
                                  </tr>
                                </table>
                              </form>
                            </td>
                          </tr>
                        </table>
                      </td>
                    </tr>
                  </table>
                </td>
                <td width="146" valign="top" height="367">&nbsp;</td>
              </tr>
            </table>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
</body>

</html>


---文件reg_step2_sub.asp

<%
islogin=Request("isLogin")
u_name=Request("u_name")

if islogin="" or u_name="" 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/lotsty1.css">
<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="50">&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="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" valign="top">
                  <table width="471" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td width="14" valign="top">&nbsp;</td>
                      <td width="457" valign="top" class="txt105">
<%
true_name=Request("true_name")
sex=Request("sex")
birth=Request("year")&"-"&Request("month")&"-"&Request("date")

if IsDate(birth) then
birth=FormatDateTime(birth,1)
    if Year(birth)<=999 then %>
    <table width="400" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr align="center">
                            <td width="400" class="txt9" height="120"><font color="#CC0000">出生日期輸入錯誤,<a href="Javascript:history.go(-1)" class="link8">返回。</a></font></td>
        </tr>
      </table>
      <%
Response.write "</body></html>"
Response.end
end if
else%>
      <table width="400" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr align="center">
                            <td width="400" class="txt9" height="120"><font color="#CC0000">出生日期輸入錯誤,<a href="javascript:history.go(-1)" class="link8">返回。</a></font></td>
        </tr>
      </table>
      <%
Response.write "</body></html>"
Response.end
end if

idcard=Request("idcard")
address=Request("address")
email=Request("email")
telephone=Request("telephone")

'response.write birth
'response.end

strSql="PRoc_UserInfoUpdate"
strSql=strSql & "  '" & islogin & "'"
strSql=strSql & " ,'" & true_name & "'"
strSql=strSql & " ,'" & sex & "'"
strSql=strSql & " ,'" & birth & "'"
strSql=strSql & " ,'" & idcard & "'"
strSql=strSql & " ,'" & address & "'"
strSql=strSql & " ,'" & email & "'"
strSql=strSql & " ,'" & telephone & "'"
Set rs = Con.Execute(strSql)
ret=rs.fields("resultID")
%>
                        <table width="400" border="0" cellspacing="0" cellpadding="0" align="center">
                          <%if ret=0 then%>
                          <tr>
                            <td width="400" class="txt9" height="20" align="center"><font color="#006600">您的個人信息填寫如下:</font></td>
                          </tr>
                          <tr>
                            <td width="400" class="txt9" height="20" align="center">
                              <hr size="1" align="left" color="#669999">
                            </td>
                          </tr>
                          <tr>
                            <td width="400" class="txt9" height="20" align="center">真實姓名:<%=true_name%></td>
                          </tr>
                          <tr>
                            <td width="400" class="txt9" height="20" align="center">性別:<%=sex%></td>
                          </tr>
                          <tr>
                            <td width="400" class="txt9" height="20" align="center">生日:<%=birth%></td>
                          </tr>
                          <tr>
                            <td width="400" class="txt9" height="20" align="center">身份證:<%=idcard%></td>
                          </tr>
                          <tr>
                            <td width="400" class="txt9" height="20" align="center">地址:<%=address%></td>
                          </tr>
                          <tr>
                            <td width="400" class="txt9" height="20" align="center">Email:<%=email%></td>
                          </tr>
                          <tr>
                            <td width="400" class="txt9" height="20" align="center">聯系電話:<%=telephone%></td>
                          </tr>
                          <tr>
                            <td width="400" class="txt9" height="20" align="center">
                              <hr size="1" align="left" color="#669999">
                            </td>
                          </tr>
                          <tr align="center">
                            <td width="400" class="txt105" height="22">
                              <table width="320" border="0" cellspacing="0" cellpadding="0">
                                <tr>
                                  <td width="320" class="txt9" height="26"><font color="#FF6666">請查看上述信息的正確性,我們將據此來確認您的真實身份。</font></td>
                                </tr>
                              </table>
                            </td>
                          </tr>
                          <tr align="center">
                            <td width="400" class="txt9" height="17">
                              <p>請注意您現在已處于登錄狀態。</p>
                              <p><a href="winload.asp">&gt;&gt;登出--臨時用&lt;&lt;</a></p>
                            </td>
                          </tr>
                          <%elseif MyCommand("ReturnCode")=-1 then %>
                          <tr>
                            <td width="400" class="txt105" height="120" align="center"><font color="#CC0000">請先登錄。</font></td>
                          </tr>
                          <%elseif MyCommand("ReturnCode")=-2 then %>
                          <tr>
                            <td width="400" class="txt105" height="120" align="center"><font color="#CC0000">用戶超時</font></td>
                          </tr>
                          <%elseif MyCommand("ReturnCode")=-3 then %>
                          <tr>
                            <td width="400" class="txt105" height="120" align="center"><font color="#CC0000">用戶資料輸入錯誤</font></td>
                          </tr>
                          <%else%>
                          <%end if%>
                        </table>
                       
                      </td>
                    </tr>
                  </table>
                </td>
                <td width="146" valign="top">&nbsp;</td>
              </tr>
            </table>
          </td>
        </tr>
      </table>
    </td>
  </tr>
  <tr align="center">
    <td height="76">&nbsp;</td>
  </tr>
</table>
<%Con.Close%>
</body>
</html>


---文件winload.asp


<!-- #include file = "../inc/adovbs.inc" -->
<!-- #include file = "../inc/begin.asp" -->
<%
validlogin=session("lotto_isLogin")
if validlogin<>"" then
Set MyComquit=Server.CreateObject("ADODB.Command")
Set MyComquit.ActiveConnection=Con
MyComquit.CommandType=adCmdStoredProc
MyComquit.CommandText="proc_UserLogout"
MyComquit.Parameters.Append MyComquit.CreateParameter("ReturnCode",adInteger,adParamReturnValue)
MyComquit.Parameters.Append MyComquit.CreateParameter("quitid",adVarChar,adParamInput,30)
MyComquit.Parameters("quitid")=validlogin
MyComquit.Execute()
end if
Session("lotto_isLogin")=""
Session("lotto_username")=""
Session("lotto_UserLevel")=""
%>
<%Con.Close%>
<meta http-equiv=refresh content='0;url=http://myang.533.net'>




發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb
欧美理论电影网| 国产在线不卡精品| 国产成人激情视频| 国产精品私拍pans大尺度在线| 欧美超级乱淫片喷水| 成人激情在线观看| 色与欲影视天天看综合网| 精品一区二区亚洲| 国产精品对白刺激| 欧美成人精品激情在线观看| 动漫精品一区二区| 国产精品偷伦免费视频观看的| 国产精品旅馆在线| 蜜臀久久99精品久久久无需会员| 欧美激情成人在线视频| 国产精品对白刺激| 俺去啦;欧美日韩| 欧美精品做受xxx性少妇| 国产精品6699| 国产99久久久欧美黑人| 成人精品网站在线观看| 欧美特黄级在线| 久久99精品久久久久久青青91| 欧美性xxxx18| 国产精品免费电影| 国产美女高潮久久白浆| 成人国产在线激情| 日韩网站免费观看高清| 亚洲视频综合网| 久久99精品久久久久久噜噜| 色婷婷久久av| 久久久99免费视频| 91精品久久久久久久久久入口| 色综合色综合久久综合频道88| 国产性色av一区二区| 中文国产亚洲喷潮| 久久精品99久久香蕉国产色戒| 日韩网站免费观看高清| 97国产精品久久| 亚洲美女自拍视频| 国产激情久久久| 国产九九精品视频| 精品国产999| 欧美视频免费在线观看| 欧美中文字幕在线观看| 国产精品视频xxx| 亚洲japanese制服美女| 在线日韩第一页| 国产一区欧美二区三区| 在线播放国产一区中文字幕剧情欧美| 国产日韩在线看片| 国产精品久久久久aaaa九色| 日韩电影免费观看在线观看| 成人高h视频在线| 亚洲裸体xxxx| 日韩在线欧美在线| 亚洲欧美中文另类| 成人免费观看49www在线观看| 国产一区二区三区在线观看视频| 蜜臀久久99精品久久久久久宅男| 亚洲aⅴ日韩av电影在线观看| 国产成人亚洲综合91| 日韩av在线电影网| 亚洲最大av在线| 91精品国产99| 日本高清+成人网在线观看| 亚洲第一色在线| 欧美大片网站在线观看| 色偷偷噜噜噜亚洲男人| 亚洲国产日韩欧美在线动漫| 国产区精品在线观看| 亚洲视频网站在线观看| 欧美日韩免费网站| 久久精品亚洲94久久精品| 性日韩欧美在线视频| 97人人爽人人喊人人模波多| 欧美精品一本久久男人的天堂| 欧美裸体xxxxx| 国产成人精品一区二区在线| 欧美精品亚州精品| 亚洲永久在线观看| 综合欧美国产视频二区| 日韩欧美中文字幕在线播放| 爽爽爽爽爽爽爽成人免费观看| www.亚洲成人| 91社区国产高清| 欧美色道久久88综合亚洲精品| 亚洲大胆人体视频| 91免费观看网站| 欧洲美女免费图片一区| 狠狠久久五月精品中文字幕| 欧美最猛黑人xxxx黑人猛叫黄| 精品网站999www| 国产在线精品播放| 亚洲香蕉成人av网站在线观看| 神马国产精品影院av| 欧洲午夜精品久久久| 在线播放国产一区中文字幕剧情欧美| 国产精品青青在线观看爽香蕉| 亚洲成**性毛茸茸| 亚洲va国产va天堂va久久| 91美女片黄在线观看游戏| 国产精品久久激情| 青草青草久热精品视频在线观看| 91在线免费视频| 亚洲美腿欧美激情另类| 欧美视频免费在线观看| 欧美色图在线视频| 国产精品2018| 国产精品美女无圣光视频| 亚洲精品成人久久久| 国产视频福利一区| 97在线看免费观看视频在线观看| 成人有码视频在线播放| 欧美激情一区二区三级高清视频| 久久久久久久色| 九九热r在线视频精品| 在线看国产精品| 国产va免费精品高清在线观看| 国产精品高清免费在线观看| 成人激情综合网| 亚洲aⅴ男人的天堂在线观看| 一区二区欧美日韩视频| 久久伊人91精品综合网站| 欧美色视频日本版| 欧美风情在线观看| y97精品国产97久久久久久| 全亚洲最色的网站在线观看| 日韩午夜在线视频| 国产一区二中文字幕在线看| 国产日产亚洲精品| 5252色成人免费视频| 亚洲人成网站色ww在线| 国内精久久久久久久久久人| 欧美黄色免费网站| 成人免费视频在线观看超级碰| 亚洲综合中文字幕在线| 26uuu久久噜噜噜噜| 8090成年在线看片午夜| 国产99久久精品一区二区| 日韩精品在线观看一区二区| 浅井舞香一区二区| 欧美日韩福利在线观看| 日本三级韩国三级久久| 国产成人精品午夜| 国产精品美女视频网站| 成人午夜高潮视频| 欧美国产精品人人做人人爱| 91精品成人久久| 91天堂在线观看| 日本高清视频一区| 日韩欧美亚洲国产一区| 欧美老少配视频| 欧美精品一区二区免费| 国产不卡视频在线| 高清一区二区三区四区五区| 久久久中文字幕| 国产亚洲日本欧美韩国| 97色在线观看| 亚洲影视九九影院在线观看| 一本久久综合亚洲鲁鲁| 国产视频久久久久| 日韩在线免费av| 日韩精品极品视频|