WMI & ISS

26/09/2008 - 07:45 por Ricardo M. | Informe spam
hola,

Tengo el siguiente codigo en mi pagina ASP que me permite obtener el usuario
que está actualmente logueado en Windows:

On error resume Next
Set objWMIService =
GetObject("winmgmts:{impersonationLevel=impersonate}!\\.oot\cimv2")

Set colComputer = objWMIService.ExecQuery("Select * from
Win32_ComputerSystem")

For Each objComputer in colComputer
userlogonactual = objComputer.UserName

Next
'parse the username
userlogonactual = Mid(userlogonactual, InStr(userlogonactual, "\") + 1)


el problema es que al abrirse mi pagina en una sesion con privilegios de
administrador me muesto con exito el username actual en una caja de texto.
Pero cuando solicito la misma pagina al iniciar sesion de windows con un
usuario comun con privilegios limitados no me muestra el dato.

Espero su ayuda
 

Leer las respuestas

#1 Pablo A. Allois
29/09/2008 - 18:39 | Informe spam
Sacale el On error resume next y postea el error.
Seguramente es un access denied ... para ejecutar wmi se necesita permisos
de administrador.


Saludos!

"Ricardo M." wrote in message
news:
hola,

Tengo el siguiente codigo en mi pagina ASP que me permite obtener el
usuario
que está actualmente logueado en Windows:

On error resume Next
Set objWMIService > GetObject("winmgmts:{impersonationLevel=impersonate}!\\.oot\cimv2")

Set colComputer = objWMIService.ExecQuery("Select * from
Win32_ComputerSystem")

For Each objComputer in colComputer
userlogonactual = objComputer.UserName

Next
'parse the username
userlogonactual = Mid(userlogonactual, InStr(userlogonactual, "\") +
1)


el problema es que al abrirse mi pagina en una sesion con privilegios de
administrador me muesto con exito el username actual en una caja de texto.
Pero cuando solicito la misma pagina al iniciar sesion de windows con un
usuario comun con privilegios limitados no me muestra el dato.

Espero su ayuda

Preguntas similares