inserendo questo modulo ..mi dice: e-mail inviata con successo ma non arriva ...dove sbaglio
Grazie per l'aiuto


contactfield1=Request("field1")
contactfield2=Request("field2")
contactfield3=Request("field3")
contactfield4=Request("field4")


mbody = "field1 : "&contactfield1&" | field2 : "&contactfield2&" | field3 : "&contactfield3&" | field4 : "&contactfield4

email object for cdonts


Set pmail = Server.CreateObject("CDONTS.Newmail")

'change the email to your email address
pmail.From = "midilandia@virgilio.it"
pmail.To = "midilandia@virgilio.it"

'pmail.Subject = " Website Contact enquiry "

pmail.Body = mbody
pmail.MailFormat = 0 'mime type
pmail.BodyFormat = 0 'default value 1 for plain text type

pmail.Send
Set pmail=Nothing

new mail
DIM Mailer


email object for CDO Windows 2003
'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''
Set objMessage = CreateObject("CDO.Message")
objMessage.Subject = "Website Contact Enquiry"
'change the email to your email address
objMessage.Sender = "in.virgilio.it"
objMessage.To = "in.virgilio.it"
objMessage.TextBody = mbody
objMessage.Send
set objMessage=Nothing

response.write("response=ok")