My intranet site uses the following bit of ASP utilising the WinNT ADsPath to pick up the user requesting the page:
sLogonUser = Request.ServerVariables("Logon_User")
sDomain = Mid(sLogonUser, 1, Instr(1, sLogonUser, "\") - 1)
strUserName = Mid(sLogonUser, Instr(1, sLogonUser, "\") + 1)
Set strUser = GetObject("WinNT://" & sDomain & "/" & strUserName & ",user")
strFullName = strUser.FullName
This was working fine until a few changes (listed below) occurred on the network and now everyone receives this error:
Microsoft VBScript runtime (0x800A0046) Permission denied: 'GetObject'
Changes on the network around the same time as the error were:
Proxy un-installed (was located on same server as IIS) and latest security patches added
2 new domain controller servers added
Both IIS and Active Directory are located on win 2k servers.
All servers are on same domain.
IIS is set to integrated windows authentication.
Since the page hasn’t worked I’ve given “domain\users” administrator rights on both the IIS and AD servers and also full control on the wwwroot directory (overkill I know but trying to rule out everything) and still error occurs.
The only time this page works is when I access the page on the web server itself.
I've looked through the similar problems on this site, and I've tried all suggestions, but I'm still getting the same error. Any help would be much appreciated.