Preciso Saber O Nome Da Maquina...

[Dead-Drunk]

Preciso de alguma coisa q me de o nome da maquina em que o exe esta logado...

c alguém puder me ajudar agradeço....

PS. eu dei uma olhada num post anterior q trata o mesmo asssunto, onde o Graymalkin passou um link... mas... não consegui encontrar a API... então c alguém puder dar um help + explicito...

vlw

[Joaozava]

Faça Assim:

(General declarations)

Private Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long
Dim NomedoPC As String

(em um botaõ, por exemplo)

NomedoPC = Space(30)
GetComputerName NomedoPC, 30

Até...

[Dead-Drunk]

Funcionou direitinho... valeu cara...