Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   ayuda con consulta sql (https://www.clubdelphi.com/foros/showthread.php?t=95479)

DarkSton 27-11-2021 20:07:43

ayuda con consulta sql
 
estoy haciendo un test de un programa con conexion sql pero al hacer la consulta , al busca un numero me busca normal pero si busco un nombre , me escoge el nombre como si fuera una tabla
DataModule2.ZQuery.Close;
DataModule2.ZQuery.SQL.Clear;
DataModule2.ZQuery.SQL.Add('SELECT Owner FROM chest WHERE Item = 25444 order by Owner');
DataModule2.ZQuery.Open ;
DataModule2.ZQuery.ExecSQL;
clientDataSet.Close;
clientDataSet.SetProvider(DataModule2.DataSetProvider);
clientdataset.Open;
memo1.Lines.Add(clientdataset.FieldByName('Owner').AsString);
tengo barios usuarion con ese item y solo me muestra 1 usuario ?
uso el memo para obtener la lista de usuario con ese ítem

aledieb 27-11-2021 20:52:28

Para que te muestre todos debes hacer un while esta el eof

Código Delphi [-]
while not clientdataset.eof do
begin
  memo1.Lines.Add(clientdataset.FieldByName('Owner').AsString);
  clientdataset.next;
end;

Casimiro Notevi 27-11-2021 21:13:24

Cita:

Empezado por DarkSton (Mensaje 544218)
estoy haciendo un test de un programa con conexion sql pero al hacer la consulta , al busca un numero me busca normal pero si busco un nombre , me escoge el nombre como si fuera una tabla
DataModule2.ZQuery.Close;
DataModule2.ZQuery.SQL.Clear;
DataModule2.ZQuery.SQL.Add('SELECT Owner FROM chest WHERE Item = 25444 order by Owner');
DataModule2.ZQuery.Open ;
DataModule2.ZQuery.ExecSQL;
clientDataSet.Close;
clientDataSet.SetProvider(DataModule2.DataSetProvider);
clientdataset.Open;
memo1.Lines.Add(clientdataset.FieldByName('Owner').AsString);
tengo barios usuarion con ese item y solo me muestra 1 usuario ?
uso el memo para obtener la lista de usuario con ese ítem

Por favor, no olvides usar las etiquetas cuando pongas código, ejemplo:


Aparte de eso, con "select" es .open y con "update", "delete", etc. es "execsql".

Código Delphi [-]
DataModule2.ZQuery.Close;
DataModule2.ZQuery.SQL.Clear;
DataModule2.ZQuery.SQL.Add('SELECT Owner FROM chest WHERE Item = 25444 order by Owner');
DataModule2.ZQuery.Open ;
//DataModule2.ZQuery.ExecSQL;
clientDataSet.Close;
clientDataSet.SetProvider(DataModule2.DataSetProvider);
clientdataset.Open;
memo1.Lines.Add(clientdataset.FieldByName('Owner').AsString);

DarkSton 28-11-2021 14:27:26

muchas gracias me funciono pero en esta parte
Código Delphi [-]
DataModule2.ZQuery.SQL.Add('SELECT Owner FROM chest WHERE Item = 229544 order by Owner');
esto es buscando un numero pero si quiero buscar un nombre
Código Delphi [-]
DataModule2.ZQuery.SQL.Add('SELECT correo, telefono FROM chest WHERE user = test');
me genera un error
'SQL Error : Unknowncolumn 'teste in where clause'

Casimiro Notevi 28-11-2021 16:08:08

Código Delphi [-]
DataModule2.ZQuery.SQL.Add('SELECT correo, telefono FROM chest WHERE user=' + QuotedStr(test));

DarkSton 26-07-2023 22:11:43

una ayuda
 
volviendo al tema de mysql y delphi7
me podrian dar un ejemplo de update con muneros y usuarion , insert tipo login usando edit
lo que paso que perdi todo lo de delphi e metieron virus ami pc y todos mis archivos de encriptaron
Código Delphi [-]
DataModule2.ZQuery.SQL.Add('SELECT correo, telefono FROM chest WHERE user=' + QuotedStr(test));
esto me funciona mostrado en un memo quisiera mostrarlo en una tabla , eh buscado guias en google y nada

Casimiro Notevi 27-07-2023 09:45:00

No se entiende nada de lo que dices.

DarkSton 27-07-2023 11:22:14

Cita:

Empezado por Casimiro Notevi (Mensaje 552177)
No se entiende nada de lo que dices.

No te preocupes ya resolví como hacer insert con zeos ,me gustaría hacer un login , pero bueno gracias


La franja horaria es GMT +2. Ahora son las 01:14:00.

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