<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../../Connections/panlanka.asp" -->
<%
' *** Edit Operations: declare variables

MM_editAction = CStr(Request("URL"))
If (Request.QueryString <> "") Then
  MM_editAction = MM_editAction & "?" & Request.QueryString
End If

' boolean to abort record edit
MM_abortEdit = false

' query string to execute
MM_editQuery = ""
%>
<%
' *** Insert Record: set variables

If (CStr(Request("MM_insert")) <> "") Then

  MM_editConnection = MM_panlanka_STRING
  MM_editTable = "maldives"
  MM_editRedirectUrl = "../../html/mailer.htm"
  MM_fieldsStr  = "x|value|Name|value|Total Number of people traveling (including you) Adults :|value|Children (Under 12) :|value|Age of children :|value|Nationality|value|Contact Number :|value|Fax :|value|EMail Address:_req|value|Dates of Travel (yy/mm/dd) From ::|value|To :|value|Banyan Tree|value|Coco Palm|value|Four Seasons|value|Hilton Rangali|value|Kanu Hura|value|Makunudu|value|Full Moon|value|Laguna|value|Olhuveli|value|Paradise|value|Sun Island|value|Taj Coral|value|Vilu Reef|value|Ari Beach|value|Bandos|value|Baros|value|Eriyadhoo|value|Holiday Island|value|Lily Beach|value|Lohifushi|value|Nakatchifushi|value|Dhigufinolhu|value|embudu|value|Fihalohi|value|Fun Island|value|Giravaru|value|Best Value 5 Star Dlx|value|Best Value 5 Star|value|Best Value 4 Star|value|Best Value 3 Star|value|Room Type :|value|Meal Plan|value|Budget per person (excluding airfare):|value|Other_Activity|value|receive_email|value"
  MM_columnsStr = "date_enterd|',none,NULL|Name|',none,''|Adults|',none,''|Children|',none,''|Age_of_children|',none,''|Nationality|',none,''|Telephone|',none,''|Fax|',none,''|Email|',none,''|Date_from|',none,''|Date_to|',none,''|Banyan_tree|none,Yes,No|coco_palm|none,Yes,No|four_seasons|none,Yes,No|hilton_rangali|none,Yes,No|kanu_hura|none,Yes,No|makunudu|none,Yes,No|fullmoon|none,Yes,No|laguna_beach|none,Yes,No|olhuveli|none,Yes,No|paradise_island|none,Yes,No|Sunisland|none,Yes,No|taj_coral|none,Yes,No|vilu_reef|none,Yes,No|Ari_beach|none,Yes,No|bandos|none,Yes,No|baros|none,Yes,No|eriyadhoo|none,Yes,No|holiday_island|none,Yes,No|lily_beach|none,Yes,No|lohifushi|none,Yes,No|Nakatchafushi|none,Yes,No|Dhidufinolhu|none,Yes,No|embudu|none,Yes,No|filhalhohi|none,Yes,No|Funisland|none,Yes,No|giravaaru|none,Yes,No|best_value_5st_dlx|none,Yes,No|Best_value_5|none,Yes,No|Best_value_4_star|none,Yes,No|[Best Value_3_star]|none,Yes,No|[Room _type]|',none,''|Meal_plan|',none,''|Budget|',none,''|Comments|',none,''|Want_to_receive_email|none,Yes,No"

  ' create the MM_fields and MM_columns arrays
  MM_fields = Split(MM_fieldsStr, "|")
  MM_columns = Split(MM_columnsStr, "|")
  
  ' set the form values
  For i = LBound(MM_fields) To UBound(MM_fields) Step 2
    MM_fields(i+1) = CStr(Request.Form(MM_fields(i)))
  Next

  ' append the query string to the redirect URL
  If (MM_editRedirectUrl <> "" And Request.QueryString <> "") Then
    If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then
      MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString
    Else
      MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString
    End If
  End If

End If
%>
<%
' *** Insert Record: construct a sql insert statement and execute it

