codice:
'*rilevo i campi del form
 
FOR numeroCampi = 1 TO (Request.Form.Count() - 1)
IF(Request.Form.Key(numeroCampi)<>"nomeCampoHidden")THEN 
 IF NOT Request.Form(numeroCampi) = "" THEN
 corpoMessaggio = corpoMessaggio & vbCrLf & Request.Form.Key(numeroCampi) & " = " & Trim(Request.Form(numeroCampi))
ELSE
nomeCampo=Request.Form.Key(numeroCampi)
IF(nomeCampo="Nome" or nomeCampo="Cognome" or nomeCampo="Email")THEN'ecc.
   corpoMessaggio = corpoMessaggio & vbCrLf & Request.Form.Key(numeroCampi) & " = Non compilato"
END IF  
 END IF
END IF 
 NEXT
Puoi escludere altri campi usando "or" come per i campi "Non compilato".

Ciao