Descrição
ListDrives [AS] - Retorna as unidades (drives), e/ou seus respectivos tipos, da máquina que está executando o TOTVS | Application Server ou o TOTVS | SmartClient.
|
Sintaxe
| ListDrives( <aUnits>, <aTypes>, <nWhere> ) |
Parâmetros
| Par |
Nome |
Tipo |
Descrição |
Default |
Obg |
Ref |
01
|
aUnits |
Array |
Retorna todas as unidades da máquina |
|
X |
|
| 02 |
aTypes |
Array |
Retorna o tipo das unidades listadas |
|
X |
|
| 03 |
nWhere |
Numérico |
Indica se será listado da máquina do TOTVS | Application Server ou do TOTVS | SmartClient |
|
X |
|
Retorno
| Retorno |
Tipo |
Descrição |
| lRet |
Boolean
|
Retorna .T. se conseguiu listar o que foi solicitado; caso contrário, retorna .F.
|
Exemplo
#INCLUDE "TOTVS.CH"
User Function ListDrives()
Local aUnits := {}
Local aTypes := {}
Local nI := 0
ListDrives( @aUnits, @aTypes, 0 )
For nI := 1 to Len( aUnits )
Conout( aUnits[nI] + ' - ' + cValtoChar( aTypes[nI] ) )
Next nI
Return( Nil )
Resultado
Informações adicionais
|
Caso <nWhere> tenha um valor inválido, a função retornará um erro AdvPL com a mensagem "Invalid nWhere parameter, should be 0 or 1"
|
|
Caso ocorra um erro, um warning aparecerá no console do TOTVS | Application Server com a mensagem "listDrives() failed – " seguido da mensagem de erro
|
|
Caso haja mais de 1024 drives, a função retornará .F. e mostrará um warning no console do TOTVS | Application Server com a mensagem "listDrives() failed – Too many logical drives."
|
|
Se <nWhere> for igual 0 e não for utilizado Application Server Windows, a função retornará .F. e mostrará no console do TOTVS | Application Server um warning com a mensagem "Warning – listDrives not available on APPServer Unix/Linux"
|
|
Se <nWhere> for igual 1 e não for utilizado SmartClient Windows (QT), a função retornará .F. e mostrará no console do TOTVS | Application Server um warning com a mensagem "Warning – listDrives not available on Smartclient (RemoteType=i)", onde i é o retorno de GetRemoteType
|
NWHERE
|
0
|
Application Server
|
|
1
|
SmartClient/td>
|
ATYPES
|
0
|
Tipo de drive não conhecido
|
|
1
|
Unidade inválida
|
|
2
|
Mídia removível (pen drive, disquete)
|
|
3
|
Drive Fixo (Hard Disk local)
|
|
4
|
Drive remoto (Unidade mapeada)
|
|
5
|
CD-ROM/DVD-ROM
|
|
6
|
RAM Drive
|
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎
