<% 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 = 743318 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) %> IBM gana 923 millones de dólares en el primer trimestre, un 26 % más

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

Nueva York, 19 abr (EFE).- La tecnológica IBM logró en el primer trimestre un beneficio neto de 923 millones de dólares (unos 842 millones de euros), un 26 % más que en el mismo periodo del año anterior, gracias en buena medida a unos mejores márgenes.

La empresa con sede en Armonk (Nueva York, EE.UU.) facturó entre enero y marzo 14.252 millones de dólares, sólo un 0,4 % más que un año antes, pero sus márgenes mejoraron y sus gastos bajaron casi un 4 %.

Aunque los ingresos de IBM estuvieron algo por debajo de lo previsto, sus cuentas son mejores de lo esperado por los mercados y a esta hora sus acciones ganaban más de un 3 % en las operaciones electrónicas posteriores al cierre de Wall Street, donde hoy habían terminado con un retroceso del 1,14 %.

"Los resultados del primer trimestre demuestran que los clientes siguen acudiendo a IBM por nuestra combinación única de una plataforma de nube híbrida abierta, inteligencia artificial centrada en la empresa y experiencia de negocio para mejorar productividad e impulsar la eficiencia en sus operaciones", señaló en un comunicado el presidente y máximo ejecutivo, Arvind Krishna.

Por segmentos, IBM facturó 5.900 millones de dólares por software, con crecimiento en negocios importantes como el de la nube; mientras que su servicio de consultoría ingresó 5.000 millones de dólares y el de infraestructuras 3.100 millones.

De cara al resto del año, la compañía espera un crecimiento de su facturación de entre el 3 y el 5 % con divisas constantes, y que permanezca plana si se tienen en cuenta los actuales tipos de cambio.


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