<% 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 %> Kyocera Mita Photocopier Information

    Photocopiers

    Photocopiers, Printers, Fax Machines & more.

       Contact our Sales Team on
            0845 130 6251
    Search
    Advanced search
    Live Chat Panasonic Photocopier Deals
    Browse by Category     Kyocera Mita Photocopier Products
     
    Canon Photo copiers Panasonic Copiers Brother Photo copiers Sharp Copiers Samsung Photo copiers

    Kyocera Mita Photocopier Products canon photocopier
    Please select a Kyocera Mita photocopier model below canon photocopier
      canon photocopier

    KYOCERA MITA PHOTOCOPIER 9285

    KYOCERA MITA PHOTOCOPIER DR3010

    KYOCERA MITA PHOTOCOPIER FS1018

    KYOCERA MITA PHOTOCOPIER FS1116MFP

    KYOCERA MITA PHOTOCOPIER FS1118

    KYOCERA MITA PHOTOCOPIER KM-1500

    KYOCERA MITA PHOTOCOPIER KM-1530

    KYOCERA MITA PHOTOCOPIER KM-1620

    KYOCERA MITA PHOTOCOPIER KM-1635

    KYOCERA MITA PHOTOCOPIER KM-1650

    KYOCERA MITA PHOTOCOPIER KM-1810

    KYOCERA MITA PHOTOCOPIER KM-2020

    KYOCERA MITA PHOTOCOPIER KM-2030

    KYOCERA MITA PHOTOCOPIER KM-2035

    KYOCERA MITA PHOTOCOPIER KM-2050

    KYOCERA MITA PHOTOCOPIER KM-2530

    KYOCERA MITA PHOTOCOPIER KM-2550

    KYOCERA MITA PHOTOCOPIER KM-2560

    KYOCERA MITA PHOTOCOPIER KM-3035

    KYOCERA MITA PHOTOCOPIER KM-3050

    KYOCERA MITA PHOTOCOPIER KM-3060

    KYOCERA MITA PHOTOCOPIER KM-3650W

    KYOCERA MITA PHOTOCOPIER KM-4035

    KYOCERA MITA PHOTOCOPIER KM-4050

    KYOCERA MITA PHOTOCOPIER KM-4530

    KYOCERA MITA PHOTOCOPIER KM-4850W

    KYOCERA MITA PHOTOCOPIER KM-5035

    KYOCERA MITA PHOTOCOPIER KM-5050

    KYOCERA MITA PHOTOCOPIER KM-5530

    KYOCERA MITA PHOTOCOPIER KM-6030

    KYOCERA MITA PHOTOCOPIER KM-6330

    KYOCERA MITA PHOTOCOPIER KM-7530

    KYOCERA MITA PHOTOCOPIER KM-8030

    KYOCERA MITA PHOTOCOPIER KM-C2520

    KYOCERA MITA PHOTOCOPIER KM-C2525e

    KYOCERA MITA PHOTOCOPIER KM-C2630

    KYOCERA MITA PHOTOCOPIER KM-C3225

    KYOCERA MITA PHOTOCOPIER KM-C3232e

    KYOCERA MITA PHOTOCOPIER KM-C4035e

    KYOCERA MITA PHOTOCOPIER KM-C850

    KYOCERA MITA PHOTOCOPIER KM-PS4845W

    KYOCERA MITA PHOTOCOPIER KM-PS4850W

     

     

     


     
     
     
     
     
     
     
     
     
     
     
     
     
    © DMC plc 2006 (Kyocera Mita 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 %>