<%
Response.Buffer = True
Response.Expires = 0

' pagina su cui reindirizzare
p = "http://tuosito/errore.htm"

' per evitare che la pagina sia richiamata direttamente
If Request.Form("email") = "" Then Response.Redirect(p)

For Each Campo in Request.Form
If Request.Form(campo) = "" Then
Response.Redirect(p)
End If
Next

Testo = "Contenuto del messaggio...

"
Testo = Testo & "Cognome e Nome: " & Request.Form("realname") & "

"
Testo = Testo & "Via: " & Request.Form("via") & "

"
Testo = Testo & "Città: " & Request.Form("citta") & "

"
Testo = Testo & "Prov.: " & Request.Form("prov") & "

"
Testo = Testo & "Sesso: " & Request.Form("sesso") & "

"
Testo = Testo & "Età: " & Request.Form("eta") & "

"
Testo = Testo & "Telefono: " & Request.Form("telefono") & "

"
Testo = Testo & "Messaggio:" & Request.Form("messaggio") & "

"

Set eMail = Server.CreateObject("CDO.Message")
With eMail
.From = Request.Form("email")
.To = "tua@email.it"
.Subject = Request.Form("oggetto")
.TextBody = testo
.Send()
End With
Set eMail = Nothing
Nome = Request.Form("realname")%>

dove vedi Request.Form("via") & "

" vai a sostituire i nomi con quelli che tu hai nel form in htm e con lo stesso sistema:
Testo = Testo & "Età: " & Request.Form("eta") & "

"
inserisci tutti i campi che vuoi purchè abbiano lo stesso nome che hai sul form htm
qui è inserita anche una pagina che se trova campi vuoti rimanda ad una pagina di errore

spero di esserti stato d'aiuto
ciao