📄 reg.asp
字号:
<option value=1995>1995</option>
<option value=1996>1996</option>
<option value=1997>1997</option>
<option value=1998>1998</option>
<option value=1999>1999</option>
<option value=2000>2000</option>
<option value=2001>2001</option>
<option value=2002>2002</option>
<option value=2003>2003</option>
<option value=2004>2004</option>
<option value=2005>2005</option>
</select>
年
<select name=month size=1 class="border">
<option value=1 selected>1</option>
<option value=2>2</option>
<option value=3>3</option>
<option value=4>4</option>
<option value=5>5</option>
<option value=6>6</option>
<option value=7>7</option>
<option value=8>8</option>
<option value=9>9</option>
<option value=10>10</option>
<option value=11>11</option>
<option value=12>12</option>
</select>
月
<select name=day size=1 class="border">
<option value=1 selected>1</option>
<option value=2>2</option>
<option value=3>3</option>
<option value=4>4</option>
<option value=5>5</option>
<option value=6>6</option>
<option value=7>7</option>
<option value=8>8</option>
<option value=9>9</option>
<option value=10>10</option>
<option value=11>11</option>
<option value=12>12</option>
<option value=13>13</option>
<option value=14>14</option>
<option value=15>15</option>
<option value=16>16</option>
<option value=17>17</option>
<option value=18>18</option>
<option value=19>19</option>
<option value=20>20</option>
<option value=21>21</option>
<option value=22>22</option>
<option value=23>23</option>
<option value=24>24</option>
<option value=25>25</option>
<option value=26>26</option>
<option value=27>27</option>
<option value=28>28</option>
<option value=29>29</option>
<option value=30>30</option>
<option value=31>31</option>
</select>
日(填写阳历)</td>
</tr>
<tr>
<td><div align="right">个人照片：</div></td>
<td height="20" colspan="2"><div align="left">
<input name="grphoto" type="text" class="formtext3" id="grphoto" value="http://" maxlength="200">
</div></td>
</tr>
<tr>
<td><div align="right">人生格言：</div></td>
<td height="20" colspan="2"><div align="left">
<input name="usersign" type="text" class="formtext3" id="usersign" maxlength="100">
</div></td>
</tr>
<tr>
<td><div align="right">血 型：</div></td>
<td height="20" colspan="2"><div align="left">
<select size=1 name=blood>
<option value=A selected>A</option>
<option value=B>B</option>
<option value=AB>AB</option>
<option value=O>O</option>
<option value=其他>其他</option>
</select>
</div></td>
</tr>
<tr>
<td><div align="right">目前工作：</div></td>
<td height="20" colspan="2"><div align="left">
<select name="job" size="1" id="job">
<option value="财会/金融" selected>财会/金融</option>
<option value=工程师>工程师</option>
<option value=顾问>顾问</option>
<option value=计算机相关行业>计算机相关行业</option>
<option value=家庭主妇>家庭主妇</option>
<option value="教育/培训">教育/培训</option>
<option value="客户服务/支持">客户服务/支持</option>
<option value="零售商/手工工人">零售商/手工工人</option>
<option value=退休>退休</option>
<option value=无职业>无职业</option>
<option value="销售/市场/广告">销售/市场/广告</option>
<option value=学生>学生</option>
<option value=研究和开发>研究和开发</option>
<option value="一般管理/监督">一般管理/监督</option>
<option value="政府/军队">政府/军队</option>
<option value="执行官/高级管理">执行官/高级管理</option>
<option value="制造/生产/操作">制造/生产/操作</option>
<option value=专业人员>专业人员</option>
<option value="自雇/业主">自雇/业主</option>
<option value=其他>其他</option>
</select>
</div></td>
</tr>
<tr>
<td><div align="right">个人主页：</div></td>
<td height="20" colspan="2"><div align="left">
<input name="homepage" type="text" class="formtext3" id="homepage" value="http://" maxlength="150">
</div></td>
</tr>
<tr>
<td><div align="right">自我介绍：</div></td>
<td height="20" colspan="2"><div align="left">
<textarea name="zwzs" cols="50" rows="5" class="border" id="zwzs">其实我是头猪</textarea>
</div></td>
</tr>
<tr>
<td><div align="right">站内签名：</div></td>
<td height="20" colspan="2"><div align="left">
<textarea name="sitecm" cols="50" rows="5" class="border" id="sitecm">一对一网络
[url]http://yvsy.com/[/url]</textarea>
150字符内</div></td>
</tr>
<tr>
<td><div align="right">公开资料范围：</div></td>
<td height="20" colspan="2"><div align="left">
<select name="zlopen" size="1" id="zlopen">
<option value="0">全部公开</option>
<option value="1">班级同学</option>
<option value="2" selected>学校校友</option>
<option value="3">完全禁止</option>
</select>
</div></td>
</tr> <tr>
<td height="30"> </td>
<td colspan="2"><div align="left">
<input name="Submit" type="submit" class="bottom" value="提交注册资料">
</div></td>
</tr>
</form>
</table>
<br>
<%else
call adduser
end if
Function adduser
username=obj.HtmlEncode(request.form("username"))
password=obj.HtmlEncode(request.form("password"))
password2=obj.HtmlEncode(request.form("password2"))
if password<>password2 then ShowError("两次密码不一致!")
question=obj.HtmlEncode(request.form("question"))
answer=obj.HtmlEncode(request.form("answer"))
if question=answer then ShowError("密码问题与答案不可以相同!")
realname=obj.HtmlEncode(request.form("realname"))
email=obj.HtmlEncode(request.form("email"))
zwzs=obj.HtmlEncode(request.form("zwzs"))
sitecm=request.form("sitecm")
if username="" or password="" or question="" or answer="" or realname="" or email="" then ShowError("资料填写不全，提交前请确保必填项填写完整")
if obj.IsValidEmail(email)=false then ShowError("邮箱地址不正确")
set AdPD = new AdPaDetect
call AdPD.DetectPaChr(username,2,15,0,"用户名")
if realname<>"" then call AdPD.DetectPaChr(realname,2,4,0,"真实姓名")
call AdPD.DetectPaChr(password,4,20,1,"用户密码")
call AdPD.DetectPaChr(question,2,20,0,"密码问题")
call AdPD.DetectPaChr(answer,2,20,0,"问题答案")
if request.form("newzip")<>"" then call AdPD.DetectPaChr(request.form("newzip"),6,6,1,"邮政编码")
if zwzs<>"" then call AdPD.DetectPaChr(zwzs,0,250,0,"自我介绍")
if sitecm<>"" then call AdPD.DetectPaChr(sitecm,0,150,0,"站内签名")
rs.open "select * from user where username='"&username&"'",conn,1,3
if not rs.eof then ShowError("你的用户名已经被注册，请尝试其它帐号")
rs.addnew()
rs("username")=username
rs("password")=md5(password)
rs("question")=question
rs("answer")=md5(answer)
rs("realname")=realname
rs("face")=obj.HtmlEncode(request.form("Form_FaceUrl"))
rs("homephone")=obj.HtmlEncode(request.form("homephone"))
rs("homeaddr")=obj.HtmlEncode(request.form("homeaddr"))
rs("homezip")=obj.HtmlEncode(request.form("homezip"))
rs("newphone")=obj.HtmlEncode(request.form("newphone"))
rs("newaddr")=obj.HtmlEncode(request.form("newaddr"))
rs("newzip")=obj.HtmlEncode(request.form("newzip"))
rs("msn")=obj.HtmlEncode(request.form("msn"))
rs("qq")=obj.HtmlEncode(request.form("qq"))
rs("shengxiao")=obj.HtmlEncode(request.form("shengxiao"))
rs("userphoto")=obj.HtmlEncode(request.form("grphoto"))
rs("sign")=obj.HtmlEncode(request.form("usersign"))
rs("sex")=obj.HtmlEncode(request.form("sex"))
rs("blood")=obj.HtmlEncode(request.form("blood"))
rs("job")=obj.HtmlEncode(request.form("job"))
rs("homepage")=obj.HtmlEncode(request.form("homepage"))
rs("email")=email
rs("birthday")=request.form("year")&"-"&request.form("month")&"-"&request.form("day")
rs("zwzs")=zwzs
rs("sitecm")=sitecm
rs("printcm")=UBB_Code_UnderWrite(sitecm)
rs("joindate")=now()
rs("lastdate")=now()
rs("bbsjob")="普通会员"
Rs("zlopen")=request.form("zlopen")
rs("height")=obj.HtmlEncode(request.form("Form_Faceheight"))
rs("width")=obj.HtmlEncode(request.form("Form_FaceWidth"))
rs("lastip")=Request.ServerVariables("REMOTE_ADDR")
rs.update
session("sitejob")=0
session("xyluser")=username
session("xyluserid")=rs("id")
rs.Close:Set rs = Nothing
call CloseConn
a=obj.gourl("页面三秒后将自动转向首页，谢谢您支持本站，让我们共建美好的网上校园。<br><br>用户名："&username&"<br>密码："&password&"","index.asp")
end Function%></td></tr>
</table>
<%sitebottom%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -