<% currentPage="panorama" %>
<% s1="style=display:none;" s2="style=display:none;" s3="style=display:none;" s4="style=display:none;" s5="style=display:none;" s6="style=display:none;" s7="style=display:none;" s8="style=display:none;" s9="style=display:none;" s10="style=display:none;" s11="style=display:none;" s12="style=display:none;" s13="style=display:none;" s14="style=display:none;" %> <% Select case currentPage ' MENU LA PRENSA case "hoyxhoy": subMenuHoy = "id='sublinksDefault'" menuLaPrensa = "id='navigationDefault'" s2="style=display:block;" case "panorama": subMenuPanorama = "id='sublinksDefault'" menuLaPrensa = "id='navigationDefault'" s2="style=display:block;" case "nacionales": subMenuNacionales = "id='sublinksDefault'" menuLaPrensa = "id='navigationDefault'" s2="style=display:block;" case "opinion": subMenuOpinion = "id='sublinksDefault'" menuLaPrensa = "id='navigationDefault'" s2="style=display:block;" case "perspectiva": subMenuPerspectiva = "id='sublinksDefault'" menuLaPrensa = "id='navigationDefault'" s2="style=display:block;" case "deportes": subMenuDeportes = "id='sublinksDefault'" menuLaPrensa = "id='navigationDefault'" s2="style=display:block;" case "mundo": subMenuMundo = "id='sublinksDefault'" menuLaPrensa = "id='navigationDefault'" s2="style=display:block;" case "economia": subMenuEconomia = "id='sublinksDefault'" menuLaPrensa = "id='navigationDefault'" s2="style=display:block;" case "vivir": subMenuVivir = "id='sublinksDefault'" menuLaPrensa = "id='navigationDefault'" s2="style=display:block;" case "resena": subMenuResena = "id='sublinksDefault'" menuLaPrensa = "id='navigationDefault'" s2="style=display:block;" case "sociales": subMenuSociales = "id='sublinksDefault'" menuLaPrensa = "id='navigationDefault'" s2="style=display:block;" case "horoscopo": subMenuHoroscopo = "id='sublinksDefault'" menuLaPrensa = "id='navigationDefault'" s2="style=display:block;" case "english": subMenuEnglish = "id='sublinksDefault'" menuEnglish = "id='navigationDefault'" s13="style=display:block;" case "pdf": subMenuPDF = "id='sublinksDefault'" menuLaPrensa = "id='navigationDefault'" s2="style=display:block;" case "defensor": subMenuDefensor = "id='sublinksDefault'" menuLaPrensa = "id='navigationDefault'" s2="style=display:block;" ' MENU PRENSA.COM - CANALES case "uhora": subMenuUhora = "id='sublinksDefault'" menuHome = "id='navigationDefault'" s1="style=display:block;" case "salud": subMenuSalud = "id='sublinksDefault'" menuHome = "id='navigationDefault'" s1="style=display:block;" case "psicologia": subMenuPsicologia = "id='sublinksDefault'" menuHome = "id='navigationDefault'" s1="style=display:block;" case "psicologia_sexual": subMenuPsicologiaSexual = "id='sublinksDefault'" menuHome = "id='navigationDefault'" s1="style=display:block;" case "hogar": subMenuHogar = "id='sublinksDefault'" menuHome = "id='navigationDefault'" s1="style=display:block;" case "mascotas": subMenuMascotas = "id='sublinksDefault'" menuHome = "id='navigationDefault'" s1="style=display:block;" case "tecnologia": subMenuTecnologia = "id='sublinksDefault'" menuHome = "id='navigationDefault'" s1="style=display:block;" case "reportajes": subMenuReportajes = "id='sublinksDefault'" menuHome = "id='navigationDefault'" s1="style=display:block;" case "cine": subMenuCine = "id='sublinksDefault'" menuHome = "id='navigationDefault'" s1="style=display:block;" case "bebes": subMenuBebes = "id='sublinksDefault'" menuHome = "id='navigationDefault'" s1="style=display:block;" case "libros": subMenuLibros = "id='sublinksDefault'" menuHome = "id='navigationDefault'" s1="style=display:block;" case "farandula": subMenuFarandula = "id='sublinksDefault'" menuHome = "id='navigationDefault'" s1="style=display:block;" case "discos": subMenuDiscos = "id='sublinksDefault'" menuHome = "id='navigationDefault'" s1="style=display:block;" case "denoche": subMenuDeNoche = "id='sublinksDefault'" menuHome = "id='navigationDefault'" s1="style=display:block;" ' MENU SERVICIOS case "empresarial": subMenuEmpresarial = "id='sublinksDefault'" menuRevistas = "id='navigationDefault'" s4="style=display:block;" case "guia": subMenuGuia = "id='sublinksDefault'" menuServicios = "id='navigationDefault'" s4="style=display:block;" case "directorio": subMenuDirectorio = "id='sublinksDefault'" menuServicios = "id='navigationDefault'" s4="style=display:block;" ' MENU ENGLISH case "news": subMenuNews = "id='sublinksDefault'" menuEnglish = "id='navigationDefault'" s13="style=display:block;" case "economy": subMenuEconomy = "id='sublinksDefault'" menuEnglish = "id='navigationDefault'" s13="style=display:block;" case "sports": subMenuSports = "id='sublinksDefault'" menuEnglish = "id='navigationDefault'" s13="style=display:block;" case "lifestyle": subMenuLifestyle = "id='sublinksDefault'" menuEnglish = "id='navigationDefault'" s13="style=display:block;" ' MENU PRENSA.COM case else: menuHome = "id='navigationDefault'" s1="style=display:block;" End Select %> <% Select Case currentPage %> <%case "home": bannerTopInclude="Home_Homepage_500x75.html"%> <%case "hoyxhoy": bannerTopInclude="Hxh_BannerTop_500x75.html"%> <%case "deportes": bannerTopInclude="Deportes_BannerTop_500x75.html"%> <%case "mundo": bannerTopInclude="Mundo_BannerTop_500x75.html"%> <%case "nacionales": bannerTopInclude="Nacionales_BannerTop_500x75.html"%> <%case "economia": bannerTopInclude="Negocios_BannerTop_500x75.html"%> <%case "opinion": bannerTopInclude="Opinion_BannerTop_500x75.html"%> <%case "panorama": bannerTopInclude="Panorama_BannerTop_500x75.html"%> <%case "perspectiva": bannerTopInclude="Perspectiva_BannerTop_500x75.html"%> <%case "prensa": bannerTopInclude="Prensa_Homepage_500x75.html"%> <%case "uhora": bannerTopInclude="U-Hora_BannerTop_500x75.html"%> <%case "vivir": bannerTopInclude="Vivir_BannerTop_500x75.html"%> <%case "resena": bannerTopInclude="Vivir_BannerTop_500x75.html"%> <%case "horoscopo": bannerTopInclude="Vivir_BannerTop_500x75.html"%> <%case "sociales": bannerTopInclude="Vivir_BannerTop_500x75.html"%> <%case "english": bannerTopInclude="English_BannerTop_500x75.html"%> <%case "news": bannerTopInclude="English_BannerTop_500x75.html"%> <%case "economy": bannerTopInclude="English_BannerTop_500x75.html"%> <%case "canales": bannerTopInclude="Canales_BannerTop_500x75.html"%> <%case "bebes": bannerTopInclude="Canales_BannerTop_500x75.html"%> <%case "hogar": bannerTopInclude="Canales_BannerTop_500x75.html"%> <%case "mascotas": bannerTopInclude="Canales_BannerTop_500x75.html"%> <%case "psicologia": bannerTopInclude="Canales_BannerTop_500x75.html"%> <%case "psicologia_sexual": bannerTopInclude="Canales_BannerTop_500x75.html"%> <%case "reportajes": bannerTopInclude="Canales_BannerTop_500x75.html"%> <%case "salud": bannerTopInclude="Canales_BannerTop_500x75.html"%> <%case "tecnologia": bannerTopInclude="Canales_BannerTop_500x75.html"%> <%case "discos": bannerTopInclude="Canales_BannerTop_500x75.html"%> <%case "farandula": bannerTopInclude="Canales_BannerTop_500x75.html"%> <%case "libros": bannerTopInclude="Canales_BannerTop_500x75.html"%> <%case else: bannerTopInclude="Home_Homepage_500x75.html"%> <% End Select %> <% if (currentPage="uhora") then currentPath = "../hoy/" end if %>
<% Public Sub IncludeFile(filename) Dim fso, file, sourceCode Set fso = Server.CreateObject("Scripting.FileSystemObject") Set file = fso.OpenTextFile(Server.MapPath(filename)) sourceCode = file.ReadAll() sourceCode = Replace(sourceCode, "<" & "%", "") sourceCode = Replace(sourceCode, "%" & ">", "") sourceCode = Replace(sourceCode, "{CURRENT_PATH}", currentPath) ' ExecuteGlobal(sourceCode) ' Se cambio la ejecución del script por response.write response.Write(sourceCode) End Sub dim fs set fs=Server.CreateObject("Scripting.FileSystemObject") 'if (currentPage="uhora") then ' currentPath2 = "../hoy/" 'else ' currentPath2 = currentPath 'end if if fs.FileExists(Server.MapPath(currentPath & "clima/clima.asp")) = false then 'response.write("

No hay datos de clima") else IncludeFile(currentPath & "clima/clima.asp") end if set fs = nothing set fso = nothing %>



Ediciones anteriores

Corporación La Prensa: (507)222-1222
Apartado 0819-05620 El Dorado Ave. 12 de octubre, Hato Pintado Panamá, República de Panamá.

Advertencia: Todo el contenido de www.prensa.com pertenece a Corporación La Prensa S.A. Razón por la cual, el material publicado no se puede
reproducir, copiar o transmitir sin previa autorización por escrito de Corporación La Prensa S.A.
Le agradecemos su cooperación y sugerencias a internet@prensa.com y Servicio al Cliente.
En caso de necesitar mayor información acceda a nuestra biblioteca digital o llámenos al 222-1222.