If (CStr(Request("MM_insert")) <> "") Then

  ' create the sql insert statement
  MM_tableValues = ""
  MM_dbValues = ""
  For i = LBound(MM_fields) To UBound(MM_fields) Step 2
    FormVal = MM_fields(i+1)
    MM_typeArray = Split(MM_columns(i+1),",")
    Delim = MM_typeArray(0)
    If (Delim = "none") Then Delim = ""
    AltVal = MM_typeArray(1)
    If (AltVal = "none") Then AltVal = ""
    EmptyVal = MM_typeArray(2)
    If (EmptyVal = "none") Then EmptyVal = ""
    If (FormVal = "") Then
      FormVal = EmptyVal
    Else
      If (AltVal <> "") Then
        FormVal = AltVal
      ElseIf (Delim = "'") Then  ' escape quotes
        FormVal = "'" & Replace(FormVal,"'","''") & "'"
      Else
        FormVal = Delim + FormVal + Delim
      End If
    End If
    If (i <> LBound(MM_fields)) Then
      MM_tableValues = MM_tableValues & ","
      MM_dbValues = MM_dbValues & ","
    End if
    MM_tableValues = MM_tableValues & MM_columns(i)
    MM_dbValues = MM_dbValues & FormVal
  Next
  MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")"

  If (Not MM_abortEdit) Then
    ' execute the insert
    Set MM_editCmd = Server.CreateObject("ADODB.Command")
    MM_editCmd.ActiveConnection = MM_editConnection
    MM_editCmd.CommandText = MM_editQuery
    MM_editCmd.Execute
    MM_editCmd.ActiveConnection.Close
    If (MM_editRedirectUrl <> "") Then
      'Response.Redirect(MM_editRedirectUrl)destination
Server.Transfer "../../html/mailer.htm"
'?destination=Maldives_Inquiry"
    End If

  End If

End If
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
<HEAD>
<TITLE>Design Your Own Holiday Package</TITLE>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1">
<META NAME="GENERATOR" CONTENT="Mozilla/3.01Gold (Win95; I) [Netscape]">
<META NAME="Author" CONTENT="The Cyber cafe (Pvt) Ltd.">
<script language="JavaScript">
<!--
function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function YY_checkform() { //v4.03
  var args = YY_checkform.arguments; var myDot=true; var myV=''; var myErr='';var addErr=false;
  var myForm = MM_findObj(args[0]);
  for (var i=1; i<args.length;i=i+4){
    if (args[i+1].charAt(0)=='#'){var myReq=true; args[i+1]=args[i+1].substring(1);}else{myReq=false}
    var myObj = MM_findObj(args[i].replace(/\[\d+\]/ig,""));
    myV=myObj.value;
    if (myObj.type=='text'||myObj.type=='password'){
      if (myReq&&myObj.value.length==0){addErr=true}
      if ((myV.length>0)&&(args[i+2]==1)){ //fromto
        if (!(myV/1)||myV<args[i+1].substring(0,args[i+1].indexOf('_'))/1||myV > args[i+1].substring(args[i+1].indexOf('_')+1)/1){addErr=true}
      }
      if ((myV.length>0)&&(args[i+2]==2)&&!myV.match("^[\\w\\.=-]+@[\\w\\.-]+\\.[a-z]{2,4}$")){addErr=true}// email
      if ((myV.length>0)&&(args[i+2]==3)){ // date
        var myD=''; myM=''; myY=''; myYY=0; myDot=true;
        for(var j=0;j<args[i+1].length;j++){
          var myAt = args[i+1].charAt(j);
          if(myAt=='D')myD=myD.concat(myObj.value.charAt(j));
          if(myAt=='M')myM=myM.concat(myObj.value.charAt(j));
          if(myAt=='Y'){myY=myY.concat(myObj.value.charAt(j)); myYY++}
          if(myAt=='-'&&myObj.value.charAt(j)!='-')myDot=false;
          if(myAt=='.'&&myObj.value.charAt(j)!='.')myDot=false;
          if(myAt=='/'&&myObj.value.charAt(j)!='/')myDot=false;
        }
        if(myD/1<1||myD/1>31||myM/1<1||myM/1>12||myY.length!=myYY||!(myY/1))myDot=false;
        if(!myDot){addErr=true}
       }
      if ((myV.length>0)&&(args[i+2]==4)){ // time
        myDot=true;
        var myH = myObj.value.substr(0,myObj.value.indexOf(':'))/1;
        var myM = myObj.value.substr(myObj.value.indexOf(':')+1,2)/1;
        var myP = myObj.value.substr(myObj.value.indexOf(':')+3,2);
        if ((args[i+1])=="12:00pm"){if(myH<0||myH>12||myM<0||myM>59||(myP!="pm"&&myP!="am")||myObj.value.length>7)myDot=false;}
        if ((args[i+1])=="12:00"){if(myH<0||myH>12||myM<0||myM>59||myObj.value.length>5)myDot=false;}
        if ((args[i+1])=="24:00"){if(myH<0||myH>23||myM<0||myM>59||myObj.value.length>5)myDot=false;}
        if(!myDot){addErr=true}
      }
      if (myV.length>0&&args[i+2]==5){ // check this 2
            var myObj1 = MM_findObj(args[i+1].replace(/\[\d+\]/ig,""));
            if(!myObj1[args[i+1].replace(/(.*\[)|(\].*)/ig,"")].checked){addErr=true}
          }
    }else
    if (!myObj.type&&myObj.length>0&&myObj[0].type=='radio'){
          var myTest = args[i].match(/(.*)\[(\d+)\].*/i);
          var myObj1=(myObj.length>1)?myObj[myTest[2]]:myObj;
      if (args[i+2]==1&&myObj1&&myObj1.checked&&MM_findObj(args[i+1]).value.length/1==0){addErr=true}
      if (args[i+2]==2){
        var myDot=false;
        for(var j=0;j<myObj.length;j++){myDot=myDot||myObj[j].checked}
        if(!myDot){myErr+='* ' +args[i+3]+'\n'}
      }
    }else
    if (myObj.type=='checkbox'){
      if(args[i+2]==1&&myObj.checked==false){addErr=true}
      if(args[i+2]==2&&myObj.checked&&MM_findObj(args[i+1]).value.length/1==0){addErr=true}
    }else
    if (myObj.type=='select-one'||myObj.type=='select-multiple'){
      if(args[i+2]==1&&myObj.selectedIndex/1==0){addErr=true}
    }else
    if (myObj.type=='textarea'){
      if(myV.length<args[i+1]){addErr=true}
    }
    if (addErr){myErr+='* '+args[i+3]+'\n'; addErr=false}
  }
  if (myErr!=''){alert('The required information is incomplete or contains errors:\t\t\t\t\t\n\n'+myErr)}
  document.MM_returnValue = (myErr=='');
}
//-->
</script>
</HEAD>
<BODY TEXT="#800040" BGCOLOR="#FFFFFF" LINK="#0000EE" VLINK="#FF8040" ALINK="#FF0000" BACKGROUND="../../images/beach.gif">
<UL>
  <UL>
    <h3 align=CENTER><b><font size=+2 ><img src="../../images/heading.gif" width="650" height="50" border="0"></font></b></h3>
    <form name="form1" method="POST" action="<%=MM_editAction%>" onsubmit="YY_checkform('form1','Name','#q','0','Field \'Name\' is not valid.','EMail Address:_req','#q','2','Field \'EMail \' is not valid.');return document.MM_returnValue">
      <font color="#808000">
      <input type="hidden" name="Inquiry Form" value="Maldives Inquiry">
      </font>
