We get several enquiries a week from members who've forgotten both their username and password - is there a mod available that allows a member to look up their username based on an email address query and then to be able to reset their password from the results page in the same way that it is done at the moment?
Unless you've modified password.asp, the username is included in the e-mail that gets sent to the member containing the link to reset their password so all you'd have to do is edit the text of the link to password.asp to indicate they can retrieve their username from that page and the code of password.asp itself so that you only require them to provide their e-mail address.
Search is your friend “I was having a mildly paranoid day, mostly due to the fact that the mad priest lady from over the river had taken to nailing weasels to my front door again.”
<% '################################################################################# '## Snitz Forums 2000 v3.4.07 '################################################################################# '## Copyright (C) 2000-09 Michael Anderson, Pierre Gorissen, '## Huw Reddick and Richard Kinser '## '## This program is free software; you can redistribute it and/or '## modify it under the terms of the GNU General Public License '## as published by the Free Software Foundation; either version 2 '## of the License, or (at your option) any later version. '## '## All copyright notices regarding Snitz Forums 2000 '## must remain intact in the scripts and in the outputted HTML '## The "powered by" text/logo with a link back to '## http://forum.snitz.com in the footer of the pages MUST '## remain visible when the pages are viewed on the internet or intranet. '## '## This program is distributed in the hope that it will be useful, '## but WITHOUT ANY WARRANTY; without even the implied warranty of '## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the '## GNU General Public License for more details. '## '## You should have received a copy of the GNU General Public License '## along with this program; If not, write to the Free Software '## Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. '## '## Support can be obtained from our support forums at: '## http://forum.snitz.com '## '## Correspondence and Marketing Questions can be sent to: '## manderson@snitz.com '## '################################################################################# %> <!--#INCLUDE FILE="config.asp"--> <!--#INCLUDE FILE="inc_sha256.asp"--> <!--#INCLUDE FILE="inc_header.asp" --> <!--#INCLUDE FILE="inc_func_posting.asp"--> <% Response.Write " <table width=""100%"" border=""0"">" & vbNewLine & _ " <tr>" & vbNewLine & _ " <td><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """>" & getCurrentIcon(strIconFolderOpen,"","") & " <a href=""default.asp"">All Forums</a><br />" & vbNewLine & _ " " & getCurrentIcon(strIconBar,"","") & getCurrentIcon(strIconFolderOpenTopic,"","") & " Forgot your Username and/or Password?<br /></font></td>" & vbNewLine & _ " </tr>" & vbNewLine & _ " </table>" & vbNewLine If lCase(strEmail) <> "1" Then Response.Redirect("default.asp") End If If Request.Form("mode") <> "UpdateIt" and Trim(Request.QueryString("pwkey")) = "" and Request.Form("mode") <> "DoIt" Then Call ShowForm ElseIf Request.Form("mode") <> "UpdateIt" and Trim(Request.QueryString("pwkey")) <> "" Then key = chkString(Request.QueryString("pwkey"),"SQLString") strSql = "SELECT M_PWKEY, MEMBER_ID, M_NAME, M_EMAIL " strSql = strSql & " FROM " & strMemberTablePrefix & "MEMBERS " strSql = strSql & " WHERE M_PWKEY = '" & key & "'" Set rsKey = my_Conn.Execute(strSql) If rsKey.EOF or rsKey.BOF Then Response.Write " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strHeaderFontSize & """ color=""" & strHiLiteFontColor & """><b>Your password key did not match!</b></font></p>" & vbNewLine & _ " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strHiLiteFontColor & """>Your password key did not match the one that we have in our database.<br />Please try submitting your UserName and E-mail Address again by clicking the Forgot your Password? link from the Main page of this forum.<br />If this problem persists, please contact the <a href=""mailto:" & strSender & """>Administrator</a> of the forums.</font></p>" & vbNewLine & _ " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><a href=""default.asp"">Back To Forum</font></a></p>" & vbNewLine ElseIf strComp(key,rsKey("M_PWKEY")) <> 0 Then Response.Write " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strHeaderFontSize & """ color=""" & strHiLiteFontColor & """><b>Your password key did not match!</b></font></p>" & vbNewLine & _ " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strHiLiteFontColor & """>Your password key did not match the one that we have in our database.<br />Please try submitting your UserName and E-mail Address again by clicking the Forgot your Password? link from the Main page of this forum.<br />If this problem persists, please contact the <a href=""mailto:" & strSender & """>Administrator</a> of the forums.</font></p>" & vbNewLine & _ " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><a href=""default.asp"">Back To Forum</font></a></p>" & vbNewLine Else PWMember_ID = rsKey("MEMBER_ID") Call showForm2 rsKey.Close End If Set rsKey = Nothing ElseIf Trim(Request.Form("pwkey")) <> "" and Request.Form("mode") = "UpdateIt" Then key = chkString(Request.Form("pwkey"),"SQLString") strSql = "SELECT M_PWKEY, M_EMAIL " strSql = strSql & " FROM " & strMemberTablePrefix & "MEMBERS " strSql = strSql & " WHERE M_EMAIL = " & cLng(Request.Form("Email")) strSql = strSql & " AND M_PWKEY = '" & key & "'" Set rsKey = my_Conn.Execute(strSql) If rsKey.EOF or rsKey.BOF Then Response.Write " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strHeaderFontSize & """ color=""" & strHiLiteFontColor & """><b>Your password key did not match!</b></font></p>" & vbNewLine & _ " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """>Your password key did not match the one that we have in our database.<br />Please try submitting your UserName and E-mail Address again by clicking the Forgot your Password? link from the Main page of this forum.<br />If this problem persists, please contact the <a href=""mailto:" & strSender & """>Administrator</a> of the forums.</font></p>" & vbNewLine & _ " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><a href=""default.asp"">Back To Forum</font></a></p>" & vbNewLine ElseIf strComp(key,rsKey("M_PWKEY")) <> 0 Then Response.Write " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strHeaderFontSize & """ color=""" & strHiLiteFontColor & """><b>Your password key did not match!</b></font></p>" & vbNewLine & _ " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """>Your password key did not match the one that we have in our database.<br />Please try submitting your UserName and E-mail Address again by clicking the Forgot your Password? link from the Main page of this forum.<br />If this problem persists, please contact the <a href=""mailto:" & strSender & """>Administrator</a> of the forums.</font></p>" & vbNewLine & _ " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><a href=""default.asp"">Back To Forum</font></a></p>" & vbNewLine Else If Trim(Request.Form("Password")) = "" Then Err_Msg = Err_Msg & "<li>You must choose a Password</li>" End If If Len(Request.Form("Password")) > 25 Then Err_Msg = Err_Msg & "<li>Your Password can not be greater than 25 characters</li>" End If If Request.Form("Password") <> Request.Form("Password2") Then Err_Msg = Err_Msg & "<li>Your Passwords didn't match.</li>" End If If Err_Msg = "" Then strEncodedPassword = sha256("" & Request.Form("Password")) strSql = "UPDATE " & strMemberTablePrefix & "MEMBERS " strSql = strSql & " Set M_PASSWORD = '" & chkString(strEncodedPassword,"SQLString") & "'" strSql = strSql & ", M_PWKEY = ''" strSql = strSql & " WHERE MEMBER_ID = " & cLng(Request.Form("MEMBER_ID")) strSql = strSql & " AND M_PWKEY = '" & key & "'" my_Conn.Execute(strSql),,adCmdText + adExecuteNoRecords Else If Err_Msg <> "" Then Response.Write " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strHeaderFontSize & """ color=""" & strHiLiteFontColor & """>There Was A Problem With Your Details</font></p>" & vbNewLine & _ " <table align=""center"" border=""0"">" & vbNewLine & _ " <tr>" & vbNewLine & _ " <td><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strHiLiteFontColor & """><ul>" & Err_Msg & "</ul></font></td>" & vbNewLine & _ " </tr>" & vbNewLine & _ " </table>" & vbNewLine & _ " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><a href=""JavaScript:history.go(-1)"">Go Back To Enter Data</a></font></p>" & vbNewLine rsKey.Close Set rsKey = Nothing WriteFooter Response.End End If End If Response.Write " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strHeaderFontSize & """>Your Password has been updated!</font></p>" & vbNewLine & _ " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """>You may now login" If strAuthType = "db" Then Response.Write(" with your UserName and new Password") Response.Write ".</font></p>" & vbNewLine & _ " <meta http-equiv=""Refresh"" content=""2; URL=default.asp"">" & vbNewLine & _ " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><a href=""default.asp"">Back To Forum</font></a></p>" & vbNewLine End If rsKey.Close Set rsKey = Nothing Else Err_Msg = "" If Trim(Request.Form("Email")) = "" Then Err_Msg = Err_Msg & "<li>You must enter your E-mail Address</li>" End If strSql = "SELECT MEMBER_ID, M_NAME, M_EMAIL FROM " & strMemberTablePrefix & "MEMBERS " strSql = strSql & " WHERE M_EMAIL = '" & ChkString(Trim(Request.Form("Email")), "SQLString") &"'" Set rs = my_Conn.Execute(strSql) If rs.BOF and rs.EOF Then Err_Msg = Err_Msg & "<li>The E-mail Address you entered does not exist in the database.</li>" Else PWMember_ID = rs("MEMBER_ID") PWMember_Name = rs("M_NAME") PWMember_Email = rs("M_EMAIL") End If rs.Close Set rs = Nothing If Err_Msg = "" Then pwkey = GetKey("none") strSql = "UPDATE " & strMemberTablePrefix & "MEMBERS " strSql = strSql & " Set M_PWKEY = '" & chkString(pwkey,"SQLString") & "'" strSql = strSql & " WHERE MEMBER_ID = " & PWMember_ID my_Conn.Execute(strSql),,adCmdText + adExecuteNoRecords If lCase(strEmail) = "1" Then strRecipientsName = PWMember_Name strRecipients = PWMember_Email strFrom = strSender strFromName = strForumTitle strsubject = strForumTitle & " - Forgot Your Username and/or Password? " strMessage = "Hello, your Username is: " & PWMember_Name & vbNewline & vbNewline strMessage = strMessage & "You received this message from " & strForumTitle & " because you have completed the First Step on the ""Forgot Your Username and/or Password?"" page." & vbNewline & vbNewline strMessage = strMessage & "If you wish to reset your Password, please click on the link below to proceed to the next step." & vbNewline & vbNewLine strMessage = strMessage & strForumURL & "password.asp?pwkey=" & pwkey & vbNewline & vbNewline strMessage = strMessage & vbNewLine & "If you did not forget your username and/or password and received this e-mail in error, then you can just disregard/delete this e-mail, no further action is necessary." & vbNewLine & vbNewLine %> <!--#INCLUDE FILE="inc_mail.asp" --> <% End If Else If Err_Msg <> "" Then Response.Write " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strHeaderFontSize & """ color=""" & strHiLiteFontColor & """>There Was A Problem With Your Details</font></p>" & vbNewLine & _ " <table align=""center"" border=""0"">" & vbNewLine & _ " <tr>" & vbNewLine & _ " <td><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strHiLiteFontColor & """><ul>" & Err_Msg & "</ul></font></td>" & vbNewLine & _ " </tr>" & vbNewLine & _ " </table>" & vbNewLine & _ " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><a href=""JavaScript:history.go(-1)"">Go Back To Enter Data</a></font></p>" & vbNewLine WriteFooter Response.End End If End If Response.Write " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strHeaderFontSize & """>Step One is Complete!</font></p>" & vbNewLine & _ " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """>Please follow the instructions in the e-mail that has been sent to <b>" & ChkString(PWMember_Email,"email") & "</b> to complete the next step in this process.</font></p>" & vbNewLine & _ " <meta http-equiv=""Refresh"" content=""5; URL=default.asp"">" & vbNewLine & _ " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><a href=""default.asp"">Back To Forum</font></a></p>" & vbNewLine End If WriteFooter Response.End
Sub ShowForm() Response.Write " <form action=""password.asp"" method=""Post"" id=""Form1"" name=""Form1"">" & vbNewLine & _ " <input name=""mode"" type=""hidden"" value=""DoIt"">" & vbNewLine & _ " <table width=""100%"" border=""0"" align=""center"" cellspacing=""0"" cellpadding=""0"">" & vbNewLine & _ " <tr>" & vbNewLine & _ " <td bgcolor=""" & strTableBorderColor & """>" & vbNewline & _ " <table border=""0"" width=""100%"" cellspacing=""1"" cellpadding=""4"">" & vbNewline & _ " <tr>" & vbNewline & _ " <td colspan=""2"" align=""center"" bgcolor=""" & strHeadCellColor & """ valign=""top""><b><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strHeadFontColor & """>Forgot your Username and/or Password?</font></b></td>" & vbNewline & _ " </tr>" & vbNewLine & _ " <tr>" & vbNewline & _ " <td colspan=""2"" align=""left"" bgcolor=""" & strForumCellColor & """ valign=""top""><font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """ color=""" & strForumFontColor & """>This is a 3 step process:" & vbNewLine & _ " <ul>" & vbNewLine & _ " <font color=""" & strHiLiteFontColor & """><li><b>First Step:</b><br />Enter your forum e-mail address below to receive an e-mail containing a code to verify that you are who you say you are.</li></font>" & vbNewLine & _ " <li><b>Check your email:</b> Your Username will be at the top of the email you receive.</li><br />" & vbNewLine & _ " <br />" & vbNewLine & _ " <li><b>Second Step (To reset your Password):</b><br />Check your email and click on the link that is provided to return to this page.</li>" & vbNewLine & _ " <li><b>Third Step:</b><br />Choose your new password.</li>" & vbNewLine & _ " </ul></font></td>" & vbNewline & _ " </tr>" & vbNewLine & _ " <tr>" & vbNewLine & _ " <td width=""50%"" align=""right"" bgcolor=""" & strForumCellColor & """ nowrap><b><b><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """>E-mail Address: </font></b></td>" & vbNewLine & _ " <td width=""50%"" bgcolor=""" & strForumCellColor & """><input type=""text"" name=""Email"" size=""25"" maxLength=""50""></td>" & vbNewLine & _ " </tr>" & vbNewLine & _ " <tr>" & vbNewLine & _ " <td colspan=""2"" bgcolor=""" & strForumCellColor & """ align=""center""><input type=""submit"" value=""Submit"" id=""Submit1"" name=""Submit1""> <input type=""reset"" value=""Reset"" id=""Submit1"" name=""Submit1""></td>" & vbNewLine & _ " </tr>" & vbNewLine & _ " </table>" & vbNewLine & _ " </td>" & vbNewLine & _ " </tr>" & vbNewLine & _ " </table>" & vbNewLine & _ " </form><br />" & vbNewLine End Sub
<% '################################################################################# '## Copyright (C) 2000-02 Michael Anderson, Pierre Gorissen, '## Huw Reddick and Richard Kinser '## '## This program is free software; you can redistribute it and/or '## modify it under the terms of the GNU General Public License '## as published by the Free Software Foundation; either version 2 '## of the License, or any later version. '## '## All copyright notices regarding Snitz Forums 2000 '## must remain intact in the scripts and in the outputted HTML '## The "powered by" text/logo with a link back to '## http://forum.snitz.com in the footer of the pages MUST '## remain visible when the pages are viewed on the internet or intranet. '## '## This program is distributed in the hope that it will be useful, '## but WITHOUT ANY WARRANTY; without even the implied warranty of '## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the '## GNU General Public License for more details. '## '## You should have received a copy of the GNU General Public License '## along with this program; if not, write to the Free Software '## Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. '## '## Support can be obtained from support forums at: '## http://forum.snitz.com '## '## Correspondence and Marketing Questions can be sent to: '## reinhold@bigfoot.com '## '## or '## '## Snitz Communications '## C/O: Michael Anderson '## PO Box 200 '## Harpswell, ME 04079 '################################################################################# %> <!--#INCLUDE FILE="config.asp"--><!--#INCLUDE FILE="inc_sha256.asp"--><!--#INCLUDE FILE="inc_header.asp" --><% Response.Write " <table width=""100%"" border=""0"">" & vbNewLine & _ " <tr>" & vbNewLine & _ " <td><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """>" & vbNewLine & _ " " & getCurrentIcon(strIconFolderOpen,"","") & " <a href=""default.asp"">All Forums</a><br />" & vbNewLine & _ " " & getCurrentIcon(strIconBar,"","") & getCurrentIcon(strIconFolderOpenTopic,"","") & " Registration Rules and Policies Agreement</font></td>" & vbNewLine & _ " </tr>" & vbNewLine & _ " </table>" & vbNewLine
if strProhibitNewMembers <> "1" then Response.Write " <table border=""0"" width=""100%"" cellspacing=""0"" cellpadding=""0"" align=""center"">" & vbNewLine & _ " <tr>" & vbNewLine & _ " <td bgcolor=""" & strTableBorderColor & """>" & vbNewLine & _ " <table border=""0"" width=""100%"" cellspacing=""1"" cellpadding=""4"">" & vbNewLine & _ " <tr>" & vbNewLine & _ " <td bgcolor=""" & strCategoryCellColor & """><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strCategoryFontColor & """><b>Privacy Statement for " & strForumTitle & "</b></font></td>" & vbNewLine & _ " </tr>" & vbNewLine & _ " <tr>" & vbNewLine & _ " <td bgcolor=""" & strForumCellColor & """><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strForumFontColor & """>" & vbNewLine & _ " <p>If you agree to the terms and conditions stated below, " & _ "press the "Agree" button. Otherwise, press "Cancel".</p>" & vbNewLine & _ " <p>In order to use these Forums, users are required to " & _ "provide a username, password and <br>e-mail address. Neither the Administrators of " & _ "these forums, or the Moderators participating, are responsible for the privacy " & _ "practices of any user. Remember that all information that is disclosed in these " & _ "areas becomes public information and you should exercise caution when deciding " & _ "to share any of your personal information. Any user who finds material posted by " & _ "another user objectionable is encouraged to contact us via e-mail. We are " & _ "authorized by you to remove or modify any data submitted by you to these forums " & _ "for any reason we feel constitutes a violation of our policies, whether stated, " & _ "implied or not.</p>" & vbNewLine & _ " <p>This site may contain links to other web sites and " & _ "files. We have no control over the content and can not ensure it will not be offensive " & _ "or objectionable. We will, however, remove links to material that we feel is inappropriate as we become aware of them.</p>" & vbNewLine & _ " <p>These forums give users two options for changing and " & _ "modifying information that they provide in their profile: " & _ "<ol>" & _ " <li>Users can login with their username and password to " & _ " change any information in their profile." & _ " <br><br> " & _ " <li>In case of lost Username and/or Password, users can request a Username reminder and/or reset their password:<br/> " & _ " To request a Username reminder or reset your Password <a href=""password.asp"">Click Here</a>.</li>" & _ "</ol>" & _ "</p>" & vbNewLine & _ " <p>Cookies must be turned on in your browser to participate " & _ "as a user in these forums. Cookies are used here to hold your username and " & _ "password and viewing options, allowing you to login.</p>" & vbNewLine & _ " <p>By pressing the "Agree" button, you agree that you, the " & _ "user, are 13 years of age or over. You are fully responsible for any information " & _ "or file supplied by this user. You also agree that you will not post any " & _ "copyrighted material that is not owned by yourself or the owners of these " & _ "forums. In your use of these forums, you agree that you will not post any " & _ "information which is vulgar, harassing, hateful, threatening, invading of others " & _ "privacy, sexually oriented, or violates any laws.</p>" & vbNewLine & _ " <p>If you do agree with the rules and policies stated in " & _ "this agreement, and meet the criteria stated herein, proceed to press the " & _ ""Agree" button below, otherwise press "Cancel".</p>" & vbNewLine & _ " <hr size=""1"">" & vbNewLine & _ " <table align=""center"" border=""0"">" & vbNewLine & _ " <tbody>" & vbNewLine & _ " <tr>" & vbNewLine & _ " <td>" & vbNewLine & _ " <form action=""register.asp?mode=Register"" id=""form1"" method=""post"" name=""form1"">" & vbNewLine & _ " <input name=""Refer"" type=""hidden"" value=""" & Request.ServerVariables("HTTP_REFERER") & """>" & vbNewLine & _ " <input name=""Submit"" type=""Submit"" value=""Agree"">" & vbNewLine & _ " </form>" & vbNewLine & _ " </td>" & vbNewLine & _ " <td>" & vbNewLine & _ " <form action=""JavaScript:history.go(-1)"" id=""form2"" method=""post"" name=""form2"">" & vbNewLine & _ " <input name=""Submit"" type=""Submit"" value=""Cancel"">" & vbNewLine & _ " </form>" & vbNewLine & _ " </td>" & vbNewLine & _ " </tr>" & vbNewLine & _ " </tbody>" & vbNewLine & _ " </table>" & vbNewLine & _ " <hr size=""1"">" & vbNewLine & _ " <p>If you have any questions about this privacy statement " & _ "or the use of these forums, you may contact us: " & _ "<a href=""contact.asp"">Contact us</a></p>" & vbNewLine & _ " </font></td>" & vbNewLine & _ " </tr>" & vbNewLine & _ " </table>" & vbNewLine & _ " </td>" & vbNewLine & _ " </tr>" & vbNewLine & _ " </table>" & vbNewLine & _ " <br />" & vbNewLine else Response.Write " <br /><p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strHeaderFontSize & """ color=""" & strHiLiteFontColor & """>Sorry, we are not accepting any new Members at this time.</font></p>" & vbNewLine & _ " <meta http-equiv=""Refresh"" content=""5; URL=default.asp"">" & vbNewLine & _ " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><a href=""default.asp"">Back To Forum</font></a></p><br />" & vbNewLine end if WriteFooter Response.End %>
Response.Write " <li><span class=""spnMessageText""><a href=""#pw"">What do I do if I forget my Password?</a></span></li>" & vbNewLine & _
Replace with:
Response.Write " <li><span class=""spnMessageText""><a href=""#pw"">What do I do if I forget my Username and/or Password?</a></span></li>" & vbNewLine & _
" Changing a lost password is simple, assuming that e-mail features are turned on for this forum. All of the pages that require you to identify yourself with your Username and Password carry a "lost Password" link that you can use to have a code e-mailed instantly to your e-mail address of record that will allow you to create a new password. Because of the Encryption that we use for your password, we cannot tell you what your password is.</font></p></td>" & vbNewLine & _
Replace with:
" Recovering a Username or changing a lost password is simple, assuming that e-mail features are turned on for this forum. All of the pages that require you to identify yourself with your Username and Password carry a "forgotten Username and/or Password" link that you can use to have a code e-mailed instantly to your e-mail address of record that will remind you of your username and allow you to create a new password. Because of the Encryption that we use for your password, we cannot tell you what your password is.</font></p></td>" & vbNewLine & _
This makes it all grammatically correct and reads as it should
I don't know the differences between the 3.4.03 and later versions policy.asp files but if someone wants to write it into a MOD please feel free to do so. The password.asp works in 3.4.03 and 3.4.07 versions
Forgotten Username & Password ?
Posted - 04 September 2011 : 12:01:55
