<%
dim comm_server_nameagencias
comm_server_nameagencias= trim(request.servervariables("server_name"))
Select Case lcase(comm_server_nameagencias)
case "sevilla.abc.es","sevilla-origin.abc.es","abcdesevilla.es","www.abcdesevilla.es","www.sevilla.abc.es","nuevosevilla.abc.es","prueba-sevilla.abc.es","prueba-cordoba.abc.es","cordoba.abc.es","www.cordoba.abc.es","cerosevilla.abc.es","cerosevilla-origin.abc.es","cero.abcdesevilla.es","cero-origin.abcdesevilla.es"
Common_GetSiteTagDiragencias = "sevilla"
case else
Common_GetSiteTagDiragencias = "abc"
End Select
if (Common_GetSiteTagDiragencias = "sevilla") then
%>
<%else%>
<%end if%>
<%
Select Case lcase(comm_server_nameagencias)
case "sevilla.abc.es","sevilla-origin.abc.es","abcdesevilla.es","www.abcdesevilla.es","www.sevilla.abc.es","nuevosevilla.abc.es","prueba-sevilla.abc.es","prueba-cordoba.abc.es","cordoba.abc.es","www.cordoba.abc.es","cerosevilla.abc.es","cerosevilla-origin.abc.es","cero.abcdesevilla.es","cero-origin.abcdesevilla.es"
Common_GetSiteTagDiragencias = "sevilla"
case else
Common_GetSiteTagDiragencias = "abc"
End Select
if (Common_GetSiteTagDiragencias = "sevilla") then
%>
<%else%>
<%end if%>
Los corresponsales de ABC en el mundo nos cuentan de primera mano todo lo relativo a la gripe A en cada uno de los países en los que se encuentran.
<%
Select Case lcase(comm_server_nameagencias)
case "sevilla.abc.es","sevilla-origin.abc.es","abcdesevilla.es","www.abcdesevilla.es","www.sevilla.abc.es","nuevosevilla.abc.es","prueba-sevilla.abc.es","prueba-cordoba.abc.es","cordoba.abc.es","www.cordoba.abc.es","cerosevilla.abc.es","cerosevilla-origin.abc.es","cero.abcdesevilla.es","cero-origin.abcdesevilla.es"
Common_GetSiteTagDiragencias = "sevilla"
case else
Common_GetSiteTagDiragencias = "abc"
End Select
if (Common_GetSiteTagDiragencias = "sevilla") then
%>
<%else%>
<%end if%>
Alemania
Argelia
Austria
Estados Unidos
Francia
Grecia
Italia
Marruecos
México
Portugal
Reino Unido
Rusia
Suecia
Túnez