<% if request.ServerVariables("REQUEST_METHOD")="POST" then errFlag=0 if trim(request.form("txtName"))="" then errFlag=1 errDesc = "Save Error - Name" elseif trim(request.form("txtAddress1")) = "" then errFlag=1 errDesc = "Save Error - Address" elseif trim(request.form("txtTownCity"))="" then errFlag=1 errDesc = "Save Error - TownCity" elseif trim(request.form("txtPostcode"))="" then errFlag=1 errDesc = "Save Error - Postcode" elseif checkEmail(request.form("txtEmail")) then errFlag=1 errDesc = "Save Error - Email" elseif checkDate(request.form("txtDOB")) then errFlag=1 errDesc = "Save Error - Date of Birth" end if if errFlag=0 then errDesc = "Save Error" iRecAffect=0 set objCMD = server.CreateObject("ADODB.Command") objCMD.ActiveConnection=strConn strSQL = "INSERT INTO Members (MEM_Name, MEM_Address1, MEM_Address2, MEM_TownCity, MEM_Postcode, MEM_DOB, MEM_Email) VALUES ('" & captext(replace(request.form("txtName"),"'","''")) & "','" & captext(replace(request.form("txtAddress1"),"'","''")) & "','" & captext(replace(request.form("txtAddress2"),"'","''")) & "','" & captext(replace(request.form("txtTownCity"),"'","''")) & "','" & ucase(replace(request.form("txtPostcode"),"'","")) & "','" & request.form("txtDOB") & "','" & lcase(request.form("txtEmail")) & "')" 'response.write strSQL objCMD.CommandText = strSQL objCMD.Execute iRecAffect set objCMD = nothing if iRecAffect=1 then errDesc = "Thank you. Your details have been saved successfully." end if end if end if %> The Sultan Tandoori Restaurant
   
Home  
About Us  
Special Offers  
News  
Menus  
Take Away  
Group Bookings  
Testimonials  
Contact Us  
Sultan Logo and Nut Image

Please complete the form below to receive details of news and special offers from The Sultan Tandoori Restaurant, St Ives. We will keep you informed of all relevant news, special offers and discounts by email on a monthly basis. When you have completed the form, please press "submit" and your details will be added to our database.
<% if len(errDesc)>0 then response.write errDesc else response.write "Please fill in all fields." end if %>
Name " size="50" maxlength="50" />
Address " size="50" maxlength="50" />
  " size="50" maxlength="50" />
Town/City " size="40" maxlength="50" />
Postcode " size="12" maxlength="8" />
Email Address " size="50" maxlength="50" />
Date of Birth
Source
Privacy Policy  
Opening Times  
Contact Us  
Valid XHTML 1.0 Transitional