Este código lo tengo en un archivo llamado GETUSER.VBS:
Set W = WScript.CreateObject("WScript.Network")
Dim S
S = "Domain:" + vbTab + vbTab
S = S + W.UserDomain
S = S + vbCr + "Computer:"
S = S + vbTab + W.ComputerName
S = S + vbCr + "User name:"
S = S + vbTab + W.UserName
WScript.Echo S
Lo ejecuto con dos clicks desde sistema operativo y me regresa:
Computer, Domain y User Name.
Lo que quiero es ejecutarlo desde una ASP y tomar esos datos para ponerlos en una BD, así dentro una Intranet puedo saber quién votó en una encuesta o quién accesó a determinada aplicación. Ya se obtener la IP pero no es suficiente.
Saludos