di punto in bianco mi da questo errore cosa sarà

è un formmail

CDO.Message.1 error '80040220'

Il valore di configurazione "SendUsing" non è valido.

/Formmail/corso.asp, line 33

ecco il codice. potrebbe essere un problema del server?

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

' pagina su cui reindirizzare
p = "http://www.pubblicaassistenzapisa.it/Formmail/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...<br><br>"
Testo = Testo & "Cognome e Nome: " & Request.Form("realname") & "<br><br>"
Testo = Testo & "Via: " & Request.Form("via") & "<br><br>"
Testo = Testo & "Città: " & Request.Form("citta") & " <br><br>"
Testo = Testo & "Prov.: " & Request.Form("prov") & "<br><br>"
Testo = Testo & "Sesso: " & Request.Form("sesso") & "<br><br>"
Testo = Testo & "Età: " & Request.Form("eta") & "<br><br>"
Testo = Testo & "Telefono: " & Request.Form("telefono") & "<br><br>"
Testo = Testo & "Messaggio:" & Request.Form("messaggio") & "<br><br>"

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