<%@ Language=VBScript %> <% '-- Evitar que se utilice la caché con esta página Response.Expires = 0 Set miconexion = Server.CreateObject("ADODB.Connection") miconexion.ConnectionString = "driver={SQL Server};server=217.76.131.36;uid=qq723;pwd=zm002;database=qq723" miconexion.Open Set SqlCommand = Server.CreateObject("ADODB.Command") SqlCommand.ActiveConnection = miconexion sSql = "SELECT * FROM desierto_fotos1" sWHERE = "" sWHERE = " WHERE [ESTADO] = 'A' " if sWhere <> "" then sQuery = sSQL & sWhere else sQuery = sSQL end if 'response.write (SQUERY) sORDER = " ORDER BY mes asc " SqlCommand.CommandText = sQuery & sOrder Set RSdesierto_fotos1= SqlCommand.execute iPageSize = 20 iPage = request("PAGE") if iPage = "" then iPage = 0 end if 'response.write((iPAGE)) if iPage < 0 then iPage = 0 end if %> Desiertoymontana.COM Tu portal del Todo Terreno
HOME Contacta  Atención al cliente 91 504 1313
 
Home > Fotos
Aquí podrás enviarnos las fotografías de tus salidas, competiciones y de tus amigos. Envianoslas y estaremos encantados de colocarlas.!
Si quieres ver alguno de los álbunes, pincha en la fotografía del que prefieras...
¿Cómo enviar tus fotos?
  Álbunes de fotos
 
     
  Álbunes destacados  
   
Pulsa en las imágenes para ampliarlas  
  Fotografías  
<%iCount = iPAGESIZE if not RSdesierto_fotos1.eof then 'If iPage * iPAGESIZE >= RScompeticion.RecordCount Then ' iPage = (RScompeticion.RecordCount - 1) \ iPAGESIZE 'End If RSdesierto_fotos1.Move iPage * iPageSize end if%> <%do while not RSdesierto_fotos1.eof And iCount > 0%> <%rsdesierto_fotos1.movenext iCount = iCount - 1 loop %>
Título Album Mes Enviado por Fotos
 
<%=rsdesierto_fotos1("Tituloalbum")%> <%=rsdesierto_fotos1("mes")%> <%=rsdesierto_fotos1("enviadopor")%> <%=rsdesierto_fotos1("numfotos")%> ','','width=600,height=450')" class="txt_tabla">Ir
 
<%if not RSdesierto_fotos1.eof then%> &PAGE=<%=request("PAGE") + 1%>" class="links_tab"> Siguiente <%end if%>

 

Home | Contáctanos | Disclaimer | Publicidad
Desierto y Montaña © 2002 Todos los derechos reservados
Diseño.: ZM Factory