account=ReplaceBadChar(Trim(request.form("ac")))
password=ReplaceBadChar(Trim(request.form("pw")))
if strLength(password) Response.redirect "error.asp?err=1907"
Else
sqlStr="select * from WP_admin where admin_account='"&account&"'"
set rs = server.createobject("ADODB.RecordSet")
rs.open sqlStr,conn,1,1
If Not rs.eof Then
Response.redirect "error.asp?err=1908"
Else
sqlStr="insert into WP_admin(admin_account,admin_password) values('"&account&"','"&md5(password)&"')"
conn.execute(sqlStr)
Response.redirect "info.asp?info=2902"
End If
rs.close
Set rs=Nothing
End if
Set conn=nothing
%>