Ver Mensaje Individual
  #1  
Antiguo 24-05-2005
TONIAM TONIAM is offline
Miembro
 
Registrado: may 2003
Ubicación: Valencia
Posts: 38
Reputación: 0
TONIAM Va por buen camino
Insertar registros en MySQL

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
Responder Con Cita