Descrição:
Como posso obter o nome do computador onde está rodando a aplicação, em tempo de execução?
Solução:
Para isso, deve-se utilizar o seguinte script:
Set WshNetwork = CreateObject(“WScript.Network”)
MsgBox WshNetwork.ComputerName ‘Mostra o nome do Computador.
‘MsgBox WshNetwork.UserDomain ‘Mostra o nome do Domínio.
‘MsgBox WshNetwork.UserName ‘Mostra o nome do Usuário.
Através desse script, também é possível obter o nome do usuário logado, bem como a qual domínio ele está logado.
NOTA: A partir da versão 3.5, é possível usar o método GetComputerName(), do E3Globals, que realiza exatamente a mesma tarefa.
Exemplo: MsgBox GetComputerName()
