<% DIM x, body, mMail, contact contact = Request.Form("contact") IF contact <> "" THEN body = "Contact Request:" & vbcrlf & vbcrlf FOR EACH x IN Request.Form body = body & x & " = " & Request.Form( x ) & vbcrlf NEXT SET mMail = Server.CreateObject("CDONTS.Newmail") ' An email that will show up in the from part of the message mMail.From = Request.Form("email") ' This is the email that the information is to be sent to ' This has to be an email of the domain that is hosted on the server mMail.To = "adina@marketconsult.com" 'The subject that you want to show when you get the email mMail.Subject = "Contact Request" mMail.Body = body mMail.Send set mMail = nothing END IF %> MarketConsult - Contact Us - Canadian Web Consulting and Direct Marketing Services







MarketConsult Inquiry

Email: adinaz@rogers.com


Phone:
416-728-7913.

Fax:
905-764-5745

MarketConsult is located in Toronto, Canada and serves clients in Canada, the US and internationally.

For a project quote or a copy of the NRB Presentation,
please email me at:

adina@marketconsult.com or sales@marketconsult.com

Phone:
416-728-7913.

Fax:
905-764-5745

 
 
Copyright @ 2003 Market Consult , All rights reserved | Home | About Us | What's New | Services | Portfolio | Contact Us