W2K用户管理--活动目录实例

来源:互联网 发布:java相关毕业论文题目 编辑:程序博客网 时间:2024/05/16 07:00

在实际的应用中,如我们要做一个服务器对终端的控制软件,常需要管理用户,当然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();

 return FALSE;
}

原创粉丝点击