<%
x= date %>
      <input type="hidden" name="x" value="<%=x%>">
      <ul>
        <ul>
          <h1><font color="#808000">Maldive Islands Booking Form </font></h1>
          <h3><font color="#804040">Please enter as much information as possible 
            so that we can give you an accurate quotation.</font></h3>
          <p></p>
        </ul>
      </ul>
      <ul>
        <ul>
          <h4>Your Full Name: 
            <input name="Name" type="TEXT" cols=42 size="32" align=absmiddle>
            <br>
            <br>
            Total number of people traveling (including you)</h4>
          <h4>Adults :&nbsp; 
            <input name="Total Number of people traveling (including you) Adults :" type="TEXT" cols=3 size="3" align=middle>
            Children Under 12 : 
            <input name="Children (Under 12) :" type="TEXT" cols=3 size="3" align=middle>
            Age of children : 
            <input name="Age of children :" type="TEXT" cols=10 size="15" align=middle>
            <br>
            <br>
            Nationality: 
            <input name="Nationality" type="TEXT" cols=18 size="20" align=left>
            <br>
            <br>
            Contact Number: 
            <input name="Contact Number :" type="TEXT" cols=15 size="18" align=left>
            Fax: 
            <input name="Fax :" type="TEXT" cols=15 size="18" align=left>
            <br>
            <br>
            E-Mail:(Must be entered) 
            <input name="EMail Address:_req" type="TEXT" cols=25 size="30" align=left>
            <br>
            <br>
            Dates of Travel (yy/mm/dd) From : 
            <input name="Dates of Travel (yy/mm/dd) From ::" type="TEXT" cols=12 size="14" align=left>
            To:&nbsp; 
            <input name="To :" type="TEXT" cols=12 size="14" align=left>
            <br>
            (If you are not sure of your travel dates, please give approx, dates)<br>
          </h4>
          <h4>Please select preferred resort (Max. 3 for a quick quotation)<br>
          </h4>
          <table width="640" border="1">
            <tr> 
              <td width="177"> 
                <div align="center"><b>Five Star Deluxe</b></div>
              </td>
              <td width="147"> 
                <div align="center"><b>Five Star </b></div>
              </td>
              <td width="145"> 
                <div align="center"><b>Four Star</b></div>
              </td>
              <td width="143"> 
                <div align="center"><b>Three Star</b></div>
              </td>
            </tr>
            <tr> 
              <td width="177" valign="top"> 
                <p> 
                  <input type="checkbox" name="Banyan Tree" value="yes">
                  <a href="../banyan.htm">Banyan Tree</a><br>
                  <input type="checkbox" name="Coco Palm" value="yes">
                  <a href="../cocopalm.htm">Coco Palm Resort</a><br>
                  <input type="checkbox" name="Four Seasons" value="yes">
                  <a href="../fourseasons.htm">Four Seasons </a><br>
                  <input type="checkbox" name="Hilton Rangali" value="yes">
                  <a href="../hilton.htm">Hilton Rangali</a><br>
                  <input type="checkbox" name="Kanu Hura" value="yes">
                  <a href="../kanuhura.htm">Kanu Hura</a><br>
                  <input type="checkbox" name="Makunudu" value="yes">
                  <a href="../makunudu.htm">Makunudu </a></p>
                <p>&nbsp;</p>
              </td>
              <td width="147" valign="top"> 
                <input type="checkbox" name="Full Moon" value="yes">
                <a href="fullmoon/index.htm">Full Moon</a><br>
                <input type="checkbox" name="Laguna" value="yes">
                <a href="laguna/index.htm">Laguna Beach</a><br>
                <input type="checkbox" name="Olhuveli" value="yes">
                <a href="../sun.htm"> Olhuveli </a><br>
                <input type="checkbox" name="Paradise" value="yes">
                <a href="paradiseisland/index.htm">Paradise Island</a><br>
                <input type="checkbox" name="Sun Island" value="yes">
                <a href="../sun.htm">Sun Island</a> <br>
                <input type="checkbox" name="Taj Coral" value="yes">
                <a href="tajcoral/index.htm">Taj Coral</a><br>
                <input type="checkbox" name="Vilu Reef" value="yes">
                <a href="../vilu.htm">Vilu Reef</a></td>
              <td width="145" valign="top"> 
                <p> 
                  <input type="checkbox" name="Ari Beach" value="yes">
                  <a href="../aribeach.htm">Ari Beach</a><br>
                  <input type="checkbox" name="Bandos" value="yes">
                  <a href="../bandos.htm"> Bandos </a><br>
                  <input type="checkbox" name="Baros" value="yes">
                  <a href="../baros.htm">Baros</a><br>
                  <input type="checkbox" name="Eriyadhoo" value="yes">
                  <a href="../eriyadhoo.htm">Eriyadhoo </a><br>
                  <input type="checkbox" name="Holiday Island" value="yes">
                  <a href="../holiday.htm">Holiday Island</a><br>
                  <input type="checkbox" name="Lily Beach" value="yes">
                  <a href="../lilybeach.htm">Lily Beach </a><br>
                  <input type="checkbox" name="Lohifushi" value="yes">
                  <a href="lohifushi/index.htm">Lohifushi</a><br>
                  <input type="checkbox" name="Nakatchifushi" value="yes">
                  <a href="../nakatchafushi.htm">Nakatchafushi</a> </p>
              </td>
              <td width="143" valign="top"> 
                <input type="checkbox" name="Dhigufinolhu" value="yes">
                <a href="../dhigufinolhu.htm">Dhidufinolhu</a><br>
                <input type="checkbox" name="embudu" value="yes">
                <a href="../embudhu.htm">Embudu</a><br>
                <input type="checkbox" name="Fihalohi" value="yes">
                <a href="fihalohi/index.htm">Fihalhohi</a><br>
                <input type="checkbox" name="Fun Island" value="yes">
                <a href="funisland/index.htm">Fun Island</a><br>
                <input type="checkbox" name="Giravaru" value="yes">
                <a href="giravaru/index.htm"> Giravaaru <br>
                </a> </td>
            </tr>
            <tr bgcolor="#FFCC00"> 
              <td width="177" valign="top"> 
                <input type="checkbox" name="Best Value 5 Star Dlx" value="yes">
                <b>Best Value 5 Star Dlx</b></td>
              <td width="147" valign="top"> 
                <input type="checkbox" name="Best Value 5 Star" value="yes">
                <b>Best Value 5 Star</b></td>
              <td width="145" valign="top"> 
                <input type="checkbox" name="Best Value 4 Star" value="yes">
                <b>Best Value 4 Star </b></td>
              <td width="143" valign="top"> 
                <input type="checkbox" name="Best Value 3 Star" value="yes">
                <b>Best Value 3 Star</b> </td>
            </tr>
          </table>
          <h4>Prefered Room Type :&nbsp; 
            <select name="Room Type :" size= 1 align=left>
              <option>Please Select</option>
              <option>Beach Villa</option>
              <option>Water Villa</option>
            </select>
            <br>
          </h4>
          <h4>Prefered Meal Plan :&nbsp; 
            <select name="Meal Plan" size= 1 align=left>
              <option>Please Select</option>
              <option>Half Board(B+D)&nbsp;</option>
              <option>Full Board (B+L+D)&nbsp;</option>
            </select>
            <br>
            <br>
            Your Budget - per person EXCLUDING AIRFARE (in US$)&nbsp; 
            <select name="Budget per person (excluding airfare):" size= 1 align=left>
              <option>US$ 100 - 500&nbsp; 
              <option>US$ 500 - 1000&nbsp; 
              <option>US$ 1000 - 1500&nbsp; 
              <option>US$ 1500 - 2000&nbsp; 
            </select>
            <br>
            <br>
            Other Special arrangements or other comments:<br>
            <textarea name="Other_Activity"  rows=5 cols=60 size="250" align=left></textarea>
            <br>
            <input type="checkbox" name="receive_email" value="YES" checked>
            I would like to receive more information on special promotions<br>
            Clear Form : 
            <input name="Clear Form" type="RESET" value="Reset" align=left>
            Send in form : 
            <input type="submit" value="Submit">
          </h4>
        </ul>
      </ul>
      <input type="hidden" name="MM_insert" value="true">
    </form>
  </UL>
