<% if request("Submit") ="Submit" then f_name=request.Form("name") e_mail=request.Form("email") phone=request.Form("phone") location_area=request.Form("location_area") property_wish=request.Form("property_wish") property_type=request.Form("property_type") area=request.Form("area") majorment=request.Form("majorment") location=request.Form("location") expected_value=request.Form("expected_value") query=request.Form("query") hear=request.Form("hear") Body_Text = "hi,
Name: " & f_name & "
Email: " & e_mail & "
Phone: " & phone & "
Location Area: " & location_area & "
Property Wish: " & property_wish & "
Property Type: " & property_type & "
Area: " & area & "
Measurement: " & majorment & "
Location: " & location & "
Expected Value: " & expected_value & "
Query; " & query & "
How to hear about us: " & hear Subject ="Registration" fromWho=e_mail & "(" & f_name & l_name & ")" toWho="query@ayam.in" Dim objCDO Dim objConf Dim objFields 'Const cdoSendUsingPort = 2 Set objCDO = Server.CreateObject("CDO.Message") 'Set objConf = Server.CreateObject("CDO.Configuration") 'Set objFields = objConf.Fields 'objFields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 25 'objFields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.net4india.com" 'objFields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 10 'objFields.Update 'Set objCDO.Configuration = objConf objCDO.From ="query@ayam.in" objCDO.To = toWho objCDO.Subject = Subject objCDO.HTMLBody = Body_Text 'response.end objCDO.Send Set ObjCDO = Nothing 'Set objConf = Nothing Set objFields = Nothing response.redirect("thanks.htm") end if %> ::: Ayam Associates ::
   
 
   
Dehradun Investors Original Booking









     
     
     
 
 
 
NCR Real Estate
 
 

Register your Property

Please fill up the below form carefully.

Fields marked with asterisk (*) are mandatory

:
:
 
:
:
:
:
:
: