<% function TestCaptcha(byval valSession, byval valCaptcha) dim tmpSession valSession = Trim(valSession) valCaptcha = Trim(valCaptcha) if (valSession = vbNullString) or (valCaptcha = vbNullString) then TestCaptcha = false else tmpSession = valSession valSession = Trim(Session(valSession)) Session(tmpSession) = vbNullString if valSession = vbNullString then TestCaptcha = false else valCaptcha = Replace(valCaptcha,"i","I") if StrComp(valSession,valCaptcha,1) = 0 then TestCaptcha = true else TestCaptcha = false end if end if end if end function %> Hotel Broadway ,Contact or send enquiry for room booking, Hotel Broadway Udaipur, Hotel Broadway in Udaipur India
Hotel Broadway Udaipur Hotel Broadway Udaipur Hotel Broadway Udaipur

CONTACT US

 

Hotel Broadway Udaipur

<% If Request.TotalBytes > 0 Then if TestCaptcha("ASPCAPTCHA", Request.Form("captchacode")) then sMailConfirm = "Your mail has been sent.

" & sHtmlMessage sch = "http://schemas.microsoft.com/cdo/configuration/" '*****Please don't edit this line.***** dim strtxt1,strtxt2,strtxt3,strtxt4 strtxt1=Request.Form("name") strtxt2=Request.Form("email") strtxt3=Request.Form("phone") strtxt4=Request.Form("remarks") Set cdoMessage= Server.CreateObject("CDO.Message") Set cdoConfig = CreateObject("CDO.Configuration") With cdoConfig.Fields .Item(cdoSendUsingMethod) = cdoSendUsingPort .Item(cdoSMTPServer) = "mail.hotelbroadwayudaipur.com" .Item(cdoSMTPAuthenticate) = 1 .Item(cdoSendUsername) = "mailer@hotelbroadwayudaipur.com" .Item(cdoSendPassword) = "ganesh" .Update End With Set cdoMessage.Configuration = cdoConfig cdoMessage.From ="mailer@hotelbroadwayudaipur.com" ''Trim(strtxt2) cdoMessage.To ="info@hotelbroadwayudaipur.com,response@hukamrestaurant.com,hotelbroadwayudaipur@in.com" cdoMessage.Bcc=Trim(strtxt2) cdoMessage.Subject = " Contact from Hotel Broadway" cdoMessage.TextBody ="|||| FIRST NAME :--- " & Trim(strtxt1) & vbCrLf _ & " |||| EMAIL :---- " & Trim(strtxt2) & vbCrLf _ & " |||| PHONE NUMBER :---- " & Trim(strtxt3) & vbCrLf _ & " |||| REMARKS :---- " & Trim(strtxt4) On Error Resume Next cdoMessage.Send if Err then sMailConfirm="
Sorry!! Unable to Send.Please give a valid Email-Id.
" Response.Write(Err.Description) Response.End() end if Set cdoMessage = Nothing Set cdoConfig = Nothing Response.Redirect "thanks.htm" else dim errmsg errmsg = "Incorrect verification code." end if end if %>
 
      
<%response.Write(errmsg)%>  
     
Cafe 0294 Hukam Restaurant
Our Location