RE: ¿Como Conseguir el username de windows o windows login/logon en lotus notes?
Responder

Comentarios:

      Hola Alejandro, te copio la respuesta que te he dado en otro foro,
      Te paso un script que te muestra el nombre de usuario de windows.
      Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (Byval lpBuffer As String, nSize As Long) As Long
      Dim lpBuff As String * 25
      Dim ret As Long
      Dim UserName As String
      ret = GetUserName(lpBuff, 25)
      UserName = Ucase(Left(lpBuff, Instr(lpBuff, Chr(0)) - 1))
      Messagebox username
      saludos
      jose
Respuestas


Re: Re: ¿Como Conseguir El Username De Windows O Windows Login/Logon En Lotus Notes?

Hola Alejandro, te copio la respuesta que te he dado en otro foro,
Te paso un script que te muestra el nombre de usuario de windows.
Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (Byval lpBuffer As String, nSize As Long) As Long
Dim lpBuff As String * 25
Dim ret As Long
Dim UserName As String
ret = GetUserName(lpBuff, 25)
UserName = Ucase(Left(lpBuff, Instr(lpBuff, Chr(0)) - 1))
Messagebox username
saludos
jose

Anonymous 11/11/2017 10:45:21 PM Responder

Re: ¿Como Conseguir El Username De Windows O Windows Login/Logon En Lotus Notes?

Hola Alejandro, te copio la respuesta que te he dado en otro foro,
Te paso un script que te muestra el nombre de usuario de windows.
Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (Byval lpBuffer As String, nSize As Long) As Long
Dim lpBuff As String * 25
Dim ret As Long
Dim UserName As String
ret = GetUserName(lpBuff, 25)
UserName = Ucase(Left(lpBuff, Instr(lpBuff, Chr(0)) - 1))
Messagebox username
saludos
jose

Anonymous 03/17/2015 12:36:56 PM Responder


Web Desarrollada por Juan Carlos Trigo Díaz
Optimizado para: 1024 x 768 pixels - Explorer > 6 Copyright © 2008