PDA

Ver la Versión Completa : Insertar registros en MySQL


TONIAM
24-05-2005, 15:47:49
Hola Foro, intento grabar en un fichero de Mysql los datos de una tabla de Access, para utilizo de la carpeta dbexpress los componentes tsqlconnection, tsqlquery (he probado tambien con un tsqltable), tdatasetprovider y un tclientdataset para ver los registros grabados en un dbgrid.

el codigo que he puesto es el siguiente:

DMAccess.DBReferenciasPro.Active := True;
DMMySQL.cipan.Active:= True;
with DMAccess.DBReferenciasPro do
begin
First;
while not Eof do
begin
DMMySQL.cipan.Append;
DMMySQL.cipanARTICULO.AsString := FieldByNAme('ARTICULO').AsString;
DMMySQL.cipanPROVEEDOR.AsInteger := FieldByNAme'PROVEEDOR').AsInteger;
DMMySQL.cipanREFPROV.AsString := FieldByNAme('REFPROV').AsString;
DMMySQL.cipanDESCRIPCION.AsString := FieldByNAme('DESCRIPCION').AsString;
DMMySQL.cipanPRECIO.AsFloat := FieldByNAme('PRECIO').AsFloat;
DMMySQL.cipanDTO.AsFloat := FieldByNAme('DTO').AsFloat;
DMMySQL.cipan.Post;
Next;
end;
end;

y si produce el siguiente error: CIPAN: Cannot modify a read-only dataset

Hago lo mismo que cuando se trata unicamente de tablas de access y hay si que me funciona, ¿Alquien sabe la forma de grabar este fichero en la base de datos de MySQL?

Un saludo
Toni