<% Response.CacheControl = "no-cache" %> <% Response.AddHeader "Pragma", "no-cache" %> <% Response.Expires = -1 %> <% if len(session("LogOk"))=0 then session("LogOk")=0 end if %> <% Dim LcIdArticulo LcIdArticulo = 744114 CadenaConexion="Provider=SQLNCLI11;Server=184.107.19.212;Database=LaConexion; Uid=hr2m;Pwd=Lifeisx1980;Persist security info=true;" Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open CadenaConexion txtSQL = "select v1,v2,v3,v4,v5,v6,intlecturas from be_articulo where id = " & LcIdArticulo Set RS = Conn.Execute(txtSQL) %> Puerto Rico traslada algunos animales de su único zoológico a Colorado

<% dim fs dim sFichero set fs=Server.CreateObject("Scripting.FileSystemObject") sFichero = "C:\inetpub\sitios\laconexionusa\Noticias\mp3\20230429967896_lc96789629.mp3" if fs.FileExists(sFichero) then %> <% end if set fs=nothing %>
Fuente: EFE
04/29/2023

San Juan, 29 abr (EFE).- Siete leones, un oso, un dromedario, un marabú, un puercoespín y un canguro fueron trasladados al Wild Animal Sanctuary, en Colorado, tras abandonar el zoológico de Puerto Rico Dr. Juan A Rivero en Mayagüez, en el oeste de la isla caribeña, que clausurará permanentemente.

El zoológico, con más de 300 animales, era el único que existía en la isla y cerró al público hace seis años tras los daños causados por el devastador huracán María.

Por su parte, la Fundación Salvemos el Zoológico Dr. Juan A. Rivero denunció este sábado en su página de Facebook que "veterinarios sin licencia de Puerto Rico son los que están trabajando con medicamentos controlados para llevarse a los animales".

Además, criticó que "no permitieron que los veterinarios del zoológico de Puerto Rico estuviesen presentes o sus cuidadores" en el traslado de los animales al aeropuerto de Aguadilla, en el oeste de la isla.

La titular del Departamento de Recursos Naturales y Ambientales (DRNA), Anaís Rodríguez informó a finales de febrero que Puerto Rico clausuraría su único zoológico.

Rodríguez aclaró que tras el cierre del zoológico las autoridades contactaron con santuarios en Estados Unidos para que estas especies fueran relocalizadas en otros lugares.

La organización sin fines de lucro Ayuda Internacional Para Elefantes (EAI, por sus siglas en inglés) informó a finales de marzo de que Mundi, la elefanta del zoológico, tendrá un nuevo hogar en un refugio en Georgia, Estados Unidos.

Según informó el portavoz de prensa del Departamento de Recursos Naturales (DRNA) de Puerto Rico, Aniel Bigio, Mundi será trasladada "en mayo".

Imágenes difundidas por la periodista puertorriqueña Valeria Collazo en redes sociales a principios de noviembre denunciaron que los animales vivían en condiciones insalubres y el área más alarmante por las altas temperaturas de las instalaciones es la de los osos.

Tras la publicación de estos archivos audiovisuales, la población puertorriqueña reclamó soluciones al Gobierno, entre ellas planteó enviar a los animales a santuarios acreditados.

Al finalizar el traslado de todos los animales a sus respectivos santuarios, el Gobierno de Puerto Rico aseguró que reconstruirá el área para crear "un concepto" que cuente con espacios abiertos para que la gente pueda caminar, acampar y disfrutar de la naturaleza.

El huracán María causó unos 3.000 muertos en Puerto Rico, una gran destrucción de la infraestructura y un corte total de electricidad que en algunas zonas se prolongó hasta un año.


<%response.write(RS("v1"))%> Me alegra <%response.write(RS("v2"))%> Me gusta <%response.write(RS("v3"))%> Me enoja <%response.write(RS("v4"))%> No me gusta

2016 HR2M WebSolutions LLC - ALL RIGHTS RESERVED
LaConexionUsa POBOX 228

Bienvenido a LaConexión



<% Dim xhora xhora = hour(time()) x = Right (time(), 2) if x = "PM" then if xhora=1 then xhora=13 end if if xhora=2 then xhora=14 end if if xhora=3 then xhora=15 end if if xhora=4 then xhora=16 end if if xhora=5 then xhora=17 end if if xhora=6 then xhora=18 end if if xhora=7 then xhora=19 end if if xhora=8 then xhora=20 end if if xhora=9 then xhora=21 end if if xhora=10 then xhora=22 end if if xhora=11 then xhora=23 end if if xhora=12 then xhora=12 end if end if txtSQL = "update be_articulo set intlecturas=intlecturas+1,bitgrafico=1 where id = " & LcIdArticulo Set RS = Conn.Execute(txtSQL) txtSQL = "insert into be_LecturasxHora (idarticulo,inthora,intlecturas,stridcontrol,idcarpeta) values ("&LcIdArticulo&","&xhora&",1,'2015',126)" Set RS = Conn.Execute(txtSQL) conn.close set conn = nothing %>