![]() |
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 |
La franja horaria es GMT +2. Ahora son las 18:10:04. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi