<% idnoticia=request.QueryString("idnoticia") idfolclore=request.QueryString("id") Set cn = Server.CreateObject("ADODB.Connection") cn.Open Application("strconnecion") set rs = Server.CreateObject("ADODB.Recordset") sql= "SELECT texto,imagen,imagen1,titulo,autor,idnoticia FROM PYM_folclorenoticias WHERE idnoticia="&idnoticia&"" rs.Open sql, cn texto=replace(rs("texto"),chr(13),"
") imagen=rs("imagen") imagen1=rs("imagen1") titulo=rs("titulo") autor=rs("autor") %>

Las ONGS de la familia Toledo - Los Hermanos de la Caridad ?

<% Set cn = Server.CreateObject("ADODB.Connection") cn.Open Application("strconnecion") set rsf = Server.CreateObject("ADODB.Recordset") sql= "SELECT * FROM PYM_folclore WHERE idfolclore<>"&idfolclore&" and activo ='s' order by idfolclore desc" rsf.Open sql, cn %>

Relacionados

EL PODER EN EL PERU

Ver VIDEO

Reunion el 14 Set 2005 de La Chacana y El FIM

Las cuentas de Toledo

Fue secuestro?

Todo sobre la Juramentacion del Canciller Olivera

Luis Solari habria conseguido firmas irregularmente

Genaro Difunde Cortina de Humo

<%=titulo%>

Las ONGS disenadas por familiares de la familia Toledo, han sido creadas con un solo Objetivo, Cual ? CAPTAR DINERO, como lo hacia el propio Alberto Fujimori, En los videos podran ver como todos sin excepcion, desde la Primera Dama Eliane Karp, hasta el ultimo de los hermanos del Presidente Toledo han gestionado sus ONG. La Gran sensibilidad Social le ha embargado a esta Familia de un momento a otro.. Ver Videos de las ONGS de la familia TOLEDO.

Los Hermanos de la Caridad

<% Set cn = Server.CreateObject("ADODB.Connection") cn.Open Application("strconnecion") set rss = Server.CreateObject("ADODB.Recordset") sql= "SELECT sumilla FROM PYM_folclorenoticias WHERE idnoticia="&idnoticia&"" rss.Open sql, cn sumilla1=rss("sumilla") %>

<%=sumilla1%>

Ver Video

Archivo: Windows Media Video

Duracion: 5:51 min.

Tamano : 1.75 MB

Ver Video

Archivo: Windows Media Video

Duracion: 7:52 min.

Tamano : 2.36 MB

Cortesia: Frank Castanon

E-mail: Balconandino@yahoo.com

<%=texto%>

<% Set cn = Server.CreateObject("ADODB.Connection") cn.Open Application("strconnecion") set rsl = Server.CreateObject("ADODB.Recordset") sql= "SELECT * FROM PYM_folclorenoticias WHERE idfolclore="&idfolclore&" and idnoticia<>"&idnoticia&" order by idnoticia" rsl.Open sql, cn do while not rsl.Eof idnoticia=rsl("idnoticia") titulo=rsl("titulo") idfolclore=rsl("idfolclore") %> <% rsl.movenext loop rsl.close %>

<%=titulo%>