<%'Send an email if user forgot his user name and password if request.form("email") <> "" then send=0 email = Dlookup("members","member_email","member_email = '"& request.form("email") &"' ") 'If email exist in the database then we send an email if email <> "" then login = Dlookup("members","member_login","member_email = '"& request.form("email") &"' ") password = Dlookup("members","member_password","member_email = '"& request.form("email") &"' ") body = replace(iemail_body_login,"{login}",login) body = replace(body,"{password}",password) sendemail request.form("email"),iemail_sender,"Forgot Password",body,ismtp_host send=1 end if end if%> <%=iheader%>

<%if request("email") <> "" then%> <%if send = 1 then%> <%=lang59%> <%else%> <%=lang60%> <%end if%> <%end if%> <%if request("error") = 1 then%> <%=lang61%> <%if iuser_admin = 1 then%> <%=lang62%> <%end if%> <%end if%> <%if iuser_admin = "1" then%> <%if (iuser_see = 0 or iuser_login = 0) and request("error") <> 1 then%> <%end if%> <%end if%>