If sætning

Jeg har brug for eksperthjælp!
Hvad er der i vejen med følgende script? Når databasens felter er tomme, så er det meningen at der skal skrives i browseren, at "Desværre er der ikke sendt yderligere oplysninger." Men der skrives ingenting. Hvad er der i vejen?


--
Dim navn, adresse, postnr, by, email, url, fasttlf, mobiltlf, info, opdateret, mand
navn = rs("Navn")
adresse = rs("Adresse")
postnr = rs("Postnr")
by = rs("By")
email = rs("Email")
url = rs("Url")
fasttlf = rs("Fasttlf")
mobiltlf = rs("Mobiltlf")
info = rs("Info")
opdateret = rs("Opdateret")
mand = rs("mand")
do until rs.EOF
%>
<% If adresse = "" AND by = "" AND url = "" AND email = "" AND mobiltlf = "" AND fasttlf = "" AND info = "" Then Response.Write "Desværre er der ikke sendt yderligere oplysninger." End If %>

--- så kommer movenext og alt det der...