Questo sarebbe il codice con l'oggetto Dundas.Mailer

codice:
<%
Set objEmail = Server.CreateObject("Dundas.Mailer") 'Mailer object

allegatoPath = Server.MapPath(".") & "\readme.txt"

'add an Address object to the TOs collection (this specifies the destination address)
objEmail.TOs.Add "m.rossi@libero.it"

'specify the message subject
objEmail.Subject = "Some Subject"

'specify an SMTP server. Doing this increases the speed and reliability of the mail operation
objEMail.SMTPRelayServers.Add "smtp.provider.it"

'set the message body
objEmail.Body = "This is the message body"

objEmail.Attachments.Add allegatoPath

'now send the email
objEmail.SendMail

'test for success/failure of the SendMail operation using VBScript's Err object
If Err.Number <> 0 Then 
'an error occurred so output the relevant error string
Response.Write "The following error occurred: " & Err.Description
Else
'successful, so output a success message to user
Response.Write "The email was successfully forwarded to the specified SMTP server."
End If

Set objEmail = Nothing 'release resources
Set objUpload = Nothing
%>