<%@LANGUAGE="VBSCRIPT"%> <% Dim Recordset1 Dim Recordset1_numRows Set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = MM_hotelestrebol_STRING Recordset1.Source = "SELECT * FROM ofertas WHERE establecimiento ='13' order by id desc" Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 1 Recordset1.Open() Recordset1_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 Recordset1_numRows = Recordset1_numRows + Repeat1__numRows %> Hotel Ciudad Cenicero
     
       
     
           
 
   
   Ubicación
   Habitaciones
   Salones
   Nuestras Bodegas
   Servicios
   Promociones
   Contacto y Reservas
 
 

  Promociones

 <% If Recordset1.EOF And Recordset1.BOF Then %>
En estos momentos no tenemos ninguna promoción que ofrecerles.
<% End If ' end Recordset1.EOF And Recordset1.BOF %> <% If Not Recordset1.EOF Or Not Recordset1.BOF Then %> <% While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF)) %>
<%=ucase(Recordset1.Fields.Item("titulo").Value)%>
Fecha de inicio: <%= DoDateTime((Recordset1.Fields.Item("fecha_inicio").Value), 2, 2057) %> Fecha de finalización: <%= DoDateTime((Recordset1.Fields.Item("fecha_fin").Value), 2, 2057) %>
<%=(Recordset1.Fields.Item("texto").Value)%>
<% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 Recordset1.MoveNext() Wend %> <% End If ' end Not Recordset1.EOF Or NOT Recordset1.BOF %>


 
 
 
 
 


Majadilla s/n
26350 Cenicero (La Rioja) Spain

Telf: + 34 941 454 888 - Fax: + 34 941 454 889
 
      Desarrollado por: Viavox Consulting