VFP MySql UPDATE
Vi la ayuda que brindaste a un amigo donde colocas un código para insert, asumí que podía ser lo mismo para Update sin embargo al momento de realizar la actualización a uno de mis datos no graba nada, no entiendo cuál puede ser el motivo, este es mi código
xSql = "UPDATE PERSONAL SET"
xSql = xSql + "cod_hora="+str(personal2.cod_hora)+","
xSql = xSql + "fech_naci="+DTOC(Thisform.Olecontrol1.Object.value)+","
xSql = xSql + "ci="+(personal2.ci)+","
xSql = xSql + "pasw="+(personal2.pasw)+","
xSql = xSql + "APP1="+ALLTRIM(personal2.app1)+","
xSql = xSql + "APM="+ALLTRIM(personal2.apm)+","
xSql = xSql + "nombre1="+ALLTRIM(personal2.nombre1)+","
xSql = xSql + "Nombre2="+ALLTRIM(Personal2.Nombre2)+","
xSql = xSql + "Pasw="+ALLTRIM(Personal2.pasw)+","
xSql = xSql + "Salario="+str(Personal2.Salario)+","
xSql = xSql + "Direccion="+(personal2.direccion)
=SQLEXEC(lnHandle,xSql)
Espero me puedas ayudar lo más antes posible y claro agradecido de antemano.
xSql = "UPDATE PERSONAL SET"
xSql = xSql + "cod_hora="+str(personal2.cod_hora)+","
xSql = xSql + "fech_naci="+DTOC(Thisform.Olecontrol1.Object.value)+","
xSql = xSql + "ci="+(personal2.ci)+","
xSql = xSql + "pasw="+(personal2.pasw)+","
xSql = xSql + "APP1="+ALLTRIM(personal2.app1)+","
xSql = xSql + "APM="+ALLTRIM(personal2.apm)+","
xSql = xSql + "nombre1="+ALLTRIM(personal2.nombre1)+","
xSql = xSql + "Nombre2="+ALLTRIM(Personal2.Nombre2)+","
xSql = xSql + "Pasw="+ALLTRIM(Personal2.pasw)+","
xSql = xSql + "Salario="+str(Personal2.Salario)+","
xSql = xSql + "Direccion="+(personal2.direccion)
=SQLEXEC(lnHandle,xSql)
Espero me puedas ayudar lo más antes posible y claro agradecido de antemano.
1 Respuesta
Respuesta de tigrefox
1