TMYSQL Modificacion build 2010-06-28

Se ha modificado a petición de Ariel (argentina) el comportamiento del método Seek(), quedando de la siguiente manera.

oQry := oServer:Query( "SELECT * FROM clientes" )

Pensando que podemos hacer las busquedas así:

lFound := oQry:seek( "cliente = '20' )
lFound := oQry:seek( "20", "cliente" )

aReturn := oQry:seek( "cliente='20'",, {"nombre", "cliente", "direccion" }

AQUI LA DESCARGA

saludos

pd. servido Ariel

TMYSQL Modificacion build 2010-06-27

Amigos,

Aquí una actualización de la tmysql a la fecha del título, las modificaciones son:

Para ver la fechal del build de la lib
? oServer:cBuild

+ Modificación del método save()
No grababa, tenia un pequeño problema, detectado por Luis

+ Se adiciona la funcion setxbrowseold( oBrw, oQry, aFields )
Para versiones de FWH antigüas

oQry := oServer:Query( "SELECT * FROM clientes" )
El formato de aFields

aFields := { ;
"NAT", ;
{ "codigo", "Mi clave" }, ;
{ "nombre", "Nombre de mi clave" } ;
}

Bueno, espero sea de utilidad.

Como siempre AQUI LA DESCARGA

Quedo pendiente de los comentarios.

saludos

Novedades en :Seek()

Hola a todos,

Dejamos a su disposicion una nueva y rapida forma de verificar un dato dentro de una tabla cualquiera independiente del query en curso.

oServer:Seek( cTable, cQuery ) -> lFound


Ej.

lReto:= oServer:Seek( "clientes", "codigo = 123456" )


Aqui la lib : http://www.box.net/shared/lut1rt9tyc

Espero les sirva.
Saludos.