Ramon, que compilador usas, HARBOUR ó XHARBOUR?
Voy hacer un ejemplo de como hago, ok?
És posible enviar este BD SATINDEX.DBF para testes?
Use el MegaUpload, si?
Regards, saludos.
Ramon, que compilador usas, HARBOUR ó XHARBOUR?
Voy hacer un ejemplo de como hago, ok?
És posible enviar este BD SATINDEX.DBF para testes?
Use el MegaUpload, si?
Regards, saludos.

Muchas gracias, João. El compilador que uso es Harbour. Probaré tu ejemplo.
Muy agradecido, João.
Saludos
Hola karinha.
Tu viendo tu ejemplo de backup y Restore, excelente, de casualidad no tiene uno pero de Mysql. O un ejemplo.
Adolfredo Martinez wrote:Hola karinha.
Tu viendo tu ejemplo de backup y Restore, excelente, de casualidad no tiene uno pero de Mysql. O un ejemplo.
REDEFINE GET oGet VAR cBusca ID 101 OF oDlg UPDATE FONT oFont1 when .f.
cExi_Suc:=xServer:Query("SELECT * FROM exi_suc ORDER BY ma_desc")
cExi_Suc:GoTop()
oLbx:bKeyDown := {|nKey| (Search(nKey,@cBusca,oDlg,oLbx,"ma_desc"),oLbx:Refresh(),oLbx:Refresh(),oGet:Refresh() )}
STATIC FUNCTION Search(nKey,cBusca,oDlg,oLbx,oOrden)
*--------------
Local oTabla:="exi_suc"
LOcal cQuery
If nkey=8
cbusca:= SubStr(cbusca,1,Len(cbusca)-1)
cQuery:="SELECT * FROM "+oTabla+" WHERE "+oOrden+" LIKE '"+UPPER(cBusca)+"%' ORDER BY "+oOrden
cExi_Suc:=xServer:Query(cQuery,.T.)
Else
cbusca :=cbusca + Upper(chr(nkey))
cQuery:="SELECT * FROM "+oTabla+" WHERE "+oOrden+" LIKE '"+UPPER(cBusca)+"%' ORDER BY "+oOrden
cExi_Suc:=xServer:Query(cQuery,.T.)
If cExi_Suc:Lastrec() == 0
cbusca:=left(cbusca,len(cbusca)-1)
cQuery:="SELECT * FROM "+oTabla+" WHERE "+oOrden+" LIKE '"+UPPER(cBusca)+"%' ORDER BY "+oOrden
cExi_Suc:=xServer:Query(cQuery,.T.)
Endif
Endif
SetDolphin( oLbx, cExi_Suc,.f. )
cExi_Suc:Refresh()
oLbx:Refresh(.t.)
oLbx:SetFocus()
return nilAdolfredo Martinez wrote:Hola karinha.
Tu viendo tu ejemplo de backup y Restore, excelente, de casualidad no tiene uno pero de Mysql. O un ejemplo.
Hola amigos del forum.
JoseAlvarez estuve viendo el video, de tu copia de seguridad en Mysql, sera que puedes compartir esas lineas de codigo.
Gracias por la atencion prestadas
Adolfredo Martinez wrote:Hola amigos del forum.
JoseAlvarez estuve viendo el video, de tu copia de seguridad en Mysql, sera que puedes compartir esas lineas de codigo.
Gracias por la atencion prestadas
José tb tuve ese problema de lentitud con dbf , me imagino que es porque recorre por toda la red la data almacenada en el servidor por eso salte a sql y ahora las búsquedas son normales ya que se aplica a un recordset que es una copia de la tabla de tu servidor pero que se ubica en la memoria del terminal, así lo entiendo yo