rs("Kunde_Nr") i en frontpage formular lagt over i en strVariabel

I Frontpage har jeg en Formular hvor
jeg skal have Kunde_Nr fra et SQL kald lagt ind
i strKunde_Nr
A´la dette:  strKunde_Nr = rs("Kunde_Nr")
Men det virker ikke. Hvordan skal det se ud!!!

-----------Scriptet----------------
    ' Gemmer formfelterne i Variabler
        strBrugernavn = unQuote(request("Brugernavn"))
        strAdgangskode = unQuote(request("Adgangskode"))
        strKunde_Nr = unQuote(request("Kunde_Nr"))

  Sql = "Select Count(*) as Found from Adgangskoder where (Brugernavn = '" & strBrugernavn  & "') and (Adgangskode ='" & strAdgangskode  & "')"
  Set LO = RS.Execute(Sql)
  if LO("Found") = 0 then
    Session("login") = ""
    error = "Du blev ikke godkendt af systemet"
  else
  strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("fpdb/Komponentbors.mdb")
  Set myConn = Server.CreateObject("ADODB.Connection")
  myConn.Open strDSN
  strSQL = "SELECT Kunde_Nr FROM Adgangskoder where (Brugernavn = '" & Request("Brugernavn") & "') and (Adgangskode ='" & Request("Adgangskode") & "')"
  Set ez = myConn.Execute(strSQL)
    Session("login") = "yes mate"
         
    strKunde_Nr = rs("Kunde_Nr")

 
    Response.Redirect "Komponentbors_Opret.asp?Kunde_Nr="& strKunde_Nr &""

 
    EZ.Close
    RS.Close
    Conn.Close
  end if
end if