bom dia
alguem usa função para salvar dbfs cdx posição dos registros etc e depois restaurar ?
poderia disponibilizar ?
parece que vi a UNS bons tempo aqui no forun +++ nunca usei
funciona SEM problema ou tem restrições ?
cpaivasistemas@gmail.com
paiva_sistemas skyper
salvar dbf/cdx recno() etc e depois restaurar
Moderador: Moderadores
-
paiva_dbdc
- Usuário Nível 3

- Mensagens: 342
- Registrado em: 12 Nov 2012 09:58
- Localização: uberlandia mg
- JoséQuintas
- Administrador

- Mensagens: 20415
- Registrado em: 26 Fev 2007 11:59
- Localização: São Paulo-SP
- Curtiram: 1 vez
salvar dbf/cdx recno() etc e depois restaurar
Talvez possa pensar em multithread.
Em multithread isso nem é necessário.
Em multithread isso nem é necessário.
José M. C. Quintas
Harbour 3.2, mingw, multithread, gtwvg, fivewin 25.12, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui), (hmg3), (hmg extended), (oohg), PNotepad, ASP, (Linux/Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"
https://github.com/JoseQuintas/
Harbour 3.2, mingw, multithread, gtwvg, fivewin 25.12, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui), (hmg3), (hmg extended), (oohg), PNotepad, ASP, (Linux/Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"
https://github.com/JoseQuintas/
- Vander
- Usuário Nível 3

- Mensagens: 214
- Registrado em: 23 Jul 2004 01:43
- Localização: João Monlevade - MG
salvar dbf/cdx recno() etc e depois restaurar
Tente assim:
Se não me engano foi o Rochinha que postou algo parecido.
Não realizei mitos testes, mas tenta ai.
Código: Selecionar todos
Para salvar
_ALI_AS := Alias()
_IND_CE := Indexord()
_REG_AT := Recno()
Para restaurar
SELECT &_ALI_AS
ORDSETFOCUS(Indexord())
GO _REG_AT
Não realizei mitos testes, mas tenta ai.
HbMake v1.17
xHarbour build 0.99.70 Intl. (SimpLex)
Borland C++ 5.5.1
fivewin 6.12 (FREE)
Workshop 4.5
MEdit
xHarbour build 0.99.70 Intl. (SimpLex)
Borland C++ 5.5.1
fivewin 6.12 (FREE)
Workshop 4.5
MEdit