<%

If Max_Package = "" Or Max_Package = 0 Then
	Max_Package = 5
End If

PCity = Session("City")
PState = Session("State")
PCountry = Session("Country")

%>


<link rel="stylesheet" href="/Style-sheets/Profile-layout.css" type="text/css">
<link rel="stylesheet" href="/Style-sheets/atrraction-set.css" type="text/css">
<link rel="stylesheet" href="/Style-sheets/page-formatting.css" type="text/css">
<link rel="stylesheet" href="/Style-sheets/Lodging-display.css" type="text/css">
<link rel="stylesheet" href="/Style-sheets/headline.css" type="text/css">
<link rel="stylesheet" href="/Style-sheets/standard-input-form.css" type="text/css">
<table border="0" cellspacing="0" cellpadding="0" width="231">
    <td valign="top" width="231" ><img height="20" src="/images/lodging-hdln-header-210.gif" width="210"><table width="210" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td bgcolor="#2A2F88" width="1" height="255"><img src="/images/shim.gif" width="1" height="1"></td>
          <td width="208" bgcolor="#FFFFFF" align="center" valign="top" height="255"> 
<%
SQL = "Get_Package_Items_No_Tax @Package_City='" & PCity & "', @Package_State='" & PState & "', @Package_Country='" & PCountry & "', @Realm_ID='" & Session("Site_Realm") & "'"
Set RSPack = Conn.Execute(SQL)
Dim Package_Loop
Package_Loop = 1
Do While Not RSPack.EOF And Not Package_Loop > Max_Package
%>                  
            <table width="98%" border="0" cellspacing="0" cellpadding="0" bgcolor="#ffffff">
              <tr bgcolor="#FFFFCC"> 
                <td colspan="2" align="middle" height="6" class="hotel-layer-hdln">Kissimmee 
                  Best Western</td>
              </tr>
              <tr> 
                <td width="34%" align="center" height="50"><img height=55 src="/images/brand-logos/hojo-logo.gif" width=55></td>
                <td width="66%" class="standard-input-form-small" height="50">                   
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td class="standard-input-form-small"><span class="sm-hdln">4 
                        Day/3 Night Disney</span><br>
                        All about the hotel goes here with rate range.</td>
                    </tr>
                    <tr>
                      <td class="link">more packages</td>
                    </tr>
                  </table>                  
                </td>
              </tr>
            </table>
<%
RSPack.MoveNext
Package_Loop = Package_Loop + 1
Loop

%>           </td>
          <td bgcolor="#2A2F88" width="1" height="255"><img src="/images/shim.gif" width="1" height="1"></td>
        </tr>
      </table>   
      <img height="10" src="/images/lodging-hdln-footer-210.gif" width="210"></td>
  </tr>
</table>

