Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 11-07-2007
Avatar de CottonMouth
CottonMouth CottonMouth is offline
Miembro
 
Registrado: jun 2007
Posts: 18
Poder: 0
CottonMouth Va por buen camino
Como usar ADOQuery?

hola a todos!! tengo el siguiente problemita. Mi idea es buscar un numero de socio y si se encuentra que me lo muestre en un label, que lo selecione en el
dbgrid y lo elimine o lo modifique segun boton. tengo el siguiente cosigo pero no hace nada, supuse que era la consulta pero la modifique varias veces y nada .Si me pueden ayudar se los agradeceria mucho.La BD es en access y uso un ADOTable
Código:
 
ADOQuery1:=TADOQuery.Create(self);
      ADOQuery1.Active:=false;
      ADOQuery1.Connection:=MiConec;
      ADOQuery1.SQL.Text:='SELECT IdSocio FROM Socios where IdSocio like :'+ %editBuscar.Text%;
      ADOQUERY1.Active:=True;
    if ADOQuery1.IsEmpty then
    messagedlg('El Nro de socio no existe', mtError, [mbok],0)
  else
    Label1.Caption := ADOQuery['IdSocios'];
      ADOQuery1.Close;
besos, luly

Última edición por CottonMouth fecha: 11-07-2007 a las 06:28:01.
Responder Con Cita
  #2  
Antiguo 11-07-2007
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.275
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
(1) Te aconsejo usar QuoteStr para añadir las comillas a los campos de texto o no usar el LIKE si es una campo numérico.
(2) Ejecuta paso a paso y mira por qué parte del IF entra; Sólo para saber si es problema de la consulta o de la línea de asignación.
(3) Para recuperar la info de la consulta prueba como alternativa:

Código Delphi [-]
  Label1.Caption := ADOQuery.FieldByName('IdSocios').AsString;

A ver si utilizamos los TAG's correctamente.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
  #3  
Antiguo 11-07-2007
mamaro mamaro is offline
Miembro
 
Registrado: mar 2004
Posts: 79
Poder: 21
mamaro Va por buen camino
hola

No entiendo muy bien ...

¿Tu tienes un formulario con un edit dónde pones el número a buscar, una grilla (DBGrid) con todos los registros, y un par de buttons para eliminar y modificar?
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
Usar ADOQuery más de 1 Vez NickName Conexión con bases de datos 2 04-03-2007 19:39:25
como manejo adoquery en delphi. jas010 SQL 4 27-01-2005 22:47:33
como cambiar un objeto query por un ADOquery ing_alsaac Conexión con bases de datos 1 12-10-2004 12:20:19
Cómo usar una dll masetru Varios 1 20-12-2003 14:15:50
Como usar el Rollback Michel OOP 3 14-08-2003 17:15:52


La franja horaria es GMT +2. Ahora son las 23:17:05.


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