<%call SiteInfo%> <%= Languagech229 %> - <% =SiteTitleCh %>
 
<%=WebLocation()%>
 
<%=WebContent()%>
<% function WebMenu() If session("MemName")="" Or session("GroupID")="" Or session("MemLogin")<>"Succeed" Then response.write ""&Languagech80&"" Else response.write ""&Languagech81&"" response.write ""&Languagech82&"" response.write ""&Languagech83&"" response.write ""&Languagech84&"" response.write ""&Languagech85&"" End If end function function WebLocation() WebLocation=" "&Languagech19&""&Languagech20&" - "&Languagech22&" - "&Languagech229&""&VbCrLf end Function function MemGroup(GroupID) dim rs,sql set rs = server.createobject("adodb.recordset") sql="select * from Qianbo_MemGroup where GroupID='"&GroupID&"'" rs.open sql,conn,1,1 MemGroup=rs("GroupNameCh") rs.close set rs=nothing end function function WebContent() dim rs,sql,NewPassword if request.QueryString("Step")="" then %>
<%= Languagech230 %>
<%= Languagech101 %>
 
<% elseif request.QueryString("Step")="EnterNameMail" then set rs = server.createobject("adodb.recordset") sql="select * from Qianbo_Members where MemName='"&request.form("MemName")&"' and Email='"&request.form("Email")&"'" rs.open sql,conn,1,1 if rs.eof then WriteMsg(""&Languagech232&"") exit function end if %> " method="post" name="form" id="form">
<%= Languagech230 %> <%=rs("MemName")%>
<%= Languagech101 %> <%=rs("Email")%>
<%= Languagech96 %> <%=rs("Question")%>
<%= Languagech97 %>
 
<% elseif request.QueryString("Step")="EnterAnswer" Then If trim(request("Answer"))="" Then WriteMsg(""&Languagech233&"") exit function End If set rs = server.createobject("adodb.recordset") sql="select * from Qianbo_Members where ID="&request.QueryString("ID") rs.open sql,conn,1,3 if rs.eof then WriteMsg(""&Languagech16&"") exit function end if if rs("Answer")<>MD5(trim(request("Answer"))) then WriteMsg(""&Languagech234&"") exit function end if randomize timer NewPassword=Int(899999*Rnd() +100000) rs("Password")=MD5(NewPassword) rs.update rs.close set rs=nothing Response.Write "" exit function end if end function %>