<%@ Language=VBScript %>
<!--#include virtual="/inc/FreeHost-AG-Function.asp"-->
<%title="查找密码"%>
<%If Request.Form ("username")="" or RegExpTest("[^A-Za-z0-9]",Request.Form ("username")) Then
	ef=True
	ec="会员名没有写/或会员名中有非法字符！"
end If

If not ef then
APIret=POSTOP("/user/forget-sub.asp",Request.form)
If InStr(APIret,title) Then
APIret=mid(APIret,InStr(APIret,title)+Len(title))
End if
end If

if not ef then%>
<!--#include virtual="/user/user-moban.asp"-->
<%end if
if ef then
Response.Redirect "e.asp?e="&ec
end if%>