Tmysql

[ricardog]

Estoy intentando un ABC, con la clase Tmysql, y no he podido hacer INSERT, DELETE, UPDATE. Seria alguien tan amable en orientarme con un pequeño ejemplo.

Muchas gracias.


Saludos

[pablovidal]

Hola,

Te puedes conectar al servidor ?, si es asi, verifica los permisos del usuario. De lo contrario hay que ver parte del codigo como te conectas.

[ricardog]

Pablo, gracias por contestar

Pero no me supe explicar anteriormente, veras:
Quiero trabajar con la clase TMYSQL ( xharbour/Contrib ), Todo ok, pero cuando capturo por ejemplo una ALTA de cliente, y doy click en el boton de aceptar. Obvio es que se debe "INSERTAR", el registro que se capturo, pues bien, aqui mis dudas:
Si utilizo oDb:APPEND(), sencillamente no hace nada.
Igual para DELETE, UPDATE.
Esto es en lo que quiero que me orienten.

Gracias.

[pablovidal]

yo trabajo con eagle1 de manu. Lo que hago es trabajar con array y cuando tengo que insertar / modificar lo hago con una sentencia SQL.

Para Hacer un insert:

Code: Select all  Expand view  RUN

cQuery := "insert into mytabla( documento, fecha, cliente ) values( '" + cNumDocumento + "', now(), '" + ctecodigo + "') "

ExecSql( cQuery )


Para un update:

Code: Select all  Expand view  RUN

cQuery := "update mytabla2 set descripcion='" + cDescripcion + "' where recno='" + cRecno +"'"
ExecSql( cQuery )


Para un Select:

Code: Select all  Expand view  RUN

cQuery := "select documento, fecha, cliente from mytabla where recno ='" + cRecno + "'"

aArray := ExecSql( cQuery )


Este codigo es a manera de ejemplo. lo hice sobre la marcha.


Espero que esto te pueda ayudar

[ricardog]

Gracias pablo, lo intentare.

Saludos