Franchise Enquiry

<% @ language ="VBScript" %> Franchise Enquiry

<% if Request.Form("Submit")="" then %>

Please Enter the following details:

First Name:

Middle Name :

Last Name :

House no/name:
Street Name:
Town:
Country:
Zip/post code:
Tel.no(O):

E-mail Address:

Present Activity :

Present Revenues :

SwissFrancs

Space Available:

sq/m

Available

Proposed or Rent

Suggested Location:

<% else fname=Request.Form ("fname") mname=Request.Form ("mname") lname=Request.Form ("lname") name=fname+""+mname+""+lname hno=Request.Form ("hno") sname=Request.Form ("sname") town=Request.Form ("town") a1country=Request.Form ("a1country") a1zip=Request.Form ("a1zip") a1tel=Request.Form ("a1tel") email1=Request.Form ("email") pact=Request.Form ("pact") prev=Request.Form ("prev") sava=Request.Form ("sava") sva1=Request.Form ("sva1") sl=Request.Form ("sl") set email2=server.CreateObject("CDONTS.NewMail") email2.MailFormat=0 email2.BodyFormat=0 subject="Franchise" body="An application has come from" body=body&"
" body=body&"Name:"&name body=body&"
" body=body&"House No/Name:"&hno body=body&"
" body=body&"Street Name:"&sname body=body&"
" body=body&"Town:"&town body=body&"
" body=body&"Country:"&a1country body=body&"
" body=body&"Zip Code:"&a1zip body=body&"
" body=body&"Telephone:"&a1tel body=body&"
" body=body&"Email:"&email body=body&"
" body=body&"Present activity:"&pact body=body&"
" body=body&"Present Revenues:"&prev body=body&"
" body=body&"Space Available:"&sava body=body&"
" body=body&"Proposed or Rent:"&sva1 body=body&"Suggested Location:"&sl body=body&"
" email2.to="vaneesh@spice-india.net" email2.from=Request.Form("email") email2.subject=subject email2.body=body email2.send %>

Thank You for your information

<% end if %>

Developed By