Categorias

Pegar Variáveis de Ambiente do Windows via ASP

Publicado por Gabriel Fróes

Com esta função é possível resgatar as variáveis de ambiente do Windows (Environment Variables) existentes no servidor onde este código irá rodar.

Estas variáveis de ambiente são as mesmas acessíveis com o comando SET na janela do “Prompt de Comando”.

Para obter a lista de variáveis de ambiente padrões disponíveis visite a página: https://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/7544483a-b1b3-4b00-bb0e-0d260f1b099a.asp

 "PROCESS" Then
        TipoEV = "SYSTEM"
    End If
    
    'Criação de objetos
    Set objWSShell    = Server.CreateObject("WScript.Shell")
    
    'Pegando a variável de ambiente
    Set objVariavel    = objWSShell.Environment(TipoEV)
    ValorVariavel    = objVariavel(Variavel)
    
    'Retornando a função
    getEnviromentVariable = ValorVariavel
    
    'Destruindo os objetos
    Set objVariavel = Nothing
    Set objWSShell    = Nothing
End Function
%>
Tags: