Home || Room
|| Overview
<%
'*** Show Rate Table
Dim Rate
Set Rate = Server.CreateObject("EHORate.Hotel_rating1")
' Rate.Rate_title_ = (default)
' Rate.ExtraBed_title_ = (default)
' Rate.ExtraBed_enable_ = False ' Default = True
' Rate.Rate_description_ = (default)
' Rate.RoomType_Title_ = (default)
Rate.Rate_description = ""
Rate.Rate_title = ""
'Rate Table Config
Rate.Table.Width = "600" ' Default "600"
Rate.Table.BorderColor = "#660000" ' Default "#006633"
Rate.Table.border = "1" ' Default "1"
Rate.Table.cellspacing = "0" ' Default "0"
Rate.Table.cellpadding = "2" ' Default "2"
Rate.Table.align = "center"
' Header Row
Rate.TrHeader.Align = "center" ' Default "center"
Rate.TrHeader.bgcolor = "#C7DECC" ' Default "#FFFFCC"
' Bgcolor row style 1
Rate.Tr1.Align = "center" ' Default "center"
Rate.Tr1.bgcolor = "" ' Default "#FFCCCC"
' Bgcolor row style 2
Rate.Tr2.Align = "center" ' Default "Center"
Rate.Tr2.bgcolor = "#CCCCCC" ' Default ""
Rate.Show_Rate(thisHotel_id)
Set Rate = Nothing
%>
http://www.krabirailay.com || Hotel & Resort In Phi Phi Island
