<% Dim bodystring bodystring = bodystring + " " + vbCrLf bodystring = bodystring + "Name: " + Request.Form ("name") + vbCrLf bodystring = bodystring + "Company: " + Request.Form ("company") + vbCrLf bodystring = bodystring + "Email: " + Request.Form ("email") + vbCrLf bodystring = bodystring + "Web Site: " + Request.Form ("website") + vbCrLf bodystring = bodystring + "Telephone: " + Request.Form ("phone") + vbCrLf bodystring = bodystring + "Address: " + Request.Form("address") + vbCrlf bodystring = bodystring + "City: " + Request.Form("city") + vbCrlf bodystring = bodystring + "State: " + Request.Form("state") + vbCrlf bodystring = bodystring + "ZIP Code " + Request.Form("zip") + vbCrlf bodystring = bodystring + " " + Chr(13) + Chr(10) bodystring = bodystring + "-----------------------------" ' Set objMail = CreateObject("CDONTS.NewMail") ' objMail.FromAddress = Request.Form ("First_Name") & " " & Request.Form ("Last_Name") & " <" & Request.Form ("mailfrom") & ">" ' objMail.From = Request.Form ("First_Name") & " " & Request.Form ("Last_Name") & " <" & Request.Form ("mailfrom") & ">" ' objMail.To = "abex@ksintl.com" Set objMail = Server.CreateObject("Dundas.Mailer") 'objMail.FromAddress = Request.Form ("First_Name") & " " & Request.Form ("Last_Name") & " <" & Request.Form ("mailfrom") & ">" objMail.FromAddress = "virtual_sender@abex.com" objMail.TOs.Add("abex@ksintl.com") objMail.Subject = "2007 K&S Flooring Binder, DVD and Distributor Pricelist Order" objMail.Body = bodystring mailres = objMail.SendMail() set objMail = nothing Set objMail = Server.CreateObject("Dundas.Mailer") 'objMail.FromAddress = Request.Form ("First_Name") & " " & Request.Form ("Last_Name") & " <" & Request.Form ("mailfrom") & ">" objMail.FromAddress = "virtual_sender@abex.com" objMail.TOs.Add("glopez@abex.com") objMail.Subject = "2007 K&S Flooring Binder, DVD and Distributor Pricelist Order" objMail.Body = bodystring mailres = objMail.SendMail() set objMail = nothing %> 2007 K&S Flooring Binder, DVD and Distributor Pricelist

 

 

 

 

Thank you.

Your information has been received.
A representative from KS Intl. will contact you shortly.

©2007 Abex Display Systems • All Rights Reserved • webmaster@abex.com