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 Buscar Temas de Hoy Marcar Foros Como Leídos

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.293
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


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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 01:27:26.


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