Skip Navigation Links
Novas Tecnologias
Ferramentas Adicionais
Ferramentas Adicionais


Dica No :
153
Assunto : Visual Basic
Titulo: Acessando variáveis de ambiente

Gostou do texto ? Vote e dê sua opinião! Pontuação atual :

Translate this page now :






Adicione aos Favoritos!
BlogBlogs Rec6 Linkk Ueba Technorati Delicious DiggIt! StumbleUpon



O DOS já permitia que definissemos variáveis no sistema operacional que poderia ser acessadas por qualquer aplicação. Essas variáveis eram definidas no autoexec através da instrução set.

Os sistemas operacionais atuais continuam trabalhando com variáveis de ambiente, que podem ser configuradas através das propriedades do meu computador ou, ainda, no autoexec (9x).

Para ver as variáveis de ambiente que existem você pode abrir uma janela DOS e utilizar a instrução set. O SO listará todas as variáveis disponíveis. Máquinas contidas em domínios possuem variáveis criadas automaticamente que identificam o domínio e o usuário, por exemplo.

Para acessar essas variáveis de ambiente devemos utilizar a função Environ$. Passando o nome de uma variável de ambiente essa função nos devolve o seu valor.

Veja :

MsgBox Environ$("OS")

Para listar todas as variáveis de ambiente você pode fazer um loop com um contador até encontrar uma variável vazia. Veja :


Private Sub Form_Load()
Dim EnvString As String
Dim Indx As integer
Indx = 1
Do
EnvString = Environ(Indx)
msgbox Indx & " - " & EnvString
Indx = Indx + 1
Loop Until EnvString = ""
End Sub

O contador é incrementado a cada repetição, pegando a próxima variável até que ache uma vazia.


Nome :
E-mail:
Comentarios :
 
 
Os Últimos Comentários
data: 11/28/2017 7:23:00 AM
nome: oRoiVNCtFo
email: jimosanil0c@hotmail.com
comentário:
ZLDDek http://www.LnAJ7K8QSpfMO2wQ8gO.com

 1  
Dicas
Dica do Dia
Receba Dicas Por Email
E-mail :  
 


 (help)
Aceito receber informativos do devASPNet, informações de eventos e treinamentos

Veja Quais Informativos Você Receberá

Pesquisar Dicas
Pesquisar Artigos, Dicas e Noticias

Banco de Dados
Algumas Entrevistas
Links Importantes

Búfalo Informática, Treinamento e Consultoria
R. Alvaro Alvim, 37/920 Centro - Cinelândia - Rio de Janeiro Cep: 20031-010
Tel : (21) 2262-1368 (21) 9240-5134 E-mail : Contato@bufaloinfo.com.br