[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