Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > Tablas planas
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 06-07-2014
maxi915 maxi915 is offline
Miembro
NULL
 
Registrado: jul 2011
Posts: 63
Poder: 13
maxi915 Va por buen camino
capturar y mostrar registro dado entre 2 fechas

hola, una vez mas consultando por aca..
Necesito dado 2 fechas (desde y hasta) enviadas por parametro de tipo string, completar una stringgrid, este es el proceso que realize, pero no obtengo resultados, me trae la grilla vacia...

cuando fechaPago este entre esas fechas, obtener nombre apellido y telefono de ese cliente...alguna ayudita?gracias!!!

Código Delphi [-]
procedure buscarPagos(queryCliente:TADOQuery; desde,hasta:string; grilla:TStringGrid);
var
  i:Integer;
begin
with queryCliente do
    begin
      SQL.Clear;
      SQL.Add('Select * From Clientes Where FechaPago Between '+Desde+' and '+Hasta);
      Open;
          i:=1;
          grilla.RowCount:=RecordCount+1;
          while not Eof do
            begin
              grilla.Cells[0,i]:=fieldByName('nombre').AsString;
              grilla.Cells[1,i]:=fieldByName('apellido').AsString;
              grilla.Cells[2,i]:=fieldByName('telefono').AsString;
              i:=i+1;
              Next;
            end;
      ExecSQL
    end;
end;
Responder Con Cita
  #2  
Antiguo 06-07-2014
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola maxi915.

Intenta de este modo:
Código Delphi [-]
procedure buscarPagos(queryCliente: TADOQuery; const desde, hasta: string; grilla: TStringGrid);
var
  i: Integer;
begin
  with queryCliente do
  begin
    SQL.Clear;
    SQL.Add('SELECT * FROM CLIENTES');
    SQL.Add('WHERE FECHAPAGO BETWEEN :DESDE AND :HASTA');
    Parameters.ParamByName('DESDE').Value:= desde;
    Parameters.ParamByName('HASTA').Value:= hasta;
    Open;
    grilla.RowCount:=RecordCount+1;
    i:=1;
    while not Eof do
    begin
      grilla.Cells[0,i]:=fieldByName('NOMBRE').AsString;
      grilla.Cells[1,i]:=fieldByName('APELLIDO').AsString;
      grilla.Cells[2,i]:=fieldByName('TELEFONO').AsString;
      Inc(i);
      Next;
    end;
    Close;
   // ExcecSQL;  (*) Error
  end;
end;
(* ) El método ExecSQL sólo se usa en consultas que no devuelven un cursor de datos (por ej.: INSERT, DELETE, etc.)

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita
  #3  
Antiguo 06-07-2014
maxi915 maxi915 is offline
Miembro
NULL
 
Registrado: jul 2011
Posts: 63
Poder: 13
maxi915 Va por buen camino
graciias amigo, veo que la tenes muy clara con delphi y access, ya estoy probando y te comento.

No quiero abusar de su ayuda pero es lo unico que me queda como solucion
Responder Con Cita
  #4  
Antiguo 06-07-2014
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola maxi915.

En realidad no conozco mucho de Access , en general consulto previamente los pormenores esa bd.

Pero en lo que concierne al método ExcecSQL es así para todos los componentes que conozco y la mayoría de los motores de base de datos, en líneas generales, se apegan a la sintáxis estándar SQL.

Casimiro te sugirió la lectura de La cara oculta de Delphi 4 aquí. Y es un excelente consejo, todas estas dudas las vas a evacuar con su lectura.

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita
  #5  
Antiguo 06-07-2014
maxi915 maxi915 is offline
Miembro
NULL
 
Registrado: jul 2011
Posts: 63
Poder: 13
maxi915 Va por buen camino
Me alegro entonces que todos los motores de busqueda se apegen a algo por el estilo, en cuanto tenga un ratito le voy a dar una buena leida a la cara oculta, ya pruebo eso y te comento, porque estaba con otro modulo que por suerte salio muy bien con unos with añidados por asi decirlo
Responder Con Cita
  #6  
Antiguo 06-07-2014
maxi915 maxi915 is offline
Miembro
NULL
 
Registrado: jul 2011
Posts: 63
Poder: 13
maxi915 Va por buen camino
Como de costumbre funciono a la perfeccion!

un millon de gracias!!!
Responder Con Cita
  #7  
Antiguo 06-07-2014
maxi915 maxi915 is offline
Miembro
NULL
 
Registrado: jul 2011
Posts: 63
Poder: 13
maxi915 Va por buen camino
ese mismo proceso pero que no este en ese rango de fechas se podra hacer? estoy leyendo un poco para ver si veo como hacerlo
Responder Con Cita
  #8  
Antiguo 06-07-2014
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.040
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Imagina a un cirujano que está operando pacientes y constantemente está haciendo preguntas en los foros sobre lo que tiene entre manos. Los compañeros médicos le aconsejan que antes de seguir operando personas que lea los libros como "La cara oculta de la cirugía" y que estudie medicina... y el cirujano, mientras tiene abierto en canal a un paciente y con su corazón en la mano, dice:
Cita:
Empezado por maxi915 Ver Mensaje
en cuanto tenga un ratito le voy a dar una buena leida a la cara oculta
Eso estás haciendo tú. repites y repites y vuelves a repetir la misma pregunta, donde solamente cambia un campo por otro o una variable por otra, todas las preguntas son iguales, en todas se te ha aconsejado lo mismo, pero vuelves a hacer otra nueva pregunta que es exactamente igual que las preguntas anteriores.
Eso demuestra solamente una cosa, que copias y pegas el código que te dan, lo ajustas y listo, no aprendes, pero no haces por aprender.
Si te vas a dedicar a la panadería, abogado, cría de patos, construcción de puentes, etc. entonces está bien, pero si te vas a dedicar a la programación... lo llevas crudo
Responder Con Cita
  #9  
Antiguo 06-07-2014
maxi915 maxi915 is offline
Miembro
NULL
 
Registrado: jul 2011
Posts: 63
Poder: 13
maxi915 Va por buen camino
intento aprender capo!
Responder Con Cita
  #10  
Antiguo 06-07-2014
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.040
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Cita:
Empezado por maxi915 Ver Mensaje
intento aprender capo!
Dice el refrán: "Para saber, viajar y leer"
En este caso sobra "viajar", solamente queda: leer

Después de leer ese libro, tus ideas cambiarán totalmente y verás las cosas de otra manera, te lo aseguro.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
slq entre dos fechas comparar fechas taru MySQL 2 30-07-2007 16:10:36
Entre fechas erick_jesus Impresión 1 29-05-2006 19:10:50
minutos entre dos fechas jmlifi Firebird e Interbase 3 15-04-2005 12:39:36
Diferencia entre fechas.... seb@ OOP 1 21-08-2003 15:57:22


La franja horaria es GMT +2. Ahora son las 16:54:36.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi