Clipper On Line • Ver Tópico - como Saber se o comando USE vai ou não abrir o Arquivo DBF?

como Saber se o comando USE vai ou não abrir o Arquivo DBF?

Discussão sobre a linguagem CA-Clipper.

Moderador: Moderadores

 

como Saber se o comando USE vai ou não abrir o Arquivo DBF?

Mensagempor juniorcamilo » 21 Fev 2017 16:57

Boa tarde!!

tem algum jeito de saber se o arquivo DBF esta corrompido ou somente leitura antes de usar o USE?
Avatar de usuário

juniorcamilo
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 343
Data de registro: 10 Nov 2006 08:12
Cidade/Estado: Pará
Curtiu: 29 vezes
Mens.Curtidas: 2 vezes

como Saber se o comando USE vai ou não abrir o Arquivo DBF?

Mensagempor alxsts » 21 Fev 2017 18:55

Olá!

Veja se este tópico te ajuda: verificar integridade do dbf ???
[]´s
Alexandre Santos (AlxSts)
alxsts
Colaborador

Colaborador
 
Mensagens: 2943
Data de registro: 12 Ago 2008 15:50
Cidade/Estado: São Paulo-SP-Brasil
Curtiu: 21 vezes
Mens.Curtidas: 248 vezes

como Saber se o comando USE vai ou não abrir o Arquivo DBF?

Mensagempor juniorcamilo » 22 Fev 2017 09:15

Obrigado alxsts!!
Avatar de usuário

juniorcamilo
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 343
Data de registro: 10 Nov 2006 08:12
Cidade/Estado: Pará
Curtiu: 29 vezes
Mens.Curtidas: 2 vezes

como Saber se o comando USE vai ou não abrir o Arquivo DBF?

Mensagempor juniorcamilo » 22 Fev 2017 09:46

alxsts

só mais uma duvida :
* eu so posso usar o FClose( nHandle ) somente se FError == 0?
Avatar de usuário

juniorcamilo
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 343
Data de registro: 10 Nov 2006 08:12
Cidade/Estado: Pará
Curtiu: 29 vezes
Mens.Curtidas: 2 vezes

como Saber se o comando USE vai ou não abrir o Arquivo DBF?

Mensagempor alxsts » 22 Fev 2017 10:41

Olá!

Sim, se o valor de FError() se referir à operação de abertura do arquivo em questão. FError() vai sendo alterado à medida que algumas operações forem sendo executadas.

Quando a operação de abertura de arquivo é bem sucedida, FOpen() retorna um file handler, que é o numero do arquivo perante o sistema operacional. Este número pode estar entre 0 e 65535. Se falhar, FOpen() retornará -1.

Eu prefiro verificar se o file handle é diferente de -1 e não o FError().
#include "Fileio.ch"

Function Foo()
   LOCAL nHandle
   //
   nHandle := FOPEN("Temp.txt", FO_READWRITE + FO_SHARED)   
   //
   IF nHandle == -1
      Alert( 'Mensagem' )
      RETURN .F.
   ENDIF

   //
   //   Outras operações
   //

   FClose( nHandle )

RETURN .T.
[]´s
Alexandre Santos (AlxSts)
alxsts
Colaborador

Colaborador
 
Mensagens: 2943
Data de registro: 12 Ago 2008 15:50
Cidade/Estado: São Paulo-SP-Brasil
Curtiu: 21 vezes
Mens.Curtidas: 248 vezes

como Saber se o comando USE vai ou não abrir o Arquivo DBF?

Mensagempor juniorcamilo » 23 Fev 2017 09:07

obrigado mais uma vez!!
Avatar de usuário

juniorcamilo
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 343
Data de registro: 10 Nov 2006 08:12
Cidade/Estado: Pará
Curtiu: 29 vezes
Mens.Curtidas: 2 vezes




Retornar para CA-Clipper

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 3 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro