Visual Basic - Capturar nombre de Pc en Red Local

Life is soft - evento anual de software empresarial
 
Vista:

Capturar nombre de Pc en Red Local

Publicado por Rolando (20 intervenciones) el 10/03/2002 12:08:55
Como puedo capturar el nombre o identificacion de un PC conectado a una red local? Gracias
Rolando
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Usando la Api GetComputerName

Publicado por Martín (8 intervenciones) el 10/03/2002 17:48:17
Para conocer el nombre de la PC -tanto en red como no- se puede usar la api GetComputerName

En un módulo o en la sección declaraciones de un form:

Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long
(todo en la misma línea)

y ahora la función NombrePC llama a la api y nos devuelve el nombre de la máquina

Function NombrePC()
Dim Cadena As String
Dim Retorno As Long

Cadena = Space(255)

Retorno = GetComputerName(Cadena, 255)
NombrePC = Left(Cadena, InStr(1, Cadena, vbNullChar) - 1)
End Function

espero que ésto sea lo que estabas buscando
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Usando la Api GetComputerName. LO voy a probar

Publicado por rolando (20 intervenciones) el 12/03/2002 08:35:54
lo voy a probar . gracias
Rolando
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar