<% Dim objMail,strEmailBody,strEmailSubject,strPrefix,strName,strEmail,strPhone,strSubject,strAddress,strComments strPrefix = Request.Form("prefix") strName = Replace(Replace(trim(Request.Form("name")),"'",""),"""","") strEmail = Replace(Replace(trim(Request.Form("email")),"'",""),"""","") strPhone = Replace(Replace(trim(Request.Form("phone")),"'",""),"""","") strPhone = Replace(Replace(trim(Request.Form("phone")),"'",""),"""","") strAddress = Request.Form("address") strSubject = Request.Form("subject") strComments = Request.Form("comments") strEmailSubject = "StayResAustria.com - Enquiry" strEmailBody = vbcrlf &_ "Dear " & strPrefix & " " & strName & " "& vbcrlf &_ "Greetings from StayResAustria-a leading worldwide hotel & package reservation company." & vbcrlf &_ "Thanks for your recent query, we have received the following details." & vbcrlf &_ "Please verify the same and let us know if there are any modifications." & vbcrlf &_ "Our reservation team will revert back to you very soon." & vbcrlf & vbcrlf &_ "Details:" & vbcrlf &_ "Name : " & strName & vbcrlf & _ "E-mail : " & strEmail & vbcrlf & _ "Phone : " & strPhone & vbcrlf & _ "Subject : " & strSubject & vbcrlf & _ "Comments : " & strComments & vbcrlf & _ "Warm Regards" & vbcrlf &_ "StayResAustria.com" & vbcrlf &_ "7 Lincoln Highway," & vbcrlf &_ "Suite 206, Edison," & vbcrlf &_ "NJ 08820" & vbcrlf &_ "Tel: 732.582.2704" & vbcrlf &_ "Fax: 732.210.0422 " & vbcrlf &_ "www.StayResAustria.com" & vbcrlf &_ "StayResAustria DISCLAIMER:" & vbcrlf &_ "This email is confidential and intended solely for the use of the individual " & _ "to whom it is addressed. If you are not the intended recipient, be advised " & _ "that you have received this email in error and that any use, dissemination," & _ "forwarding, printing, or copying of this email is strictly prohibited. If " & _ "you have received this email in error please contact the sender. Although " & _ "this email and any attachments are believed to be free of any virus or other " & _ "defects which might affect any computer or IT system into which they are " & _ "received, no responsibility is accepted by StayResAustria for any loss or" & _ "damage arising in any way from the receipt or use thereof." 'Set objMail = Server.CreateObject("CDONTS.NewMail") 'objMail.BodyFormat = 0 'objMail.MailFormat = 0 'objMail.From = "info@StayResAustria.com" 'objMail.To = strEmail 'objMail.Bcc = "info@StayResAustria.com" 'objMail.Subject = strEmailSubject 'objMail.Body = strEmailBody ' objMail.IsHTML=True 'objMail.Send() 'Set objMail = Nothing Set objMail = Server.CreateObject("CDO.Message") objMail.From = strEmail ' Specify sender's address objMail.To="info@StayResAustria.com" objMail.Cc=strEmail objMail.Subject = strEmailSubject objMail.TextBody = strEmailBody objMail.Send Set objMail = Nothing %> Online Hotel Reservation in Austria
Online Hotel Reservation in Austria | Disclaimer
StayResAustria.com Home Site Map Add to Favorites Frequently Asked Questions  
Home Site Map Favorites FAQ
Online Hotel Reservation in Austria
About Us
About Austria
Travel Guide
Austria Hotels
Austria Cities
Travel Resources
Other Destinations
Other Resources
Contact Us
Become our Affiliate
 

Contact Us Response

 

Thanks. Your Enquiry has been submitted. We'll get back to you shortly.

Hotels in Austria
a Bad Hofgastein Hotels
a Bad Blumau Hotels
a Baden Hotels
a Dornbirn Hotels
a Eisenstadt Hotels
a Feldkirch Hotels
a Graz Hotels
a Igls Hotels
Innsbruck Hotels
a Kaprun Hotels
a Klagenfurt Hotels
a Kitzbuehel Hotels
a Loipersdorf Hotels
a Linz Hotels
a Matrei in Osttirol Hotels
a Mayrhofen Hotels
a Salzburg Hotels
a Seefeld Hotels
a Soelden Hotels
a St. Anton am Arlberg Hotels
a Vienna Hotels
a Villach Hotels
a Zell-am-See Hotels
Become our Affiliate