Requirements

• Install Novell NetWare Server.
  
• Install "Gateway and Client Services for NetWare".
  
• Install ADSI 2.5 or higher (http://www.microsoft.com/adsi). Note you must install ADSI after you install the Gateway and Client Service for NetWare.

Connecting to a NetWare Server

If you have not yet done so, use the net use command to log on the NetWare Server.

For example:

net use \\nwserver /U:mydom\jsmith

IADsOpenObject::OpenDSObject is not supported in the current release of the NWCOMPAT provider.

adsPathName = "NWCOMPAT://" & serverName
Set cont = GetObject(adsPathName)

Enumerating a Container

For Each obj In cont
    Debug.Print obj.Name & " (" & obj.Class & ")"
Next

Object Creation

adsPath = "NWCOMPAT://" & serverName
Set cont = GetObject(adsPath)
Set usr = cont.Create("user", "alicew")
usr.SetInfo

Attribute Retrieval and Modification

objPath = "alicew,user"
adsPath = "NWCOMPAT://" & serverName & "/" & objPath
Set usr = GetObject(adsPath)
usr.FullName = "Alice I. Wonderland"
usr.SetInfo

Debug.Print usr.FullName

Searching

Searching is not supported in NWCOMPAT. You can, however, use the IADsContainer::put_Filter to limit the type of object classes to be included in the enumeration.

'----Filtering----

adsPath = "NWCOMPAT://" & serverName
Set con = GetObject(adsPath)
con.Filter = Array("user", "group") 'Show user and group

For Each acct In con
    Debug.Print acct.Name & " (" & acct.Class & ")"
Next

source code \interopt\netware