none
Identificar el grupo de trabajo de mi pc desde vb.net RRS feed

  • Pregunta

  • Buenos dias Estimados Todos,

    vengo por aquí para que me brinden un gran apoyo estaré agradecido por su ayuda.

    bueno estoy trabajando un sistema en vb.net y sql server 2014

    Y QUIERO IMPLEMENTAR UNA SEGURIDAD CUANDO EL USUARIO SE LOGEE Y PONER ESTÁTICAMENTE EN VISUAL EL NOMBRE DE ESTE GRUPO DE TRABAJO "GRUPO_X" Y SI EL USUARIO NO ESTÁ EN ESE GRUPO DE TRABAJO QUE NO ENTRE AL SISTEMA.

    De ante mano muchas gracias por su apoyo.

    Saludos.

    viernes, 26 de enero de 2018 17:00

Respuestas

  • Hola

    Encontré una respuesta para una pregunta similar a la tuya, que te puede servir para tu requerimiento, échale un ojo y evalúa su solución:

    * código extraído de esa pregunta * : Obtener el nombre del grupo de trabajo

    Imports System.Management
    
    Public Class Class1
    
        Public Function ObtenerGrupoTrabajo() As String
    
            Dim consulta As New SelectQuery("Win32_ComputerSystem")
    
            Dim nombre As String = ""
    
            Dim buscador As New ManagementObjectSearcher(consulta)
    
            Dim obj As New ManagementObject()
    
            For Each obj In buscador.Get()
    
                If (Convert.ToBoolean(obj("partofdomain"))) Then
    
                    nombre = obj("WorkGroup")
    
                Else
    
                    nombre = obj("WorkGroup")
    
                End If
    
            Next
    
            Return nombre
    
        End Function
    
    End Class

    Evalúa las respuestas del link

    Saludos


    Brayan De la Cruz
    Lima - Perú


    viernes, 26 de enero de 2018 17:52