<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% call cabecera %>

<% call menu %>

<% id = Request.QueryString("id") set rs=server.CreateObject("ADODB.Recordset") sql="select * from viajes_organizados where id="&id&"" rs.open sql,Oconn,2,2 select case session("idioma") case 1%> Viajes organizados <% if not rs.eof then do while not RS.Eof %> <%=rs("titulo")%>  (<%=rs("fechaviaje")%>) " alt="" width="590" height="80" vspace="5" /> Descripción <%=rs("textolargo")%> <% if not rs("enlace")="" then %> " class="enlaceslista" target="_blank">(+ detalles ) <% end if%>     volver al listado <% rs.movenext loop end if %>   <% case 2 %> Viajes organizados <% if not rs.eof then do while not RS.Eof %> <%=rs("titulocat")%>  (<%=rs("fechaviaje")%>) " alt="" width="590" height="80" vspace="5" /> Descripción <%=rs("textolargocat")%> <% if not rs("enlace")="" then %> " class="enlaceslista" target="_blank">(+ detalles ) <% end if%>     volver al listado <% rs.movenext loop end if %>   <% case 3 %> Viajes organizados <% if not rs.eof then do while not RS.Eof %> <%=rs("tituloing")%>  (<%=rs("fechaviaje")%>) " alt="" width="590" height="80" vspace="5" /> Descripción <%=rs("textolargoing")%> <% if not rs("enlace")="" then %> " class="enlaceslista" target="_blank">(+ detalles ) <% end if%>     volver al listado <% rs.movenext loop end if %>   <% case else %> Viajes organizados <% if not rs.eof then do while not RS.Eof %> <%=rs("titulo")%>  (<%=rs("fechaviaje")%>) " alt="" width="590" height="80" vspace="5" /> Descripción <%=rs("textolargo")%> <% if not rs("enlace")="" then %> " class="enlaceslista" target="_blank">(+ detalles ) <% end if%>     volver al listado <% rs.movenext loop end if %>   <% end select %>

<% call banners_derecha %>

<% call pie %>