Ayuda o ejemplo de Update con MySql

1,134 views
Skip to first unread message

pablo b(La Pampa)

unread,
Jul 16, 2011, 11:47:42 AM7/16/11
to Comunidad de Visual Foxpro en Español
Hola Amigos del Foro, me estoy iniciando en el uso de MySql, lei poco
es cierto, quiero conseguir el ebook que alguna vez se publico por aca
pero no me lo mandan se llama "Desarrollo de app con foxpro y MySql"
si alquien lo tiene y me lo puede enviar a term...@yahoo.com, muchas
gracias
el otro motivo por el cual les escribo es como hago para actualizar
los datos ya existes en mi tabla usando el comando Update en una table
creada en mysql, con el comando sqlexec.
si me puden escribir un ejemplo, porque en la ayuda del vfp no esta
usando sqlexec.

Muchas Gracias

Pablo
Argentina

sergio garcia

unread,
Jul 16, 2011, 1:23:23 PM7/16/11
to publice...@googlegroups.com
Yo hago asi mis UPDATE este no lleva clausula where porque no es necesario
en mi tabla

sqlexp = ""
sqlexp = sqlexp + "UPDATE parsysc SET "
sqlexp = sqlexp + "parsysc.imagen =
'"+sqlalpha(thisform.Clstextbox4.value)+"', "
sqlexp = sqlexp + "parsysc.gridbackcolor =
'"+str(thisform.txtGridBackColor.Value)+"', "
sqlexp = sqlexp + "parsysc.longminpsw=
'"+ALLTRIM(STR(thisform.txtLongMinPsw.Value))+"', "
sqlexp = sqlexp + "parsysc.diasvence=
'"+ALLTRIM(STR(thisform.txtDiasVence.Value))+"', "
sqlexp = sqlexp + "parsysc.pswvence=
'"+sqlalpha(thisform.cboPswVence.Value)+"', "
sqlexp = sqlexp + "parsysc.pswreglas=
'"+sqlalpha(thisform.cboPswReglas.Value)+"', "
sqlexp = sqlexp + "parsysc.pswrepite=
'"+sqlalpha(thisform.cboPswRepite.Value)+"', "
sqlexp = sqlexp + "parsysc.empresa=
'"+sqlalpha(thisform.txtempresa.Value)+"', "
sqlexp = sqlexp + "parsysc.ganancia=
'"+sqlalpha(thisform.txtganancia.Value)+"', "
sqlexp = sqlexp + "parsysc.factura=
'"+sqlalpha(thisform.txtfactura.Value)+"', "
*****
sqlexp = sqlexp + "parsysc.cheque=
'"+str(thisform.txtcheque.value,12,2)+"', "
sqlexp = sqlexp + "parsysc.Descr= '"+sqlalpha(thisform.txtdescr.Value)+"',
"
sqlexp = sqlexp + "parsysc.iva= '"+str(thisform.txtiva.value,12,2)+"', "
sqlexp = sqlexp + "parsysc.despacho=
'"+str(thisform.txtdespacho.Value,20,0)+"', "
sqlexp = sqlexp + "parsysc.cotiza=
'"+str(thisform.txtcotiza.Value,20,0)+"', "
sqlexp = sqlexp + "parsysc.direccion=
'"+sqlalpha(thisform.txtdireccion.Value)+"', "
sqlexp = sqlexp + "parsysc.Mail= '"+sqlalpha(thisform.txtmail.Value)+"', "
sqlexp = sqlexp + "parsysc.vence=
'"+sqlalpha(thisform.Clscombobox1.Value)+"', "
sqlexp = sqlexp + "parsysc.garantia=
'"+sqlalpha(thisform.Clscombobox2.Value)+"', "
sqlexp = sqlexp + "parsysc.titulo1 =
'"+sqlalpha(thisform.txttitulo1.value)+"', "
*****
sqlexp = sqlexp + "parsysc.pswfrmmnt=
'"+sqlalpha(thisform.cboPswFrmMnt.Value)+"' "
sqlexp = sqlexp + ""
sqlres = sqlexec(thisform.sqlhandler,sqlexp,'curAct')
if sqlres < 0
do errmgr with sqlexp
return .f.
ENDIF


______________________________________
Sergio A. García
Gerencia
in...@magicsoft.com.gt
Magicsoft de Guatemala
30 Avenida A 17-80 Zona 7 Villa Linda I, Guatemala / 9 calle 7-65 Zona 1,
Jutiapa
Tlf: 5527-4094 · Fax: 7844-3805
in...@magicsoft.com.gt · www.magicsoft.com.gt      
No me imprimas si no es necesario. Protejamos el medio ambiente

-----Mensaje original-----
De: publice...@googlegroups.com
[mailto:publice...@googlegroups.com] En nombre de pablo b(La Pampa)
Enviado el: sábado, 16 de julio de 2011 09:48 a.m.
Para: Comunidad de Visual Foxpro en Español
Asunto: [vfp] Ayuda o ejemplo de Update con MySql

