La Web del Programador: Comunidad de Programadores
 
    Pregunta:  42222 - API PARA OBTENER EL APELLIDO DEL USUARIO DE WINDOWS
Autor:  David Sanchez Lopez
Hola, me gustaria saber como se obtienen los apellidos del usuario de windows con visual basic.
Con la api getUserName() solo obtengo el nombre

Gracias

  Respuesta:  SuNcO
Intenta con esto, a mi me funciona bien (son 3 lineas)

Private Sub Form_Load()

Set Registro = CreateObject("WScript.Shell")

MsgBox Registro.RegRead("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows NT\CurrentVersion\RegisteredOwner")

Set Registro = Nothing

End Sub

En Proyecto / Referencias checa si hay uno llamado OLE Automation activado. Esto es en Windows XP. En Windows anteriores no recuerdo cual es la clave donde se guardan esos datos