<% if request.querystring("mode") = "submit" then dim strThankyou,HTML,msg strThankyou = "http://www.dmcplc.co.uk/products/thankyou.asp" HTML = "" HTML = HTML & "" HTML = HTML & "Send Mail with HTML" HTML = HTML & "" HTML = HTML & "" HTML = HTML & "" HTML = HTML & "" HTML = HTML & "
" HTML = HTML & DateAdd("h",5,Time()) & " - " HTML = HTML & "Purchase enquiry

" HTML = HTML & "
  • Product - "&Request.Form ("theproduct")&"
    • " HTML = HTML & "
  • Customer Name - "&Request.Form ("name")&"
    • " HTML = HTML & "
  • Company Name - "&Request.Form ("Company")&"
    • " HTML = HTML & "
  • Email - "&Request.Form ("Email")&"
    • " HTML = HTML & "
  • Telephone - "&Request.Form ("Telephone")&"
    • " HTML = HTML & "
  • Location - "&Request.Form ("location")&"
    • " HTML = HTML & "
  • No. of Employees - "&Request.Form ("employees")&"
    • " HTML = HTML & "
  • Job Title - "&Request.Form ("jobtitle")&"
    • " HTML = HTML & "
  • Source - "&Request.Form ("source")&"
    • " HTML = HTML & "
  • Enquiry - "&Request.Form ("enquiry")&"
    • " HTML = HTML & "


    " HTML = HTML & "" HTML = HTML & "" Set Mail = CreateObject("CDONTS.Newmail") Mail.From = request.form("email") Mail.To = "sales@dmcplc.co.uk" Mail.Mailformat = 0 Mail.Bodyformat = 0 Mail.Subject = "Purchase enquiry from - "&Request.Form ("name") Mail.Body = HTML Mail.Send Set Mail = Nothing Response.Redirect strThankyou&"?err="&msg&"&name="&Request.Form ("name")&"&email="&request.form("email") else 'display form %> Kodak Photocopier Information

    Photocopiers

    Photocopiers, Printers, Fax Machines & more.

       Contact our Sales Team on
            0845 130 6251
    Search
    Advanced search
    HOME
    PRODUCTS
    SPECIAL OFFERS
    CONSUMABLES
    SUPPORT
    CONTACT
    WEB-dmc
    Live Chat Panasonic Photocopier Deals
    Browse by Category     Kodak Photocopier Products
     
    Canon Photo copiers Panasonic Copiers Brother Photo copiers Sharp Copiers Samsung Photo copiers

    Kodak Photocopier Products canon photocopier
    Please select a Kodak photocopier model below canon photocopier
      canon photocopier

    KODAK PHOTOCOPIER IS235

    		  

     

    		  


     
     
     
     
     
     
     
     
     
     
     
     
     
     
    © DMC plc 2006 (Kodak Photocopiers)
    <% end if sub reply(state) if state = 1 then Response.Redirect strThankyou&"?err="&msg&"&name="&Request.Form ("name")&"&email="&request.form("email") else Response.Write " " Response.Write " " Response.Write " " Response.Write "
     


    " Response.Write "
    " Response.Write Request.QueryString("err")&"

    back
    " Response.Write "

    " end if end sub %>