Ver Mensaje Individual
  #6  
Antiguo 23-02-2009
Avatar de yusnerqui
yusnerqui yusnerqui is offline
Miembro
 
Registrado: mar 2004
Ubicación: Cuba
Posts: 679
Reputación: 21
yusnerqui Va por buen camino
Hola muchachos revivo este hilo porque ya tengo el proceso de importación prácticamente terminado de la forma que me sugirireron, excepto que en vés de usar:

Código Delphi [-]
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\folder;Extended Properties=dBASE IV;User ID=Admin;Password=;
porque no me funcionaba usé:

Código Delphi [-]
'Provider=MSDASQL.1;Persist Security Info=False;Data Source=dBASE '+
'Files;Initial Catalog=c:\folder';
Esto me permite abrir los dbf de fox en cualquier máquina sin problemas con un simple select * from tabla

El problema ahora es que necesito en algunas de esas tablas solo importa los registros correspondientes a un rango de fecha, y no me deja poner el criterio o lo que es lo mismo no me lo acepta

Código Delphi [-]
var
FechaIni,FechaTer:TDate;
begin
FechaIni:= //una fecha guardada en una tabla de configuaracion
FechaTer:=//otra fecha guardada en la tabla de configuaracion
ADOConnection1.Close;
         ADOConnection1.ConnectionString:=
          'Provider=MSDASQL.1;Persist Security Info=False;Data Source=dBASE '+
          'Files;Initial Catalog=c:\folder';
         ADOConnection1.Open;
         //abro el dbf
         DBF.Close;
         DBF.SQL.Text := 'select * from '+Tabla;
         if Auxi.fieldbyname('fecha').AsString='' then
         begin
           DBF.SQL.Text := format('%s where %s >= :F1 and %1:s <= :F2',
                       [DBF.SQL.Text,'CampoFecha']);
           DBF.Parameters[0].Value:=fechaini;
           DBF.Parameters[1].Value:=fechater;
         end;
         DBF.Open;

esto no me da error pero no me debuelve ningun registro
Tampoco me ha funcionado pasarlo directo en la consulta, tampoco encerrandolo entre yabes {} no se realmente que hacer.

Lo que me queda pensar es que usando este modo de conección no puedo hacer otra cosa que leer toda la tabla.

Agradesco cualquier comentario al respecto que me ayude.

Saludos y gracias por leer este hilo
__________________
Lo importante no es llegar primero, sino saber llegar.

Para que puedas llegar mejor lee la Guia de Estilo

Responder Con Cita