Ver Mensaje Individual
  #1  
Antiguo 16-08-2007
Ubed Ubed is offline
Miembro
 
Registrado: ago 2007
Posts: 71
Reputación: 19
Ubed Va por buen camino
Un par de ayuditas

Bueno ahi voy, la primera:

¿Alguien sabe porque no me funciona esto?

procedure TAltas.PO(Sender: TObject);
begin
Con_Art_Bar.SQL.Clear;
Con_Art_Bar.active := False;
Con_Art_Bar.SQL.Add('SELECT Min(Precio) AS minimo, Articulo, Nombre, ');
Con_Art_Bar.SQL.Add('Precio, Fecha, Ultimo_precio, Fecha_ultima, Cod_Art');
Con_Art_Bar.SQL.Add('FROM proveedores, articulos');
Con_Art_Bar.SQL.Add('where proveedores.Cod_Proveedor = Articulos.Cod_Proveedor');
Con_Art_Bar.SQL.Add('GROUP BY Articulo, Nombre, Precio, ');
Con_Art_Bar.SQL.Add('Fecha, Ultimo_precio, Fecha_ultima, Cod_Art');
Con_Art_Bar.SQL.Add('HAVING Articulo=Foli;');
DBText1.Visible := True;
DBText2.Visible := True;
DBText3.Visible := True;
DBText4.Visible := True;
DBText5.Visible := True;
DBText7.Visible := True;
end;

La segunda:

¿Como hago par realizar Inserts en mi BD de Access que esta conectada por ADO?


Perdon por las molestias pero soy nuevo e intento aprender Delphi por mi cuenta.

Muchas gracias de antemano.
Responder Con Cita