Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

« Anterior Versão 3 Próxima »

Função: File

Determina se existe arquivo no diretório ou path AdvPL padrão.

File ( < cArquivo>, [ nWhere], [ lChangeCase] ) --> lRet

 

NomeTipoDescriçãoObrigatórioReferência
cArquivoCaracterIndica o nome do arquivo ou diretório+arquivo que será procurado. Além disso, são aceitos os caracteres curingas (* e ?) e diretórios absolutos e relativos.X 
nWhereNuméricoIndica o local onde será realizada a procura do arquivo. Sendo: 0 = O acesso depende do path (Quando for um path relativo a procura será no Application Server; caso seja um path absoluto, a procura será no Smart Client). 1 = A procura será realizada no diretório de instalação do Application Server. 2 = A procura será realizada no diretório de instalação do Smart Client.  
lChangeCaseLógicoIndica se, verdadeiro (.T.), a busca do nome do arquivo deve ser em letra minúscula; caso contrário, falso (.F.), a busca será realizada conforme foi escrito. Conteúdo padrão = .T.  

 

lRet
    ()
  • Retorna verdadeiro (.T.), se o arquivo existir; caso contrário, falso (.F.).

Esta função é utilizada para determinar se é encontrado algum arquivo que corresponde a um padrão de especificação de arquivo. Essa função procura no diretório especificado e em um path explicitamente especificado. Caso não seja especificado o path, a função pesquisa no diretório padrão corrente e depois no path AdvPL. Em nenhuma circunstância o path DOS é pesquisado. Além disso, a função não reconhece arquivos de sistemas ou escondidos em sua pesquisa.

//Exemplo 1
File ("C:\garbage\test.txt", 1 ,.T.) // Resultado: .T.
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//Exemplo 2
//Nos exemplos abaixo, testamos a existência de um determinado arquivo na estação local e no diretório definido como RootPath do ambiente (Environment) no Servidor.
FILE("teste.dbf") // Verifica no diretório corrente do servidor se existe o arquivo teste.dbf
FILE("\SIGAADV\TESTE.dbf") // Verifica no diretório Sigaadv do servidor se existe o arquivo teste.dbf
FILE("C:\TEMP\TESTE.dbf") // Verifica no diretório Temp do cliente (Remote) se existe o arquivo teste.dbf
//Observação : Caso a função File() seja executada em Job (programa sem interface remota) , sendo passado um caminho absoluto de arquivo ( exemplo c:\teste.txt) , a função retornará .F. e FERROR() retornará -1 )
Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server

 

  • Sem rótulos