Muchas Gracias

Pablo
Argentina

__________ Información de NOD32, revisión 6299 (20110716) __________

Este mensaje ha sido analizado con NOD32 antivirus system
http://www.nod32.com


Edwin Edilberto Gutierrez Alvarez

unread,
Jul 17, 2011, 10:45:27 AM7/17/11
to Comunidad de Visual Foxpro en Español
wow ..que fue todo eso textero ...no saben que el mejor programdor usa
maxima calidad en menor cantidad ..

yo despues de crear la conexion y todo uso esto mejor

Campo1='Dato Nuevo'
Campo2='Dato Nuevo2'

Tabla =' Tabla'

Condicion_Logica = 'Campo1="Admin"'

Text to Csql noshow textmerge
update <<Tabla>> set Campo1='<<Campo1>>',Campo2='<<Campo2>>' where
<<Condicion_Logica>>
endtext

Sqlexec(nConn, Csql)

Solo asegurate del contenido de las variables y macroreemplazar el
contenido dentro de los <<>> la variable se armara sola y es mucho mas
efectiva y simple

patricio arguello

unread,
Jul 17, 2011, 11:19:06 AM7/17/11
to publice...@googlegroups.com
Att Pablo

Yo utilizo vfp6, y este comando me sirve para actualizar mi tabla de factura
en MySql.

paso 1) muevo los datos que quiero actualizar a una variables
paso 2) armo la instrucci�n update // update tabla set campo1 = ?vcampo1
( no te olvides del signo de interrogacion antes de la variable )
paso 3) ejecuto la actualizaci�n con el comando SQLEXEC(lnHandle, m.lcSQL)

***** Ejemplo ******
** paso1 **
vnrofac = thisform.txtnrofac.value
vfecpag = thisform.txtfecpag.value
vimppag = thisform.txtimppag.value
vvuelto = thisform.txtvuelto.value
vsaldo = thisform.txtsaldo.value
vnrorec = thisform.txtnrorec.value
vefectivo = thisform.txtefectivo.value
thisform.txtpagado.value = "SI"
vpagado = "SI"
** paso 2 **
m.lcSQL = "update factura set pagado = ?vpagado, fecpag = ?vfecpag, "
m.lcSQL = m.lcSQL + " imppag = ?vimppag, vuelto = ?vvuelto, saldo = ?vsaldo,
nrorec = ?vnrorec, "
m.lcSQL = m.lcSQL + " efectivo = ?vefectivo, ualtpag = ?vuser where nrofac =
?vnrofac"
** paso 3 **
m.llRetorno = (SQLEXEC(lnHandle, m.lcSQL) > -1)
if m.llRetorno
wait window "Registro Grabado ..." timeout .20
endif
***

Slds. Patricio-Py

--------------------------------------------------
From: "sergio garcia" <in...@magicsoft.com.gt>
Sent: Saturday, July 16, 2011 1:23 PM
To: <publice...@googlegroups.com>
Subject: RE: [vfp] Ayuda o ejemplo de Update con MySql

> Sergio A. Garc�a


> Gerencia
> in...@magicsoft.com.gt
> Magicsoft de Guatemala
> 30 Avenida A 17-80 Zona 7 Villa Linda I, Guatemala / 9 calle 7-65 Zona 1,
> Jutiapa
> Tlf: 5527-4094 � Fax: 7844-3805
> in...@magicsoft.com.gtwww.magicsoft.com.gt
> No me imprimas si no es necesario. Protejamos el medio ambiente
>
> -----Mensaje original-----
> De: publice...@googlegroups.com
> [mailto:publice...@googlegroups.com] En nombre de pablo b(La Pampa)

> Enviado el: s�bado, 16 de julio de 2011 09:48 a.m.
> Para: Comunidad de Visual Foxpro en Espa�ol


> Asunto: [vfp] Ayuda o ejemplo de Update con MySql
>
> Hola Amigos del Foro, me estoy iniciando en el uso de MySql, lei poco
> es cierto, quiero conseguir el ebook que alguna vez se publico por aca
> pero no me lo mandan se llama "Desarrollo de app con foxpro y MySql"
> si alquien lo tiene y me lo puede enviar a term...@yahoo.com, muchas
> gracias
> el otro motivo por el cual les escribo es como hago para actualizar
> los datos ya existes en mi tabla usando el comando Update en una table
> creada en mysql, con el comando sqlexec.
> si me puden escribir un ejemplo, porque en la ayuda del vfp no esta
> usando sqlexec.
>
> Muchas Gracias
>
> Pablo
> Argentina
>

> __________ Informaci�n de NOD32, revisi�n 6299 (20110716) __________

Reply all
Reply to author
Forward
0 new messages