Ejecutar un archivo VBS dentro de una ASP

[Nochero]

Proba entonces asi, pasando de VBS a ASP :

:: GETUSER.ASP :: ojo! debe ser . ASP

<%
Dim S
Dim W

Set W = WScript.CreateObject("WScript.Network")
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
Set WScript = Nothing

Response.Write S
%>

a ver si asi te sirve, saludos !