directorio de asociaciones, instituciones, proyectos y eventos de turismo responsable y sostenible

 

Noticias

Agenda

Estudios

Proyectos

Bibliografía

Viajes responsables

Proyectos Acsud

Bájate acá el folleto "RSC en el Turismo"


Materiales educativos sobre Turismo y Desarrollo

Quiénes somos
Contacto
Mapa Web

Viajes Acsud

Ecuador verano 2009!

Criterios y lineas de acción:

- Criterios sobre turismo justo

- Acsud y turismo justo

Descarga aquí el

Nº 2 - novembre desembre
Inicio<Agenda
Agenda <% if request("fecha")="" then d=day(Date()) m=Month(Date()) y=Cstr(Year(Date())) response.write Ucase(Monthname(m))&" de "&Ucase(y) else d=day(Date()) m=Month(request("fecha")) y=Cstr(Year(request("fecha"))) response.write Ucase(Monthname(m))&" de "&Ucase(y) end if %>

 


<% for i=0 to 1 %> <% next %>
" class="texto1">Agenda <%=Ucase(Monthname(month(DateAdd("m", i, Date()))))%>  <%=Ucase(year(DateAdd("m", i, Date())))%>


<% set Conn=Server.CreateObject("ADODB.Connection") set RSList=CreateObject("ADODB.Recordset") Conn.Open "dsn=Turismo;uid=Gestor;pwd=;" if request("fecha")="" then RSList.Open "Select * from Agenda where fecha>=#"&d&"/"&m&"/"&y&"# order by fecha asc;", Conn, 3,3 else x=31 if m=2 then x=28 if m=4 then x=30 if m=6 then x=30 if m=9 then x=30 if m=11 then x=30 RSList.Open "Select * from Agenda where fecha<=#"&x&"/"&m&"/"&y&"# and fecha>=#1/"&m&"/"&y&"# order by fecha asc;", Conn, 3,3 response.write "Select * from Agenda where fecha<=#"&x&"/"&m&"/"&y&"# and fecha>=#1/"&m&"/"&y&"# order by fecha asc;" end if do while not Rslist.Eof %>
<%=Rslist("Tipo")%>
<%=Rslist("Titulo")%>
" target="_blank"><%=Rslist("Url")%>
<%=Rslist("Contenido")%>

<% Rslist.Movenext loop %> 

Turismo Responsable
Se puede reproducir citando la fuente



www.acsud.org

Última actualización: 12-01-2009