ListDrives [AS]
Autor: Eurai Criado: 01/01/2016 Atualizado: 26/04/2025Descriçã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! 😎
Discussão (0)
Sem comentários ainda
Realize o LOGIN no site para poder comentar