Ver Mensaje Individual
  #3  
Antiguo 21-10-2005
Avatar de RONPABLO
[RONPABLO] RONPABLO is offline
Miembro Premium
 
Registrado: oct 2004
Posts: 1.514
Reputación: 21
RONPABLO Va por buen camino
Primero que todo agradecer a Roman . Ya me funciono como me explico, aunqe me produjo un error que marcaba ISAM, y algo mas, lo solucione colocando entre comillas dobles como lo muestro a continuación

Código Delphi [-]
       Modulo.DBExcel.ConnectionString := wideString('Provider=Microsoft.Jet.OLEDB.4.0;Data Source='
       + ODabrirExcel.FileName
       + ';Extended Properties="Excel 8.0; HDR=Yes;IMEX=1"');


Pero luego vino otro error y es que si el numero es muy largo por ejemplo:

91071016875540

me devuelve:

9,1071016876e+013

para solucionar esto hice lo siguiente:

Código Delphi [-]
             try
                idTexto := FloatToStr(Modulo.TExcel.Fields[3].Value)
             except
                idTexto := Modulo.TExcel.Fields[3].AsString;
             end;

pero me retorno el siguiente resultado

91071016876000

como se ve los ultimos 3 numeros son aproximados y asi no me sirve, hay alguna forma de que me entregue el valor tal cual se dijite????
Responder Con Cita