Note that there are some explanatory texts on larger screens.

plurals
  1. POLDAP Error in IIS7.5 while using windows Authentication
    text
    copied!<p>I'm having facing problemind with LDAP, its bit strange one. My Web server is IIS7.5(windows server 2008 R2). Its configured to use windows Authentication. I've pasted my asp page below.</p> <p>Web browser is IE8, Have added the website to intranet zone and enabled send, user details if intranet zone in security tab->custom level. Intigrated windows authentication is enabled in advanced tab.</p> <p>Everything works fine for 20minutes(Session time setiing and other default time out settings are for 20min). After 20minutes I get it ASP runtime error. Which says method or property memberOf for object objUser is not supported. When I get below error I change the Authentication type to basic Authentication. It prompts for windows credentials and works fine. After that I again revert back to windows authentication. And it works for sometime.</p> <p>Not sure if IIS7.5 id configured with basic authentication enabled and IE8 configured as above, still why it prompts for windows Credential. Though windows Authentication mode doesn't prompt for credential, It works fine but for certain period. Can any one explain me why this strange behaviour and solution to fix this one? </p> <pre><code>&lt;%@ LANGUAGE="VBSCRIPT" %&gt; &lt;% Option Explicit Dim oADSysInfo Dim objUser Dim strGroupData Dim strUserDN Dim arrGroups Dim strGroup Dim wsObject Dim netSys Dim strUsrDomain strGroupData = "" Set wsObject = CreateObject("WScript.Shell") Set netSys = CreateObject("WScript.Network") strUsrDomain = netSys.UserDomain Set oADSysInfo = CreateObject("ADSystemInfo") If err.number &lt;&gt; 0 Then 'getLDAPGroupInfo = strGroupData 'wsObject.popup("Error"&amp; e.decription) 'Exit Function End If strUserDN = oADSysInfo.UserName Set objUser = GetObject("LDAP://"&amp; strUserDN) arrGroups = objUser.memberOf If IsEmpty(arrGroups) Then 'Wscript.Echo "Member of no groups" ElseIf (TypeName(arrGroups) = "String") Then 'Wscript.Echo "Member of group " &amp; arrGroups strGroupData = arrGroups Else For Each strGroup In arrGroups strGroupData = strGroupData &amp; "," &amp; strGroup Next 'strGroupData = arrGroups End If Response.Write(strGroupData) %&gt; </code></pre>
 

Querying!

 
Guidance

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload