<%
' FP_ASP ASP Automatically generated by a Frontpage Component. Do not Edit.
On Error Resume Next
Session("FP_OldCodePage") = Session.CodePage
Session("FP_OldLCID") = Session.LCID
Session.CodePage = 1252
Session.LCID = 1033
Err.Clear

strErrorUrl = ""

If Request.ServerVariables("REQUEST_METHOD") = "POST" Then
If Request.Form("VTI-GROUP") = "0" Then
	Err.Clear

	Set fp_conn =  Server.CreateObject("ADODB.Connection")
	FP_DumpError strErrorUrl, "Cannot create connection"

	Set fp_rs = Server.CreateObject("ADODB.Recordset")
	FP_DumpError strErrorUrl, "Cannot create record set"

	fp_conn.Open Application("Design Secrets Form_ConnectionString")
	FP_DumpError strErrorUrl, "Cannot open database"

	fp_rs.Open "Results", fp_conn, 1, 3, 2 ' adOpenKeySet, adLockOptimistic, adCmdTable
	FP_DumpError strErrorUrl, "Cannot open record set"

	fp_rs.AddNew
	FP_DumpError strErrorUrl, "Cannot add new record set to the database"
	Dim arFormFields0(20)
	Dim arFormDBFields0(20)
	Dim arFormValues0(20)

	arFormFields0(0) = "Contact_StreetAddress0"
	arFormDBFields0(0) = "Contact_StreetAddress0"
	arFormValues0(0) = Request("Contact_StreetAddress0")
	arFormFields0(1) = "Contact_ZipCode0"
	arFormDBFields0(1) = "Contact_ZipCode0"
	arFormValues0(1) = Request("Contact_ZipCode0")
	arFormFields0(2) = "Contact_HomePhone"
	arFormDBFields0(2) = "Contact_HomePhone"
	arFormValues0(2) = Request("Contact_HomePhone")
	arFormFields0(3) = "Contact_Address3"
	arFormDBFields0(3) = "Contact_Address3"
	arFormValues0(3) = Request("Contact_Address3")
	arFormFields0(4) = "Services_Updo"
	arFormDBFields0(4) = "Services_Updo"
	arFormValues0(4) = Request("Services_Updo")
	arFormFields0(5) = "Contact_City0"
	arFormDBFields0(5) = "Contact_City0"
	arFormValues0(5) = Request("Contact_City0")
	arFormFields0(6) = "Contact_State0"
	arFormDBFields0(6) = "Contact_State0"
	arFormValues0(6) = Request("Contact_State0")
	arFormFields0(7) = "Services_Weave"
	arFormDBFields0(7) = "Services_Weave"
	arFormValues0(7) = Request("Services_Weave")
	arFormFields0(8) = "Services_Color"
	arFormDBFields0(8) = "Services_Color"
	arFormValues0(8) = Request("Services_Color")
	arFormFields0(9) = "Contact_FirstName"
	arFormDBFields0(9) = "Contact_FirstName"
	arFormValues0(9) = Request("Contact_FirstName")
	arFormFields0(10) = "Services_Braids"
	arFormDBFields0(10) = "Services_Braids"
	arFormValues0(10) = Request("Services_Braids")
	arFormFields0(11) = "Contact_Email0"
	arFormDBFields0(11) = "Contact_Email0"
	arFormValues0(11) = Request("Contact_Email0")
	arFormFields0(12) = "additional info"
	arFormDBFields0(12) = "additional_info"
	arFormValues0(12) = Request("additional info")
	arFormFields0(13) = "Contact_Country0"
	arFormDBFields0(13) = "Contact_Country0"
	arFormValues0(13) = Request("Contact_Country0")
	arFormFields0(14) = "Time"
	arFormDBFields0(14) = "Time"
	arFormValues0(14) = Request("Time")
	arFormFields0(15) = "Contact_LastName"
	arFormDBFields0(15) = "Contact_LastName"
	arFormValues0(15) = Request("Contact_LastName")
	arFormFields0(16) = "Services_Cut"
	arFormDBFields0(16) = "Services_Cut"
	arFormValues0(16) = Request("Services_Cut")
	arFormFields0(17) = "Date"
	arFormDBFields0(17) = "Date"
	arFormValues0(17) = Request("Date")
	arFormFields0(18) = "Services_Perm"
	arFormDBFields0(18) = "Services_Perm"
	arFormValues0(18) = Request("Services_Perm")
	arFormFields0(19) = "Location"
	arFormDBFields0(19) = "Location"
	arFormValues0(19) = Request("Location")

	FP_SaveFormFields fp_rs, arFormFields0, arFormDBFields0

	If Request.ServerVariables("REMOTE_HOST") <> "" Then
		FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_HOST"), "Remote_computer_name"
	End If
	If Request.ServerVariables("HTTP_USER_AGENT") <> "" Then
		FP_SaveFieldToDB fp_rs, Request.ServerVariables("HTTP_USER_AGENT"), "Browser_type"
	End If
	FP_SaveFieldToDB fp_rs, Now, "Timestamp"
	If Request.ServerVariables("REMOTE_USER") <> "" Then
		FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_USER"), "User_name"
	End If

	fp_rs.Update
	FP_DumpError strErrorUrl, "Cannot update the database"

	fp_rs.Close
	fp_conn.Close

	Session("FP_SavedFields")=arFormFields0
	Session("FP_SavedValues")=arFormValues0
	Session.CodePage = Session("FP_OldCodePage")
	Session.LCID = Session("FP_OldLCID")
	Response.Redirect "Design Secrets Confirmation Page.asp"

End If
End If

Session.CodePage = Session("FP_OldCodePage")
Session.LCID = Session("FP_OldLCID")

%>
<HTML xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns="http://www.w3.org/TR/REC-html40">
<HEAD>
<meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=windows-1252">
<meta http-equiv="Content-Language" content="en-us">
<link rel="File-List" href="Design%20Secrets%20Form_files/filelist.xml">

<TITLE>Information Request Form</TITLE>
<!--[if !mso]>
<style>
v\:*         { behavior: url(#default#VML) }
o\:*         { behavior: url(#default#VML) }
.shape       { behavior: url(#default#VML) }
</style>
<![endif]--><!--[if gte mso 9]>
<xml><o:shapedefaults v:ext="edit" spidmax="1027"/>
</xml><![endif]-->
</HEAD>
<BODY bgcolor="#6A0000">
<div align="center">
  <center>

<div align="center">
	<table border="1" width="64%" height="575" bgcolor="#FFFFFF">
		<tr>
			<td valign="top">
			<div align="left">
				<table border="1" width="100%" height="100" bgcolor="#6A0000">
					<tr>
						<td align="left">
						<table border="0" width="100%">
							<tr>
								<td rowspan="3" width="117"><u><b><i>
								<font face="Parchment" color="#FFFFFF" style="font-size: 44pt"><!--[if gte vml 1]><v:shapetype id="_x0000_t161"
 coordsize="21600,21600" o:spt="161" adj="4050" path="m,c7200@0,14400@0,21600,m,21600c7200@1,14400@1,21600,21600e">
 <v:formulas>
  <v:f eqn="prod #0 4 3"/>
  <v:f eqn="sum 21600 0 @0"/>
  <v:f eqn="val #0"/>
  <v:f eqn="sum 21600 0 #0"/>
 </v:formulas>
 <v:path textpathok="t" o:connecttype="custom" o:connectlocs="10800,@2;0,10800;10800,@3;21600,10800"
  o:connectangles="270,180,90,0"/>
 <v:textpath on="t" fitshape="t" xscale="t"/>
 <v:handles>
  <v:h position="center,#0" yrange="0,8100"/>
 </v:handles>
 <o:lock v:ext="edit" text="t" shapetype="t"/>
</v:shapetype><v:shape id="_x0000_s1025" type="#_x0000_t161" alt="D" style='width:72.75pt;
 height:74.25pt;float:left' adj="2634">
 <v:shadow color="#868686"/>
 <v:textpath style='font-family:"Parchment";v-text-spacing:58985f;
  v-text-kern:t' trim="t" fitpath="t" xscale="f" string="DSS"/>
</v:shape><![endif]--><![if !vml]><img border=0 width=99 height=86
src="Design%20Secrets%20Form_files/image001.gif" align=left alt=D v:shapes="_x0000_s1025"><![endif]></font></i></b></u></td>
								<td>
								<p align="center"><u>
								<font face="Edwardian Script ITC" color="#FFFFFF" size="7">
								<b>Design </b></font><b>
								<font face="Edwardian Script ITC" color="#FFFFFF" size="7">
								S</font></b><font face="Edwardian Script ITC" color="#FFFFFF" size="7"><b>ecrets 
								Studios: designs with you in mind</b></font></u></td>
							</tr>
							<tr>
								<td>
								<p style="margin-top: 0; margin-bottom: 0" align="center">
								<i>
								<font color="#FFFFFF" face="Edwardian Script ITC" style="font-size: 28pt">
								Specializing in Black Hair care for over 17 
								years</font></i></td>
							</tr>
							<tr>
								<td>
								<p align="center" style="margin-top: 0; margin-bottom: 0">
								<i>
								<font face="Baskerville Old Face" color="#FFFFFF">
								211 FM 1960 West Ste K, Houston Tx.&nbsp; 77090&nbsp;&nbsp;&nbsp;&nbsp; 
								281-866-9000</font></i></td>
							</tr>
						</table>
						</td>
					</tr>
				</table>
			</div>
			<table border="1" width="100%" height="277">
				<tr>
					<td bordercolor="#2A2A2A" bgcolor="#2A2A2A" height="32">
					<p align="center"><b><font size="4" color="#FFFFFF">Make an 
					appointment online, save time!&nbsp; </font></b></td>
				</tr>
				<tr>
					<td height="237" width="98%" valign="top">
					<div align="right">
						<table border="0" width="74%">
							<tr>
								<td align="left">
<FORM METHOD="POST" action="Design%20Secrets%20Form.asp" webbot-action="--WEBBOT-SELF--">
<!--WEBBOT BOT=SaveDatabase SuggestedExt="asp" S-DataConnection="Design Secrets Form" S-RecordSource="Results" U-Database-URL="../fpdb/Design Secrets Form1.mdb" U-Confirmation-Url="Design Secrets Confirmation Page.asp" S-Builtin-Fields="REMOTE_HOST HTTP_USER_AGENT Timestamp REMOTE_USER" S-Builtin-DBFields="Remote_computer_name Browser_type Timestamp User_name" S-Form-Fields="Contact_StreetAddress0 Contact_ZipCode0 Contact_HomePhone Contact_Address3 Services_Updo Contact_City0 Contact_State0 Services_Weave Services_Color Contact_FirstName Services_Braids Contact_Email0 additional\ info Contact_Country0 Time Contact_LastName Services_Cut Date Services_Perm Location" S-Form-DBFields="Contact_StreetAddress0 Contact_ZipCode0 Contact_HomePhone Contact_Address3 Services_Updo Contact_City0 Contact_State0 Services_Weave Services_Color Contact_FirstName Services_Braids Contact_Email0 additional_info Contact_Country0 Time Contact_LastName Services_Cut Date Services_Perm Location" startspan U-ASP-Include-Url="_fpclass/fpdbform.inc"
--><input TYPE="hidden" NAME="VTI-GROUP" VALUE="0"><!--#include file="_fpclass/fpdbform.inc"--><!--WEBBOT bot=SaveDatabase endspan i-checksum="40548"
--><OL>
<LI>
Please provide the following contact information:<TABLE>
<TR>
<TD ALIGN="right">
<EM>First Name</EM></TD>
<TD>
<INPUT TYPE=TEXT NAME="Contact_FirstName" SIZE=25>
</TD>
</TR>
<TR>
<TD ALIGN="right">
<EM>Last Name</EM></TD>
<TD>
<INPUT TYPE=TEXT NAME="Contact_LastName" SIZE=25>
</TD>
</TR>
<TR>
<TD ALIGN="right">
<EM>Street Address</EM></TD>
<TD>
<INPUT TYPE=TEXT NAME="Contact_StreetAddress0" SIZE=35>
</TD>
</TR>
<TR>
<TD ALIGN="right">
<EM>Address (cont.)</EM></TD>
<TD>
<INPUT TYPE=TEXT NAME="Contact_Address3" SIZE=35>
</TD>
</TR>
<TR>
<TD ALIGN="right">
<EM>City</EM></TD>
<TD>
<INPUT TYPE=TEXT NAME="Contact_City0" SIZE=35>
</TD>
</TR>
<TR>
<TD ALIGN="right">
<EM>State/Province</EM></TD>
<TD>
<INPUT TYPE=TEXT NAME="Contact_State0" SIZE=35>
</TD>
</TR>
<TR>
<TD ALIGN="right">
<EM>Zip/Postal Code</EM></TD>
<TD>
<INPUT TYPE=TEXT NAME="Contact_ZipCode0" SIZE=12 MAXLENGTH=12>
</TD>
</TR>
<TR>
<TD ALIGN="right">
<EM>Country</EM></TD>
<TD>
<INPUT TYPE=TEXT NAME="Contact_Country0" SIZE=2>
</TD>
</TR>
<TR>
<TD ALIGN="right">
<EM>Home Phone</EM></TD>
<TD>
<INPUT TYPE=TEXT NAME="Contact_HomePhone" SIZE=25 MAXLENGTH=25>
</TD>
</TR>
<TR>
<TD ALIGN="right">
<EM>E-mail</EM></TD>
<TD>
<INPUT TYPE=TEXT NAME="Contact_Email0" SIZE=25>
</TD>
</TR>
</TABLE>
<LI>
What service do you need?<PRE><INPUT TYPE=CHECKBOX NAME="Services_Cut">Cut     <INPUT TYPE=CHECKBOX NAME="Services_Weave">Weave   <INPUT TYPE=CHECKBOX NAME="Services_Color">Color   
<INPUT TYPE=CHECKBOX NAME="Services_Braids">Braids  <INPUT TYPE=CHECKBOX NAME="Services_Updo">Updo    <INPUT TYPE=CHECKBOX NAME="Services_Perm">Perm  </PRE>
<LI>
Which Location would you like to come to?<P>
<INPUT TYPE=RADIO NAME="Location" VALUE="211 FM 1960 West Ste K, Houston, Tx. 77090 - Phone: 281-866-" CHECKED>
 211 FM 1960 West Ste K, Houston, Tx. 77090 - Phone: 281-866-9000
<BR>
<INPUT TYPE=RADIO NAME="Location" VALUE="Other">
 					11037 fFM1960 West Ste B4, Houston, TX. 77065&nbsp;&nbsp;&nbsp; 
					281-955-1212 
</P>
<P>
<BR>
<BR>
</P>
<LI>
Enter the date of your appointment:<P>
<INPUT TYPE=TEXT NAME="Date" SIZE=8 MAXLENGTH=8>
<EM> -- mm/dd/yy</EM><BR>
</P>
<LI>
Enter the time of your appointment:<P>
<INPUT TYPE=TEXT NAME="Time" SIZE=12 MAXLENGTH=12>
<EM> -- hh:mm am/pm</EM><BR>
</P>
<LI>
Is there any additional information we should know?<P>
<TEXTAREA NAME="additional info" ROWS=5 COLS=54></TEXTAREA>
<BR>
</P>
</OL>
<p>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
<INPUT TYPE=SUBMIT VALUE="Submit Form">
<INPUT TYPE=RESET VALUE="Reset Form">&nbsp;&nbsp;
</p>
</FORM>
								</td>
							</tr>
						</table>
					</div>
					</td>
				</tr>
			</table>
			<p align="center" style="margin-top: 0; margin-bottom: 0">
			<img height="35" src="MC.gif" width="53" border="0"><img height="35" src="visa.gif" width="53" border="0"><img height="35" src="discover.gif" width="53" border="0"></p>
			<p align="center" style="margin-top: 0; margin-bottom: 0">
			<font color="#460000" size="1">All Rights Reserved.&nbsp; No part of this 
			site may be copied without permission.&nbsp; HGA web designs, Copyright 
			2008</font></p>
			<p align="center" style="margin-top: 0; margin-bottom: 0">
			<font size="1" color="#460000">Photos are not the property of Design 
			Secrets. All Photos are by unknown photographers and unknown stylist</font></td>
		</tr>
	</table>
</div>

  </center>
</div>
</BODY>
</HTML>