Создание пользователей с помощью поставщика LDAP ADSI
С помощью поставщика LDAP ADSI можно создать только глобальную учетную запись пользователя. Локальные учетные записи находятся в базе данных SAM и должны быть созданы с помощью поставщика WinNT. Дополнительные сведения о создании объекта пользователя с помощью поставщика WinNT см. в объекте пользователя WinNT.
Создание объекта пользователя
Привязка к контейнеру, в котором будет находиться объект пользователя, и получите интерфейсIADsContainer или интерфейс IDirectoryObject для контейнера.
Используйте метод IADsContainer.Create или IDirectoryObject::CreateDSObject для создания объекта пользователя.
Минимальные атрибуты, необходимые для создания пользовательского объекта, будут зависеть от используемой службы каталогов. Дополнительные сведения о создании пользователя Active Directory см. в созданиипользователя.
Если используется интерфейсIADsContainer, новый объект не создается до вызова метода IADs.SetInfo.
Если используется интерфейс IDirectoryObject, при вызове методаCreateDSObject создается новый объект. Минимальные атрибуты, включая objectClass, должны быть указаны в массиве ADS_ATTR_INFO, переданном методу CreateDSObject.
Пример 1
В следующем примере кода создается учетная запись пользователя с атрибутами по умолчанию.
Dim ou As IADs
Dim usr as IADsUser
On Error GoTo Cleanup
Set ou = GetObject("LDAP://OU=Finance,DC=Fabrikam,DC=COM")
Set usr = ou.Create("user", "cn=Jeff Smith")
usr.Put "samAccountName", "jeffsmith"
usr.SetInfo
Cleanup:
If (Err.Number <> 0) Then
MsgBox ("An error has occurred. " & Err.Number)
End If
Set ou = Nothing
Set usr = Nothing
Пример 2
В следующем примере кода создается учетная запись пользователя с атрибутами по умолчанию. Для краткости проверка ошибок опущена.
#include <activeds.h>
int main()
{
HRESULT hr = CoInitialize(NULL);
IADsContainer *pCont;
IADsUser *pUser;
LPWSTR adsPath = L"LDAP://serv1/CN=Users,dc=Fabrikam,dc=com";
LPWSTR usrPass = NULL;
LPWSTR usrName = NULL;
// Add code to securely get the user name and password or leave
// as NULL to use the current security context.
hr = ADsOpenObject(adsPath,
usrName,
usrPass,
ADS_SECURE_AUTHENTICATION,
IID_IADsContainer,
(void**)&pCont);
IDispatch *pDisp;
hr = pCont->Create(CComBSTR("user"), CComBSTR("cn=Jeff Smith"), &pDisp);
pCont->Release();
hr = pDisp->QueryInterface(IID_IADsUser,(void**)&pUser);
pDisp->Release();
VARIANT var;
VariantInit(&var);
V_BSTR(&var) = L"jeffsmith";
V_VT(&var)=VT_BSTR;
hr = pUser->Put(CComBSTR("samAccountName"), var);
hr = pUser->SetInfo();
VariantClear(&var);
pUser->Release();
CoUninitialize();
return 0;
}