Sacar Info De Un Query....

[ugezuz]

HOLA BUENAS A TODOS....

QUISIERA SABER SI ALGUIEN ME PUEDE AYUDAR, PUES TENGO UN PROBLEMA CON ESTO:

IBTConectar.StartTransaction;
try
with IBQConsulta do begin
sql.Clear;
sql.Add('SELECT ID_USUARIO as ID FROM USUARIOS_SISTEMA US');
sql.Add('WHERE ((US.CODIGO =:CODIGOIN)AND(US.NOMBRE_APELLIDOS=:NOMBRE))');
ParamByName('CODIGOIN').AsString:= usuario;
ParamByName('NOMBRE').AsString:= codigo;
Open;
id_resultado:=Fieldbyname('ID').AsInteger;
end;
except IBTConectar.Rollback;raise;
end;

if (id_resultado <> 0)then
retorno:=True;

Result:= retorno;
end;
---////////////, eL PROBLEMA ESTA EN QUE NUNCA ME DEVUELVE NADA EN id_resultado, LA CONSULTA ESTA BIEN REALIZADA, PUES YO LA HAGO EN IBEXPERT Y ME DA EL RESULTADO QUE DEBE SER, PERO NO PUEDO SACAR ESE RESULTADO PARA ASIGNARLO-...

gRACIAS..

JESUS RUIZ .........HASTA SIEMPRE

[[Héctor Randolph]]

Hola ugezuz!

Así a primera vista, creo que el error puede estar aquí:

Código Delphi [-]
ParamByName('CODIGOIN').AsString:= usuario; // Aquí debe ir código
ParamByName('NOMBRE').AsString:= codigo; // Acá debe ir usuario

Probablemente estás enviando los parámetros en el orden incorrecto y por eso la consulta no te devuelve los que esperas.

Saludos

[ugezuz]

Huiy.... Y No Me Habia Dado Cuenta.. Esos Son Los Errores Que Me Hacen Perder Tiempo


Muchas Gracias-..--- De Corazon