TOTVSTEC

Árvore de páginas

Documentação de item não suportado ou descontinuado.

Retorna o número de bytes que estão disponíveis em uma determinada unidade de disco da estação remota.

Sintaxe

DiskSpace( [ nDrive ] )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

nDrive

numérico

Indica o número da unidade de disco (drive). Sendo: 0=Unidade de disco atual da estação (Padrão), 1=Drive A: da estação remota, 2=Drive B da estação remota, 3=Drive C: da estação remota, 4=Drive D: da estação remota e etc.

 

 

Retorno

Nome

Tipo

Descrição

nBytesFree

numérico

Retorna o número de bytes que estão disponíveis na unidade de disco. <br>Em caso de erro, retorna -1.

Observações

  • Esta função obtém a informação sempre relativa à estação em que o Smart Client está sendo executado.
  • A função funciona somente na versão Windows do SmartClient.
  • Caso essa função seja executada através de JOB (Processo isolado no servidor, sem interface remota), ou seja, passado um parâmetro de unidade de disco inexistente ou indisponível, o retorno será -1.
  • O parâmetro <nDrive> passado com 0 (opção padrão) nunca foi considerado, logo, retorna -1.

Exemplos

Exemplo 1
User Function Exemplo()
  // Retorna o tamanho em bytes do HD
  nRet := DISKSPACE( 3 ) // Resultado: 1356947456  
Return

User Function Exemplo2()
  // No exemplo abaixo, obtemos os espaços em disco do drive A:
  // da estação local, verificando se houve sucesso na operação.
  
  nBytes_A := DISKSPACE( 1 ) // Retorna o espaço disponivel no drive A: local ( remote ).
  
  If nBytes_A == -1
   MsgStop('Unidade A: não está disponível ou não há disco no Drive')
  ElseIf nBytes_A < 8192
   MsgStop('Não há espaço disponível no disco. Substitua o disco na Unidade A:')
  Else
   MsgStop('Unidade A: Verificada . '+str(nBytes_A,12)+' bytes livres.')
  Endif
Return

Abrangência

Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server

  • Sem rótulos