VC dynamically Add/Remove users in SQL Server7

In this paper, the user is dynamically added and deleted in the program by invoking the SQL Server7 system stored procedures and system tables.

First, with the system Administrator account login system: Program omitted, please see the source program.

Second, enter the user management interface:

1, read the database: from Master ... Read all databases in Sysdatabse.

void CUser::AddDataBase()
{
　　_RecordsetPtr rs;
　　_bstr_t bt;
　　HRESULT hr;
　　CString str;
　　
　　bt=(_bstr_t)"select * from master..sysdatabases";
　　try{
　　　　hr=rs.CreateInstance (__uuidof(Recordset));
　　　　ASSERT(SUCCEEDED(hr));
　　　　//打开数据源
　　　　hr=rs->Open (bt,cn.GetInterfacePtr (),adOpenDynamic,adLockOptimistic,adCmdText);
　　　　ASSERT(SUCCEEDED(hr));
　　　　rs->MoveFirst();
　　　　while(!rs->EndOfFile)
　　　　{
　　　　　　str=(char*)(_bstr_t)rs->Fields->GetItem("name")->Value;
　　　　　　m_database.AddString(str);
　　　　　　rs->MoveNext();
　　　　}
　　　　rs->Close();
　　　　m_database.SetCurSel(0);
　　}
　　catch(_com_error)
　　{}
}