List alle emails udfra SQL

session("pid") = DeMessSQL(request.querystring("PID"))
strSQL = "UPDATE annoncer SET Godkendt= true WHERE pid = '"& session("pid") &"'"
conn.execute(strSQL)

findAnnonceSQL = "SELECT annoncetype, amt, areal, rum, indskud, boligtype, husleje FROM annoncer WHERE pid = '" & session("pid") & "'"
set rs = conn.execute(findAnnonceSQL)
'response.write "findAnnonceSQL: "&findAnnonceSQL&"<br><br>"
'session("annoncetype") = rs("annoncetype")

if rs("annoncetype") = "Udbyder" then
    ' Emailservice
    strSQLtmp = "SELECT emailservice FROM annoncer WHERE emailservice <> 'frameldt' AND amt = '" & rs("amt") & "'"
    set rsTmp = conn.execute(strSQLtmp)
    'response.write "strSQLtmp: "&strSQLtmp&"<br><br>"   
        if rsTmp("emailservice") = "specifikt" then
            strSQLEmailService = "SELECT email FROM annoncer WHERE annoncetype = 'Søger'"
            strSQLEmailService = strSQLEmailService & " AND areal <= " & rs("areal") & "" 'boligsøgendes areal er >= den netop indryk.
            strSQLEmailService = strSQLEmailService & " AND rum <= " & rs("rum") & ""            'boligsøgendes rum er >= den netop indryk.
            strSQLEmailService = strSQLEmailService & " AND indskud >= " & rs("indskud") & ""    'boligsøgendes indskud er <= den netop indryk.
            strSQLEmailService = strSQLEmailService & " AND husleje >= " & rs("husleje") & " AND boligtype = '" & rs("boligtype") & "'"
            set rsMail = conn.execute(strSQLEmailService)
        elseif rsTmp("emailservice") = "amt" then
            strSQLEmailService = "SELECT email FROM annoncer WHERE annoncetype = 'Søger'"
            strSQLEmailService = strSQLEmailService & " AND amt '" & rs("amt") & "'"
            set rsMail = conn.execute(strSQLEmailService)
        end if
        'response.write "strSQLEmailService: "&strSQLEmailService&"<br><br>"
end if

den returnerer kun den første post, men jeg ved at der er 4 poster der opfylder kriterierne...

Hvad er der galt?