|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Declarações/Variáveis)
|
|
 |
Título da Dica: Saber as variáveis do ambiente
|
 |
|
|
|
Postada em 14/8/2000 por Webmaster
webmaster@vbweb.com.br
Para saber as variáveis do ambiente, inclusive o caminho do Windows, use ENVIRON
MsgBox Environ("winbootdir")'Windows (*)
MsgBox Environ("TMP")'Windows\Temp
MsgBox Environ("TEMP")'Windows\Temp
MsgBox Environ("PROMPT")'Prompt (**)
MsgBox Environ("COMSPEC")'COMMAND.COM (***)
MsgBox Environ("PATH")'OBJETO SELECIONADO (****)
MsgBox Environ("CMDLINE")'WIN (*****)
MsgBox Environ("windir")'Windows (*)
* = Caminho do Windows
** = Configuração do Prompt
*** = Command.com do Windows (ex.: C:\Windows\command.com)
**** = Mouse, CDROM, etc.
***** = Chamada do Windows pela linha de comando
>>>>> Se ENVIRON retornar "" é porque a variável do ambiente não foi encontrada.
>>>>> ENVIRON pode ser chamada com argumento numérico por um FOR
Ex.: Dim VarAmbiente() As String, I_Num As Integer
For I_Num = 1 To 10
If Environ(I_Num) <> "" Then
Redim Preserve VarAmbiente(I_Num)
VarAmbiente(I_Num) = Environ(I_Num)
End If
Next
|
|
|
|
|
