Salve a tutti !!!! mi server un piccolo aiutino

Ho un form con dei controlli e un funzione in VBScript che mi controlla che tutti i campi nn siano vuoti.....
La funzione la chiamo sull'evento onclick del button....per sotto la status bar mi da un errore di visualizzazione di pagina e nn mi esegue la funzione.

QUESTA è LA FUNZIONE
<%
Sub ControllaCampi()
if Request.QueryString("nome")="" or vbCrLf _
& Request.QueryString("cognome")="" or vbCrLf _
& Request.QueryString("data_nascita")="" or Request.QueryString("indirizzo")="" or vbCrLf _
& Request.QueryString("citta")="" or Request.QueryString("cap")="" or vbCrLf _
& Request.QueryString("provincia")="" or vbCrLf _
& Request.QueryString("mailbox")="" or Request.QueryString("telefono_cell")="" or vbCrLf _
& Request.QueryString("titolo_studio")="" or vbCrLf _
& Request.QueryString("lingua_straniera")="" or vbCrLf _
& Request.QueryString("disponibile_trasferte")="" then

Response.Write "Attenzione i campi contrassegnati dagli asterischi sono obbligatori"
else
if CheckMail(Request.QueryString("mailbox"))=false then
Response.Write "Attenzione campo E-mail non corretto"

else
document.form1.submit()
end if
end if
end Sub
%>

QUESTO è IL PULSANTE.....
<P align=center><input type="Button" value ="Invia" name="B1" onclick=ControllaCampi()> <input type="reset" value ="Cancella" id=submit2 name=B2>



Datemi un aiutino.....grazie a tutti!!!!!