opsamling af information til mailform

Jeg skal opsamle et brugernavn og spørge databasen efter password. Det hele virke på nær en lille dum ting. Den sender altid password på record 1.

Hvordan kan jeg spørge efter password på det username som bliver postet fra noaccess.asp
      <form name=\"form1\" method=\"post\" action=\"glemtpassword.asp\">
        <span class=\"overskrifter_sort\">Brugernavn</span>:<br>
        <input type=\"text\" name=\"Username\" class=\"formfelter\">
        <input type=\"submit\" value=\"send\" class=\"formknap\" name=\"s\">
      </form>

glemtpassword.asp ser sådan ud:

<%@LANGUAGE=\"VBSCRIPT\"%>
<!--#include file=\"Connections/connection.asp\" -->
<%
set Recordset1 = Server.CreateObject(\"ADODB.Recordset\")
Recordset1.ActiveConnection = MM_connection_STRING
Recordset1.Source = \"SELECT * FROM users\"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 3
Recordset1.Open()
Recordset1_numRows = 0
%>

<%
Set Mailer = Server.CreateObject(\"SMTPsvg.Mailer\")
Mailer.ContentType = \"text/html\"
Mailer.FromName  = \"Mail fra systemet\"
Mailer.FromAddress= \"kontakt@yada.dk\"
Mailer.RemoteHost = \"mail.yada.dk\"
Mailer.AddRecipient (Recordset1.Fields.Item(\"navn\").Value), (Recordset1.Fields.Item(\"email\").Value)
Mailer.Subject    = \"Glemt password\"

tekst = \"\"
linie = vbCrLf
\'linie = \"<br>\"
udfyldt = false

for each e in Request.Form
    if e <> \"Type\" and e <> \"Submit\" then
        if Request.Form(e) <> \"\" then
            udfyldt = true
            tekst = tekst & e & linie & Request.Form(e) & linie & linie
        end if
    end if
next

\'Response.Write tekst

Mailer.BodyText  = \"Dit password til systemet er: \" & (Recordset1.Fields.Item(\"password\").Value)

if udfyldt then
    if Mailer.SendMail then
      Response.Write \"<p>Dit password er send til dig. Check din mail!</p>\"
    else
      Response.Write \"<p>Dit password blev<b>ikke</b> send</p>\"
      Response.Write \"<p>Mail-fejl. Fejlen var: <b>\" & Mailer.Response & \"</b></p>\"
    end if
else
      Response.Write \"<p>Dit password var <b>IKKE</b> Send</p>\"
      Response.Write \"<p>Felterne var ikke udfyldt!</p>\"
end if
%>


<%
If (Recordset1.EOF) Then
Response.Redirect(\"noaccess.asp\")
End If
%>

<%
Recordset1.Close()
%>