[ziadn]

I am doing some authentication against the Active Directory, but am (for some users only ) getting the following error:

Provider (0x80040E37)
Table does not exist.

More specifically:
- The page is accessed internally (company-wide)
- All employees are logged in to the same domain (but from different locations).
- The error is generated for some employees only, but I can't pinpoint any difference between those employees and others for which the page works.
- Anonymous access is disabled in IIS
- This is running under a W2K server using IIS 5.0

Any idea why it is working for some users but not for others?

Thanks,

Ziad


Here is the relevant part of the code:

Code:

 
DomainName = Application("myDomainName")
strDefaultNamingContext = Application("myDefaultNamingContext")
GALQueryFilter = "(&(&(&(& (mailnickname=*) (| (&(objectCategory=person)(objectClass=user)(!(homeMDB=*))(!(msExchHomeServerName=*)))(&(objectCategory=person)(objectClass=user)(|(homeMDB=*)(msExchHomeServerName=*)))(&(objectCategory=person)(objectClass=contact))(objectCategory=group)(objectCategory=publicFolder) )))(objectCategory=user)(postalCode=" + employee_id + ")))"
strQuery = "<LDAP://" & DomainName & "/" & strDefaultNamingContext & ">;" & GALQueryFilter & ";sAMAccountName;subtree"
Set oConn = CreateObject("ADODB.Connection")
oConn.Provider = "ADsDSOOBJECT"
oConn.Open "ADs Provider"
Set oComm = CreateObject("ADODB.Command")
oComm.ActiveConnection = oConn
oComm.Properties("Page Size") = 1000
oComm.CommandText = strQuery
Set rs = oComm.Execute

[ziadn]

One interesting note I forgot to mention: Despite getting the error, changes are saved!

Ziad

[sireesha]

Error Type 0x80040E37 Provider Table Does not Exist

The code was working fine earlier with windows 2000 now it is not working .

The server we had migrated from windows 2000 to windows 2003.

Is that is the Problem. Or We need to check any options in the Windows Active directory with respect to LDAP authentication or is with repect to the Security option

Here is the code:

Set objDomain = GetObject ("GC://rootDSE")
'set objDomain = GetObject ("LDAP://rootDSE")
objADsPath = objDomain.Get("defaultNamingContext")

Set objDomain = Nothing
Set con = Server.CreateObject("ADODB.Connection")

con.provider ="ADsDSOObject"
con.open "Active Directory Provider"

Set Com = CreateObject("ADODB.Command")
set rs=Server.CreateObject("ADODB.RecordSet")

Set Com.ActiveConnection = con
' Querying the User Profile
Com.CommandText ="select physicalDeliveryOfficeName, telephoneNumber,mail, sn, givenName from 'GC://"+ objADsPath +"' where sAMAccountname='"+Uid+"'"
Set rs = Com.Execute

Request any body please help me out ?