Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

Inclusão de trecho
advpl - deprecated
advpl - deprecated
nopaneltrue

Composition Setup
import.css=/download/attachments/3279126062824/newLayouttecnologia.css
Portuguese

Pagetitle
DiskSpace

DiskSpaceExpand ALL

Função:

DiskSpace

Retorna

o

número

de

bytes

que

estão

disponíveis

em

uma

determinada

unidade

de

disco

da

estação

remota.

Sintaxe

Bloco de código
collapsefalse
DiskSpace( [ nDrive ] )
--> nBytesFree

Parâmetros

/Elementos

 

Nome

Tipo

Descrição

Obrigatório

Referência

nDrive

Numérico

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

Retorno

Descrição

nBytesFree

(

numérico

)

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

Em

<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>
  • <nDrive> passado com 0 (opção padrão) nunca foi considerado, logo, retorna -1.

Exemplos

Bloco de código
languagecpp
themeEclipse
titleExemplo 1
linenumberstrue
collapsefalse
User Function Exemplo()
  // Retorna o tamanho em bytes do HD


  nRet := DISKSPACE( 3 ) // Resultado: 1356947456

Exemplo 2

  
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

  Else
   MsgStop('Unidade A: Verificada . '+str(nBytes_A,12)+' bytes livres.')

Endif

  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