Windows 2000用户管理--活动目录实例 _云知道

在实际的应用中，如我们要做一个服务器对终端的控制软件，常需要管理用户，当然NT ， W2K提供了完善的用户管理模式，但有时我们并不希望从管理工具中去找启动用户管理，这样管理起来非常麻烦，我们常常希望能从我们的软件上就可以管理NT ， W2K的用户，这样对一些对操作系统不是很熟练的用户来说是非常必要的。就最近就有人要求我为其写一个终端管理软件，我刚开始也觉得没有什么必要，但经他仔细说来觉得还是有必要的，他是用PB的，他说感觉好象很难做到，所以我只好为他编写了一个DLL ，其中带有增加用户，删除用户，修改密码，增加用户到组，从组中删除，获得用户列表等等，由于篇幅太长，不便于读者阅读，故省去了一些函数，如果需要请与本人联系。gxtlib@21cn.com
下面的函数主要利用了NT ， W2K的活动目录服务一些组件接口，如IADsContainer 容器， IADs ， IADsUser接口等。
1、删除一个用户（从本机器上）
BOOL __stdcall DeleteUser(char *username)
{
HRESULT hr;
IADsContainer *pContainer=NULL;
_bstr_t bstr;
DWord ll_len=255;
char lbBuffer[255];
::GetComputerName(lbBuffer,&ll_len);
bstr="WinNT://" _bstr_t(lbBuffer) "," _bstr_t("computer");
// 初始化公寓线程
hr=CoInitialize(NULL);
hr= ADsGetObject(bstr,IID_IADsContainer,(void **)&pContainer);
pContainer->Delete(L"user",_bstr_t(username));
pContainer->Release();
CoUninitialize();
return FALSE;
}
2、增加一个用户
BOOL __stdcall AddUser(char *username,char *fullname,char *description)
{
HRESULT hr;
IADsContainer *pContainer=NULL;
IADs *pADs=NULL;
IDispatch *pDisp=NULL;

_bstr_t bstr;
DWORD ll_len=255;
char lbBuffer[255];
::GetComputerName(lbBuffer,&ll_len);
bstr="WinNT://" _bstr_t(lbBuffer) "," _bstr_t("computer");

// 初始化公寓线程
hr=CoInitialize(NULL);
hr= ADsGetObject(bstr,IID_IADsContainer,(void **)&pContainer);
hr=pContainer->Create(L"user",_bstr_t(username),&pDisp);

pContainer->Release();
if( !SUCCEEDED(hr) ) { return hr; }

hr = pDisp->QueryInterface(IID_IADs, (void**) &pADs );
pDisp->Release();
if ( !SUCCEEDED(hr) ) { return 0;}
VARIANT var;
VariantInit(&var);
var.vt=VT_BSTR;
var.bstrVal=_bstr_t(fullname);

pADs->Put(L"FullName",var);
VariantClear(&var);
var.vt=VT_BSTR;
var.bstrVal=_bstr_t(description);

pADs->Put(L"Description",var);
VariantClear(&var);
hr=pADs->SetInfo();
hr=pADs->Release();
CoUninitialize();
return FALSE;
}
3、设置用户密码
BOOL __stdcall SetUserPwd(char *username,char *pwd)
{
HRESULT hr;
IADsUser *pUser;
_bstr_t bstr;
DWORD ll_len=255;
char lbBuffer[255];
::GetComputerName(lbBuffer,&ll_len);
bstr="WinNT://" _bstr_t(lbBuffer) "/" _bstr_t(username) ",user";

file://初始化公寓线程
hr=CoInitialize(NULL);
hr= ADsGetObject(bstr,IID_IADsUser,(void **)&pUser);
if (SUCCEEDED(hr))
{
hr=pUser->SetPassword(_bstr_t(pwd));

if(SUCCEEDED(hr))
{
CoUninitialize();
return TRUE;
}
}
CoUninitialize();
【Windows 2000用户管理--活动目录实例】 return FALSE;
}

Windows 2000用户管理--活动目录实例

推荐阅读

一带一路的意义对外开放实现战略转变

一级主任科员是什么级别

电动二三四轮车区分标准是什么？

车厘子能用盐水泡吗能吃吗

专业变声器APP怎么使用？专业变声器使用方法一览

转呼啦圈小技巧呼啦圈怎么转

落手清是什么意思

84消毒液洗衣服多久挥发干净

网络语cc是什么意思

女朋友昵称暧昧的称呼称呼女朋友暧昧的昵称

十年树木百年树人这句话谁讲的

男朋友生气了该怎么哄把男朋友惹生气了怎么哄

大学里老师的部门有什么,大学宿舍有老师检查吗

海信客服电话人工服务电话，海信客服电话是多少

安徽高考分数，安徽高考总分多少分

12适配机型曝光安卓12适配机型