Tmysql

Tmysql

Postby ricardog » Fri Aug 01, 2008 8:27 pm

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
ricardog
 
Posts: 158
Joined: Tue Oct 11, 2005 3:10 pm

Postby pablovidal » Fri Aug 01, 2008 11:57 pm

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.
Saludos,

Pablo Alberto Vidal
/*
------------------------------------------------------
Harbour 3.2.0, Fivewin 17.02, BCC7
------------------------------------------------------
*/
User avatar
pablovidal
 
Posts: 401
Joined: Thu Oct 06, 2005 10:15 pm
Location: Republica Dominicana

Postby ricardog » Sat Aug 02, 2008 2:01 am

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.
ricardog
 
Posts: 158
Joined: Tue Oct 11, 2005 3:10 pm

Postby pablovidal » Sat Aug 02, 2008 11:25 am

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
Saludos,

Pablo Alberto Vidal
/*
------------------------------------------------------
Harbour 3.2.0, Fivewin 17.02, BCC7
------------------------------------------------------
*/
User avatar
pablovidal
 
Posts: 401
Joined: Thu Oct 06, 2005 10:15 pm
Location: Republica Dominicana

Postby ricardog » Sat Aug 02, 2008 2:44 pm

Gracias pablo, lo intentare.

Saludos
ricardog
 
Posts: 158
Joined: Tue Oct 11, 2005 3:10 pm


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 47 guests