</UL>
<CENTER>
  <P> 
  <p></P>
  <p></P>
  <table width="647" border="5" cellspacing="0" cellpadding="0">
    <tr> 
      <td width="61"> 
        <div align="center"><font color="#FFFFFF" face="Verdana, Arial, Helvetica, sans-serif" size="2"><a href="../../index.htm">Home</a></font></div>
      </td>
      <td width="86"> 
        <div align="center"><font color="#FFFFFF" face="Verdana, Arial, Helvetica, sans-serif" size="2"><a href="../../srilanka/index.htm">Sri 
          Lanka </a></font></div>
      </td>
      <td width="86"> 
        <div align="center"><font color="#FFFFFF" face="Verdana, Arial, Helvetica, sans-serif" size="2"><a href="../index.htm">Maldives</a></font></div>
      </td>
      <td width="75"> 
        <div align="center"><font color="#FFFFFF" face="Verdana, Arial, Helvetica, sans-serif" size="2"><a href="../../india/index.htm">India</a></font></div>
      </td>
      <td width="76"> 
        <div align="center"><font color="#FFFFFF" face="Verdana, Arial, Helvetica, sans-serif" size="2"><a href="../../egypt/index.htm">Egypt</a></font></div>
      </td>
      <td width="80"> 
        <div align="center"><font color="#FFFFFF" face="Verdana, Arial, Helvetica, sans-serif" size="2"><a href="../../cosmos/index.htm">Europe</a></font></div>
      </td>
      <td width="140"> 
        <div align="center"><font color="#0033CC" face="Verdana, Arial, Helvetica, sans-serif" size="2">On-Line 
          Payments</font></div>
      </td>
      <td width="101"> 
        <div align="center"><font color="#FFFFFF" face="Verdana, Arial, Helvetica, sans-serif" size="2"><a href="../../html/about.htm">About 
          Us</a></font></div>
      </td>
  </table>
  <p></P>
</CENTER>
<CENTER>
  <ADDRESS><B><FONT SIZE=-1>Pan Lanka Travels &amp; Tours (Pvt) Ltd.</FONT></B></ADDRESS>
</CENTER>
<CENTER>
  <P><FONT SIZE=-1>6 Palmyrah avenue, Colombo 4, Sri Lanka.</FONT> <FONT SIZE=-1>Tel 
    : (94) 74-518888 Fax : (94) 74-518881</FONT> </P>
</CENTER>
<H5 ALIGN=CENTER><FONT SIZE=-1>E-Mail:<A HREF="mailto:leisure@panlanka.com"> leisure@panlanka.com</A></FONT></H5>
</BODY>
</HTML>