user_rememberpost.asp

本源代码为终点小说连载系统 v1.15 Build 0430 SQL清风修改版,欢迎大家下载,学习与交流

<!--#include file="../inc/md5.asp"-->
<%
UserID=session("UserID")
UserName=session("UserName")
If UserName="" or UserID="" or IsNull(WordID) Then
	Response.Write ("<script>alert(' 操作错误 \n\n 可能您还没有登陆或者登陆超时 \n\n 如果您没有成为会员请先进行会员注册 \n\n 如果您已经是注册会员请重新登陆 ');location.href='userlog_login.asp';</script>")
	Response.End
End If
%><%
dim oldpassword,newpassword11,newpassword2
oldpassword=trim(request("oldpassword"))
newpassword1=trim(request("newpassword1"))
newpassword2=trim(request("newpassword2"))

if oldpassword="" or strLength(oldpassword)>18 or strLength(oldpassword)<6 then
	founderr=1
	errmsg=errmsg & "<br><li>请输入旧的登陆密码！(不能大于18小于6)</li>"
end if
if newpassword1="" or strLength(newpassword1)>18 or strLength(newpassword1)<6 then
	founderr=1
	errmsg=errmsg & "<br><li>请输入新的登陆密码！(不能大于18小于6)</li>"
else
	if Instr(newpassword1,"=")>0 or Instr(newpassword1,"%")>0 or Instr(newpassword1,chr(32))>0 or Instr(newpassword1,"?")>0 or Instr(newpassword1,"&")>0 or Instr(newpassword1,";")>0 or Instr(newpassword1,",")>0 or Instr(newpassword1,"'")>0 or Instr(newpassword1,",")>0 or Instr(newpassword1,chr(34))>0 or Instr(newpassword1,chr(9))>0 or Instr(newpassword1,"