DiskSpace

DiskSpace ( [ nDrive] ) --> nBytesFree

nBytesFree()
• Retorna o número de bytes que estão disponíveis na unidade de disco.

• Esta função obtém a informação sempre relativa à estação em que o Smart Client está sendo executado.
• 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.

//Exemplo 1// Retorna o tamanho em bytes do HDDISKSPACE( 3 ) : Resultado: 1356947456//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////Exemplo 2//No exemplo abaixo, obtemos os espaços em disco da unidade de disco da estação local e do drive A: da estação local, verificando se houve sucesso na operação.nBytesLocal :=  DISKSPACE( ) // Retorna o espaço disponivel na unidade de disco local ( remote ).IF      nBytesLocal < 1048576   MsgStop('Unidade de Disco local possui menos de 1 Mb livre.')Else   MsgStop('Unidade      de disco local possui '+str(nBytes_A,12)+' bytes livres.')EndifnBytes_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