<% id_pais = Request.QueryString("id") Set con = Server.CreateObject("ADODB.Connection") con.Open data_source strSQL = "SELECT id_pais, pais, camiseta, flag FROM tabla_paises WHERE tabla_paises.id_pais = "&id_pais&"" Set rs = Server.CreateObject("ADODB.Recordset") rs.open strSQL, con, 3, 3 While Not rs.EOF If not rs.EOF Then flag = rs.Fields("flag") camiseta = rs.Fields("camiseta") pais = rs.Fields("pais") If camiseta <> "" Then camisetaPDF = Replace(camiseta,"jpg","pdf") End If End If rs.MoveNext Wend %>
 Mapa del sitio  Seguinos en Facebook  Seguinos en Twitter  Seguinos en Instagram  Seguinos en Youtube  English version
 
Mundial de la Democracia
<% Response.Write "
" Response.Write "
"&pais&"
" Response.Write "" Response.Write "
" Response.Write "
" Response.Write "
" ' Response.Write "
" Response.Write "
" %>