Girando in rete ho trovato una guida sulla creazione di un form per inviare mail dal sito.

il codice è il seguente:
codice:
<%
mail = Request.form("mail")
richiesta = Request.form("richiesta")

'--- Controllo che il campo E_MAIL sia Pieno ---
If IsNull(mail) Or mail = "" Then 
Response.Write ("ERRORE !!
Controlla il campo
E-MAIL
Indietro.")
Response.End
End if
'--- Fine Controllo Campo E-MAIL ---

' ----------------- CDOSYS -------------------------------------
Dim MiaMail
Set MiaMail = Server.CreateObject("CDO.Message")
MiaMail.From = Request.Form("mail")
MiaMail.To = "info@miosito.it"
MiaMail.Subject = "Richiesta informazioni sito"
MiaMail.HTMLBody = "E-Mail dal sito

INDIRIZZO E-MAIL :  " & Request.Form("mail") & "
RICHIESTA :  " & Request.Form("richiesta")
MiaMail.Send()
Set MiaMail = Nothing
' ----------------- CDOSYS -------------------------------------

' ----------------- CDOSYS - Email di conferma per l'utente ----
Dim MiaMail2
Set MiaMail2 = Server.CreateObject("CDO.Message")
MiaMail2.From = "email@miosito.it"
MiaMail2.To = Request.Form("mail")
MiaMail2.Subject = "Conferma di ricezione Dati"
MiaMail2.HTMLBody = Richiesta ricevuta! Sarai contattato prima possibile."
MiaMail2.Send()
Set MiaMail2 = Nothing
' ----------------- CDOSYS - Email di conferma per l'utente ----

' --- Risposta stampata a video ---
Response.Write ("La tua richiesta è stata correttamente inviata, sarai contattato al più prestoTorna al Form")
%>
mi da questo errore:
codice:
Microsoft VBScript compilation error '800a0401' 

Expected end of statement 

/pcont/inviodati.asp, line 29 

MiaMail2.HTMLBody = Richiesta ricevuta! Sarai contattato prima possibile."
------------------------------^
non so come correggere....