DiskSpace

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

Árvore de páginas