Hola
Alguien sabe decirce como puedo volcar un memdadaset de un consulta mysql a
la tabla una vez mofificado
Gracias
__________ Información de ESET NOD32 Antivirus, versión de la base de firmas
de virus 4378 (20090828) __________
ESET NOD32 Antivirus ha comprobado este mensaje.
http://www.eset.com
__________ Información de ESET NOD32 Antivirus, versión de la base de firmas de virus 4378 (20090828) __________
ESET NOD32 Antivirus ha comprobado este mensaje.
http://www.eset.com
In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
volcar un memdataset a tabla mysql
-
Bingen Ugaldebere
- Mensajes: 1310
- Registrado: Mié Sep 26, 2007 7:12 pm
volcar un memdataset a tabla mysql
Yo lo que hago es borrar todo lo previamente cargado del mysql al memdataset
//Borrar formación
AppData:oSqlSource:Execute("Delete from demandantes_formacion where
codigo='"+::cIdDemandantes+"'")
y grabar todo el memdataset de nuevo
//Grabar formación
For nItem:=1 to Len(::oMemForm:aData)
::oMemForm:aData[nItem,1]:=Nil
::oMemForm:aData[nItem,2]:=::oDemandantes:Nif
AppData:oSqlSource:Execute("Insert into demandantes_formacion
Values ("+Concat(::oMemForm:aData[nItem],,.T.)+")")
Next
Concat es una función que monta un texto en base a los elementos del array.
Salu2.
//Borrar formación
AppData:oSqlSource:Execute("Delete from demandantes_formacion where
codigo='"+::cIdDemandantes+"'")
y grabar todo el memdataset de nuevo
//Grabar formación
For nItem:=1 to Len(::oMemForm:aData)
::oMemForm:aData[nItem,1]:=Nil
::oMemForm:aData[nItem,2]:=::oDemandantes:Nif
AppData:oSqlSource:Execute("Insert into demandantes_formacion
Values ("+Concat(::oMemForm:aData[nItem],,.T.)+")")
Next
Concat es una función que monta un texto en base a los elementos del array.
Salu2.
volcar un memdataset a tabla mysql
Lo intentare esta tarde muchas gracias por la ayuda
un saludo
"Bingen Ugaldebere" <bingen@bisoft.com> escribió en el mensaje
news:4aa4cb12$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Yo lo que hago es borrar todo lo previamente cargado del mysql al
> memdataset
>
> //Borrar formación
> AppData:oSqlSource:Execute("Delete from demandantes_formacion where
> codigo='"+::cIdDemandantes+"'")
>
>
> y grabar todo el memdataset de nuevo
>
> //Grabar formación
> For nItem:=1 to Len(::oMemForm:aData)
> ::oMemForm:aData[nItem,1]:=Nil
> ::oMemForm:aData[nItem,2]:=::oDemandantes:Nif
> AppData:oSqlSource:Execute("Insert into demandantes_formacion Values
> ("+Concat(::oMemForm:aData[nItem],,.T.)+")")
> Next
>
> Concat es una función que monta un texto en base a los elementos del
> array.
>
> Salu2.
>
>
> __________ Información de ESET NOD32 Antivirus, versión de la base de
> firmas de virus 4378 (20090828) __________
>
> ESET NOD32 Antivirus ha comprobado este mensaje.
>
> http://www.eset.com
>
>
>
__________ Información de ESET NOD32 Antivirus, versión de la base de firmas de virus 4378 (20090828) __________
ESET NOD32 Antivirus ha comprobado este mensaje.
http://www.eset.com
un saludo
"Bingen Ugaldebere" <bingen@bisoft.com> escribió en el mensaje
news:4aa4cb12$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Yo lo que hago es borrar todo lo previamente cargado del mysql al
> memdataset
>
> //Borrar formación
> AppData:oSqlSource:Execute("Delete from demandantes_formacion where
> codigo='"+::cIdDemandantes+"'")
>
>
> y grabar todo el memdataset de nuevo
>
> //Grabar formación
> For nItem:=1 to Len(::oMemForm:aData)
> ::oMemForm:aData[nItem,1]:=Nil
> ::oMemForm:aData[nItem,2]:=::oDemandantes:Nif
> AppData:oSqlSource:Execute("Insert into demandantes_formacion Values
> ("+Concat(::oMemForm:aData[nItem],,.T.)+")")
> Next
>
> Concat es una función que monta un texto en base a los elementos del
> array.
>
> Salu2.
>
>
> __________ Información de ESET NOD32 Antivirus, versión de la base de
> firmas de virus 4378 (20090828) __________
>
> ESET NOD32 Antivirus ha comprobado este mensaje.
>
> http://www.eset.com
>
>
>
__________ Información de ESET NOD32 Antivirus, versión de la base de firmas de virus 4378 (20090828) __________
ESET NOD32 Antivirus ha comprobado este mensaje.
http://www.eset.com