<% Response.Status="301 Moved Permanently" Response.AddHeader "Location", " http://www.taraservice.com/articulos-ver.php?id="+request("id") DIM conn set conn=NEW clsBaseDeDatos DIM rs set rs=NEW clsCursor DIM id DIM articulos set articulos = new clsListaArticulos id=cint(request("id")) conn.abrir K_CONNECTION_STRING_MAIN rs.abrir conn, "select * from articulos WHERE ok='True' AND id=" & id, adOpenForwardOnly if not rs.eof then ' Establezco titulo de la pagina session("titulo") = rs.campo("titulo") session("descripcion") = rs.campo("breve_resumen") session("claves") = rs.campo("claves") end if %>

Los artículos de TaraService.com



<% Adsense468x60_amarillo %>

<% if not rs.eof then %>
"<%=rs.campo("titulo")%>"
<%=rs.campo("breve_resumen")%>
<% Adsense160x600 %>
<%=rs.campo("texto")%>
<% ' Incrementar views del articulo conn.conn.execute "UPDATE articulos SET accesos=accesos+1 WHERE Id=" & id else %>

No se ha encontrado el artículo solicitado.

<% end if rs.cerrar set rs=nothing conn.cerrar set conn=nothing Volver %>