Pregunta: | 47413 - CONOCER EL USUARIO EN XP CON VISUAL BASIC |
Autor: | Antonio Álvarez |
En Visual Basic y con XP
¿Como se puede conocer qué usuario está usando la máquina? Necesito conocer quién es el usuario para luego darle permisos concretos en mi programa. Gracias de antemano |
Respuesta: | Boluarte Huamani Palomino |
Option Explicit
Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long Private Sub Form_Load() Dim strUserName As String strUserName = String(100, Chr$(0)) GetUserName strUserName, 100 strUserName = Left$(strUserName, InStr(strUserName, Chr$(0)) - 1) MsgBox strUserName End Sub |