FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
Busquedas con ADO
Saludos a tod@s, mi pregunta es la siguiente:
¿Habra otra opcion diferente a LOCATE para busquedas utilizando un ADOTABLE?
He estado buscando ejemplos pero no los he encontrado, se agradeceria la ayuda a esta pregunta. |
#2
|
||||
|
||||
Hola
Yo lo hago por filtro asi: O tambien por sql, hay muchas formas de hacerlo. Saludos |
#3
|
||||
|
||||
Caral,
Disculpa pero no entendí tu código... ¿Como es que con el Filter se puede saber si se tiene al menos un registro ó no se tiene ningun registro de respuesta, como para poner el mensaje de que no existe la clave de la materia? En un .locate, al menos la respuesta es un true ó false, y con eso sabes si el locate fue exitoso o no, pero no veo como hacerlo con el filter. Gracias por tu explicación. |
#4
|
||||
|
||||
Saludos
Cual es el inconveniente de usar Locate? Existen otras maneras de busqueda FindKey u otras con sentencias Sql.
__________________
Van Troi De León (Not) Guía, Code vB:=Delphi-SQL, ¿Cómo? Viajar en el tiempo no es teóricamente posible, pues si lo fuera, ya estarían aqui contándonos al respecto! |
#5
|
||||
|
||||
Hola saldanaluis
Tienes razon en cuestionarme, eso pasa por tratar de parecer un programador. Con un filter, una sentencia sql, un locate, etc y una simple sentencia if o case, se puede hacer casi cualquier cosa, bueno, si eres programador, algo que no soy. Por eso, tienes razon en cuestionar. Saludos |
#6
|
|||
|
|||
Cita:
Así que no veo el porque te sientas mal amigo Carlos. Salud OS.
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney |
#7
|
||||
|
||||
Hola
Gracias por el animo Amigo, egostar. La verdad, a veces creo que mejor ya no contesto mas hilos por que creo que lo estoy haciendo mal, ultimamente me siento un poco fuera de lugar, la edad quizas. Pero lo que importa en realidad es el apoyo y amistad de personas como tu, gracias. Saludos |
#8
|
|||
|
|||
Cita:
Con eso puedes saber si fué exitoso o no. Salud OS.
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney |
#9
|
|||
|
|||
Mas opciones para buscar
Gracias por responder a este hilo, mas que nada el codigo que coloque al inicio del hilo, era para conocer si habia mas formas de validar cuando se esta insertando en una tabla que tiene un indice primario y que muestra la informacion en un campo dbedit, ya que si se trata de agregar una clave que ya existe en la tabla, manda un mensaje de error.
Caral, a lo mejor no me explique bien cuando puse codigo, se supone que tienes un boton para agregar un nuevo registro, pero antes de darle el Ya que inserta un registro en blanco y luego manda el error de excepcion, por eso debo verificar antes en la tabla si no existe una clave igual que la que se quiere introducir en ese momento, lo que se dice validar la insercion. En alguna parte vi que se podia utilizar la funcion SEEK, pero no se como se utiliza en delphi con los ADOTABLE. De antemano gracias por su ayuda. |
#10
|
||||
|
||||
Si quieres verificar la existencia de una clave antes de la inserción, quizá lo más adecuado sería una consulta SQL del estilo:
y examinar si el valor del registro que te regresa es mayor que cero. Por otra parte, quizá quieras considerar que el error que obtienes no es "malo", a fin de cuentas es otra manera de verificar lo mismo, sólo que lo hace a posteriori. Como lo propones es: Código:
IF ExisteRegistro THEN MuestraError ELSE InsertaRegistro Código:
InsertaRegistro; IF RegistroDuplicado THEN MuestraError; // Saludos |
#11
|
||||
|
||||
Cita:
aqui les pongo un cacho de mi codigo que hice usando esto: Código:
procedure TForm1.Label18Click(Sender: TObject); var Filtro : String; begin Filtro := 'Descripcion=''Short'' and Estilo Like '''+'22mn'+ '*'''; AdoTable1.Filter := Filtro; Adotable1.Filtered := True; end; Gracias! |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
SQL utilizando parametros | gaps2k | SQL | 5 | 28-05-2007 20:31:35 |
Utilizando el locate | alcides | Varios | 2 | 06-09-2006 23:41:22 |
Error utilizando DataSet | Coco_jac | Conexión con bases de datos | 2 | 13-04-2006 00:12:35 |
Utilizando un Actionlist | Carlos Arevalo | OOP | 5 | 13-09-2003 22:14:56 |
Utilizando InstallShield... | apunto | Conexión con bases de datos | 1 | 29-05-2003 22:46:33 |
|