<%
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%>
Estados Unidos es el país en el que más muertes se han producido por Gripe A, en parte, debido a su negativa a cerrar las fronteras por temor a las consecuencias económicas que ello pueda tener. El gobierno se ha comprometido a tener las vacunas para el mes de octubre, concretamente 120 millones de dosis, que se distribuirán primordialmente entre mujeres embarazadas, personas que viven o cuidan a niños menores de seis meses, personal sanitario, personas con enfermedades crónicas y personas entre los 6 meses y los 24 años. Además, recalca las medidas básicas de prevención difundidas por todo el mundo: lavarse las manos, estornudar sobre un pañuelo y quedarse en casa en caso de que se esté contagiado por el virus.
Para más información: http://www.cdc.gov/h1n1flu
<%
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%>