Compañeros del Foro,
Estoy formando en Delphi 7 un comando de MS-ACCESS de la siguiente forma
Código Delphi
[-]
CMD1 := 'SELECT ART_CODIGO,ART_DESCRIPCION,ART_DESC_CORTA,PRC_FEC_VIGENCIA,PRC_PRECIO ';
CMD2 := 'FROM ARTICULOS LEFT JOIN PRECIOS ON ARTICULOS.ART_ID = PRECIOS.PRC_ARTIC_ID ';
CMD3 := 'WHERE ART_DESCRIPCION LIKE ''*'+EdtSelArticulos.Text+'*''';
QryArticulos.Close;
QryArticulos.SQL.Clear;
QryArticulos.SQL.Add(CMD1);
QryArticulos.SQL.Add(CMD2);
QryArticulos.SQL.Add(CMD3);
QryArticulos.Open;
if QryArticulos.RecordCount = 0 then
begin
ShowMessage('No hay artículos que cumplan con las condiciones.');
exit;
end;
pero por más que le pongo un parametro sencillo para que me encuentre alguna información siempre el Recordcount es cero.
No se que es lo que estoy haciendo mal, dado que si entro al MS-ACCESS 2003 y pongo lo que resulta de estas instrucciones de delphi si me muestra información.
Las variables CMDx son tipo string y QryArticulos es un TADOQuery.
Espero me puedan hacer ver mi error para poder corregirlo.
Gracias a todos.
