Salve sapreste dirmi come posso inviare un email cn un allegato.. lo script per inviare email ke uso è il seguente:

-----------------------------------------------------
Dim sMsg
Dim sTo
Dim sFrom
Dim sSubject
Dim sTextBody

sTo = "destinatario"
sFrom = request.form("mittente")
sSubject = request.form("oggetto")
sTextBody = request.form("testo")

Dim objMail
'Create the mail object
Set objMail = Server.CreateObject("CDO.Message")

'Set key properties
objMail.From = sFrom
objMail.To = sTo
objMail.Subject= sSubject
objMail.TextBody = sTextBody

'Send the email
objMail.Send

'Clean-up mail object
Set objMail = Nothing
response.redirect("ok.asp")
-----------------------------------------------------
Grazie!!!