<% 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 = "you@yourdomain.com" 'pmail.To = "info@yourdomain.com" '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 = "you@yourdomain.com" objMessage.To = "info@yourdomain.com" objMessage.TextBody = mbody objMessage.Send set objMessage=Nothing response.write("response=ok") %>