devi fare così:

codice:
str = "select * from utentiAgenzie where username ='"&trim(Request.Form("username"))"' and password = '"&trim(Request.form("password"))"'"

rs.open str,tuaconn 

if rs.eof then
'l'utente non c'è
else
'fai quello che devi
end if