Spedire mail

[rcar]

salve raga io ho questo codice

<%
Scuola = request.form("Scuola") 
Set Mail = Server.CreateObject("CDO.Message")

Mail.HTMLBody = "Scuola:  " & Request.Form("Scuola")
Mail.To = "xxx@xxx.it"
Mail.Subject = "Iscrizione scuola"
Mail.BodyFormat = 0
Mail.MailFormat = 0
Mail.Body = HTML
Mail.Send()
Set Mail = nothing
%>

sapreste dirmi perche'?
grazie mille

[rcar]

ho riprovato a fare questo

 
<%

Scuola = request.form("Scuola") 

On Error Resume Next 

Dim objMail
Dim sTo 
Dim sFrom 
Dim sSubject 
Dim sTextMail 

Set objMail = Server.CreateObject("CDO.Message") 
objMail.From = "xxx@xxx.it" 
objMail.To = "xxx@xxx.it" 
objMail.Subject= "Prova" 
objMail.HTMLBody = " & Scuola & "

objMail.Send 


Set objMail = Nothing

%>

ma niente

[rcar]

mi da questo errore:
cos'e'..

CDO.Message.1 error '80040220'

The "SendUsing" configuration value is invalid.

/invio.asp, line 17

[rosbon]

In locale o su server??