<% 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 = 744124 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) %> " /> Grosjean logra la "pole" en Alabama con Palou segundo y O"Ward, tercero

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

Chicago (EE.UU.), 29 abr (EFE).- El francés Romain Grosjean (Andretti Autosport) saldrá líder este domingo en el Children's of Alabama Indy Grand Prix, tras lograr el mejor tiempo en las clasificaciones de este sábado, con el español Alex Palou (Chip Ganassi) segundo y el mexicano Pato O"Ward (Arrow McLaren) tercero.

Grosjean paró el cronómetro en un minuto y 5.8396 segundos y celebró su segunda "pole" de la temporada, por delante de un Palou que tuvo un tiempo de un minuto y 5.9130 segundos.

O"Ward, que ganó esta carrera el año pasado, saldrá en la tercera posición al lograr su mejor vuelta en un minuto y 5.9382 segundos, por delante de Scott McLughlin (Penske).

"Saldremos en la mejor posición, pero me tocan 90 vueltas por liderar. Veremos mañana (por el domingo), pero estoy muy orgulloso por mis chicos y muy feliz por lo que venimos haciendo", dijo Grosjean al comentar su "pole".

El sueco Marcus Eriksson (Chip Ganassi), líder de la tabla por delante de O"Ward y Palou, deberá remontar tras cosechar el duodécimo mejor tiempo este sábado.


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