 |
 |
 |
 |
 |
 |
 |
 |
 |
 |
 |
Reach us for "More" |
If you have any queries or want to know more on the hospitality solutions from Microsense, please feel free to reach us by using the feedback form below. We will get back to you to address your need. <% Else 'receive the form values Dim sName, sEmail, sFeedback sName=Request.Form("txtName") sEmail=Request.Form("txtEmail") sFeedback=Request.Form("txtFeedback") ' create the HTML formatted email text Dim sEmailText sEmailText = sEmailText & "" sEmailText = sEmailText & "" sEmailText = sEmailText & " " sEmailText = sEmailText & "Message:" & sFeedback & " " sEmailText = sEmailText & "Date & Time:" & Now() & " " sEmailText = sEmailText & "IP :" & Request.ServerVariables("REMOTE_ADDR") sEmailText = sEmailText & "" sEmailText = sEmailText & "" sEmailText = sEmailText & "" 'create the mail object Set NewMailObj=Server.CreateObject("CDONTS.NewMail") NewMailObj.From=sEmail 'This is the email of the feedback sender NewMailObj.To = "info@microsenseindia.com" 'change to your address NewMailObj.Subject = "Feedback" NewMailObj.Body = sEmailText 'you need to add these 2 lines for the mail to be sent in HTML format 'remove them and the email will be sent in Text format NewMailObj.BodyFormat = 0 NewMailObj.MailFormat = 0 NewMailObj.Send Set NewMailObj=Nothing Response.write " Thank you for your interest in the Unwire Pune project. "
End If
%>
" Response.write "Your comments are appreciated and if you have sent us a query we will get back to you as soon as possible. You may also contact us at any of our branch offices or visit our parent site, www.microsenseindia.com, to know more about us. |
