<% 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 = 744247 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) %> " /> Serena Williams revela su segundo embarazo antes de la Met Gala

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

Nueva York (EE.UU.), 1 may (EFE).- La extenista estadounidense Serena Williams, quien se retiró el pasado septiembre tras conquistar 23 "grandes" en su carrera, anunció este lunes su segundo embarazo en un mensaje en su cuenta de Instagram publicado antes de su participación en la Met Gala de Nueva York.

"Me sentí muy feliz cuando Anna Wintour nos invitó a los tres a la Met Gala", escribió Serena Williams, agregando una serie de fotos en las que aparece con un elegante vestido negro, tocándose el vientre y sonriendo junto a su marido Alexis Ohanian.

Williams, de 41 años, tuvo su primera hija, Alexis Olympia Ohanian, en 2017.

La exjugadora estadounidense participa este lunes en la Met Gala de Nueva York, uno de los acontecimientos sociales más exclusivos de Estados Unidos, conocida como "la gran noche de la moda".

En su legendaria carrera, Williams conquistó 73 trofeos en su carrera, entre ellos 23 "grandes", con siete Wimbledon, siete Abiertos de Australia, seis Abiertos de Estados Unidos y tres Roland Garros.


<%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 %>