<%
if Request("Submit")="Submit" then
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Registration form from " &replace (request("nme"),"'","''")
myMail.From=replace (request("email"),"'","''")
myMail.To="sales@infrahousing.com"
myMail.HTMLBody = " | | REGISTRATION FORM | | From | " & Replace (Request("name"),"'","''") &" | Date | " & Replace (Request("Day"),"'","''") &"/" & Replace (Request("Month"),"'","''") &"/" & Replace (Request("Year"),"'","''") &" | | " & Replace (Request("from2"),"'","''") &" | Project | " & Replace (Request("project"),"'","''") &" | | " & Replace (Request("from3"),"'","''") &" | | | | " & Replace (Request("from4"),"'","''") &" | | | | email | " & Replace (Request("email"),"'","''") &" | | | | | To | | M/S Infra Housing Pvt. Ltd | | First Floor, C.L.S. Building, | | M.G. Road, Cochin | | | Dear Sir, | I/We have read & understand the details contained in the brochure and leaflets of the project. The terms and conditions are acceptable to me/us. I /we would automatically become a member of the society/ Association of owners that be formed subsequently I/we agree to abide by all the rules, regulations of such a Society/ Association. | | Kindly accept my/our registration for Apt No " & Replace (Request("apt01"),"'","''")&" on the" & Replace (Request("floor01"),"'","''")&" floor | | having area of " & Replace (Request("area01"),"'","''")&" sq.ft | | Second preference Apt. No " & Replace (Request("apt02"),"'","''")&" on the" & Replace (Request("floor02"),"'","''")&" floor | | having an area of " & Replace (Request("area02"),"'","''")&" sq.ft | | Car park" & Replace (Request("park"),"'","''")&" | | Payment terms " & Replace (Request("payment"),"'","''")&" | | Name & address of the nominee( if any) | | " & Replace (Request("n_address"),"'","''")&" | I / we enclose herewith cheque/ draft No " & Replace (Request("draft"),"'","''")&" dated " & Replace (Request("dated"),"'","''")&" bank on " & Replace (Request("bank"),"'","''")&" for Rs " & Replace (Request("rs"),"'","''")&" being registration and booking fees. On receipt of allotment from you. I/we agree to pay further installments as per the mode of payment prescribed by you and to enter into an agreement for the purchase of the apartment. | | Thanking you | | yours faithfully | | " & Replace (Request("faithfully"),"'","''")&" | "
on error resume next
myMail.Send
if err.number=0 then
Response.write("Thank You " & Request("nme") & "! , your request has been sent successfully..")
'To the enquiry member
'-----------------------------------------------------------
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Thank You " & replace (request("nme"),"'","''")
myMail.From="sales@infrahousing.com"
myMail.To=replace (request("email"),"'","''")
myMail.HTMLBody = " | Dear " & Replace (Request("nme"),"'","''")&" | | Thank you for submimitting the registration form. We will soon contact with you | | Regards, | | INFRA HOUSING PVT. LTD. CLS BUILDING, M G ROAD COCHIN - 6820 11, KERALA, INDIA Office + 91 484 238 38 66 Fax: + 91 484 237 02 61 e-mail:sales@infrahousing.com | "
on error resume next
myMail.Send
'----------------------------------------------------------
else
Response.write("Error:" & err.description & " ")
end if
set Mymail=nothing
End if
%>
|