<%
' Website Contact Form Generator 
' http://www.tele-pro.co.uk/scripts/contact_form/ 
' This script is free to use as long as you  
' retain the credit link  

' declare variables
Dim EmailFrom
Dim EmailTo
Dim Subject
Dim name
Dim comapny
Dim tel
Dim email
Dim enquiry

' get posted data into variables
EmailFrom = "perkasaforce.com"
EmailTo = "zahyat@perkasaforce.com"
Subject = "perkasaform"
name = Trim(Request.Form("name")) 
comapny = Trim(Request.Form("comapny")) 
tel = Trim(Request.Form("tel")) 
email = Trim(Request.Form("email")) 
enquiry = Trim(Request.Form("enquiry")) 

' validation
Dim validationOK
validationOK=true
If (validationOK=false) Then Response.Redirect("index.asp" & EmailFrom)

' prepare email body text
Dim Body
Body = Body & "name: " & name & VbCrLf
Body = Body & "comapny: " & comapny & VbCrLf
Body = Body & "tel: " & tel & VbCrLf
Body = Body & "email: " & email & VbCrLf
Body = Body & "enquiry: " & enquiry & VbCrLf

' send email 
Dim mail
Set mail = Server.CreateObject("CDONTS.NewMail") 
mail.To = EmailTo
mail.From = EmailFrom
mail.Subject = Subject
mail.Body = Body
mail.Send 

' redirect to success page 
Response.Redirect("index.asp" & EmailFrom)
%>


<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>PerkasaForce Sdn Bhd</title>
<link href="style.css" rel="stylesheet" type="text/css" />


<link rel="stylesheet" type="text/css" href="anylinkmenu.css" />
<script type="text/javascript" src="dropmenu.js"></script>


</head>

<body>

<div id="all">

<div id="header">

</div><!-- header -->

<div id="edit_contact">

<div id="left_column_in">

<div id="menu">


<div class= "mainlogo">
  <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0" width="115" height="122">
    <param name="movie" value="media/logo.swf" />
    <param name="quality" value="high" />
    <param name="wmode" value="transparent" />
    <embed src="media/logo.swf" quality="high" wmode="transparent" pluginspage="http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="115" height="122"></embed>
  </object>
</div>

  <div class="line">
    <!--#include file="imenus0.inc"-->
  </div>

</div><!-- menu -->

</div><!-- left column -->

<div id="right_column">
  <!-- hdr -->
  <div id="box_scroll">
    <div class="t"></div>
    <!-- t -->
    <div class="c">
      <div class="cnt">
        <h1><br />
          <br />
        </h1>
        <table width="350" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td height="575" align="center" valign="top"><img src="images/tq.png" width="104" height="21" /><table width="100%" border="0" cellpadding="0" cellspacing="0">
              <tr>
                <td align="center"><p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><strong><font color="#0033FF" size="3">Thank-you
                  <% = Request.Form("name") %>
                  for completing the form. </font></strong><br />
                  <br />
                  We'll get  to  you shortly. <br />
                  <br />
                  <br />
                  </font><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Regards,<br />
                    Business Development<br />
                    <span class="BLUE1">PERKASAFORCE  SDN BHD </span></font></p></td>
              </tr>
              <tr>
                <td align="center"><p>&nbsp;</p>
                  <p><a href="http://www.perkasaforce.com"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Visit 
                    Our Web Site </font></a></p></td>
              </tr>
            </table></td>
          </tr>
        </table>
        <h1>
</h1>
      </div>
      <!-- cnt -->
    </div>
    <!-- c -->
    <div class="b"></div>
    <!-- b -->
  </div>
  <!-- box 1 -->
<!-- box 2 -->
</div>
<!-- right column -->

<div class="clear"></div>

</div><!-- edit -->


<div id="footer">
  <div class="disclaimer"><div id="logo"></div>
  Copyright © 2009. All rights reserved.
  </div>
<div class="member">
  <img src="images/footer_logo.gif" alt=" " border="0" usemap="#Map" />
  <map name="Map" id="Map">
    <area shape="rect" coords="75,5,125,32" href="http://www.moha.gov.my" target="_blank" alt="Kementerian Dalam Negeri" />
    <area shape="rect" coords="132,5,164,32" href="http://www.kkppm.com" alt="Persatuan Perkhidmatan Kawalan Keselamatan Malaysia" />
    <area shape="rect" coords="82,16,90,19" href="#" />
    <area shape="rect" coords="93,22,95,23" href="#" />
  </map>
</div>
<div class="clear"></div>
</div>
<!-- footer -->

</div><!-- all -->

</body>


</html>
