Obtener nombre de usuario

GvAp0
Habitual

Desconectado

Mensajes: 196

Obtener nombre de usuario

« en: Febrero 19, 2007, 11:19:56 »


	En línea

Necesitas ser usuario para ver los enlaces Crear Usuario Hacer Sesion

Hendrix
Visitante

Re: Obtener nombre de usuario

« Respuesta #1 en: Febrero 19, 2007, 11:45:53 »

Necesitas ser usuario para ver los enlaces Crear Usuario Hacer Sesion

Creo ke esto te servira..... Wink


	En línea

GvAp0
Habitual

Desconectado

Mensajes: 196

Re: Obtener nombre de usuario

« Respuesta #2 en: Febrero 19, 2007, 12:20:23 »

Me funciona bien pero me obtiene el nombre propietario y yo en cuenta de susario tengo como nombre puesto GvAp0, el nombre de propietario debio ser el q se metio cuando se instala el sistema en mi ordenador, pero no se como obtener ese nombre de cuenta pero de todos modos gracias.


	En línea

Necesitas ser usuario para ver los enlaces Crear Usuario Hacer Sesion

-Erick-
Gran Colaborador

Desconectado

Mensajes: 1500

Re: Obtener nombre de usuario

« Respuesta #3 en: Febrero 19, 2007, 12:34:48 »

Mira un ej que uso yo,para el nombre de usuario,de propietario y para saber el SO:

Código:

Private Sub Command1_Click()
Dim yo As Object
Set yo = CreateObject("wscript.shell")
MsgBox yo.regread("HKEY_LOCAL_MACHINE\SOFTWARE\MIcrosoft\windows nt\currentversion\winlogon\Altdefaultdomainname")
MsgBox yo.regread("HKEY_LOCAL_MACHINE\SOFTWARE\MIcrosoft\windows nt\currentversion\winlogon\Altdefaultusername")
MsgBox yo.regread("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Productname")
End Sub


	En línea

Páginas: [1]

Comunidad Underground Hispana \| Programacion \| Programación \| Visual Basic y Net (Moderador: ANYD00M) \| Tema: Obtener nombre de usuario	« anterior próximo »

	Bienvenido(a), Visitante. Favor de ingresar o registrarse. ¿Perdiste tu email de activación? - Diciembre 02, 2008, 03:07:00