请问如何在INTERBASE6中，添加新用户和更改密码

[wanghua00]

请问如何在INTERBASE6中，
如何在我的程序中添加新用户和更改密码，而不进入IBCONSOLE中去添加！

[yyfzy]

使用InterBase Admin面板中的TIBSecurityService组件，具体用法请查看BCB帮助。

[TR@SOE]

SINGLER说的对。用IBSecurityService控件。

[TR@SOE]

不过我的印象中它不能显示一个用户的密码，虽然你可以在创建时指定密码，但是你回头显示时显示不出密码。。。。。待查。

[wanghua00]

谢谢大家！！！！

[yyfzy]

TR老大啊，这几天在QQ上怎么都不理我呢？我那个备份的又新问题啊
今天给你发信息了，收到没？？

借楼主一地方，谢谢了！

呵呵

[TR@SOE]

void __fastcall TMainForm::SetUserInfo(TIBSecurityService * S)
{
S->UserName=UserNameEdit->Text;
S->FirstName=FirstNameEdit->Text;
S->MiddleName=MidNameEdit->Text;
S->LastName=LastNameEdit->Text;
S->Password=PwdEdit->Text;
S->UserID=StrToInt(UserIDEdit->Text);
S->GroupID=StrToInt(GrpIDEdit->Text);
}
注意，这个函数是在MainForm里定义的。我们可以将它定义在数据模块中，不过这样在引用各个Edit控件的属性时会比较麻烦，所以还是放到MainForm里了。
于是，对于“增加用户”按钮的事件处理函数，我们这样书写：
void __fastcall TMainForm::AddUserBtnClick(TObject *Sender)
{
TIBSecurityService *S=DMForm->IBSecurityService1;
DMForm->SetSecurityProperty(S);

SetUserInfo(S);
S->Active=true;
try
{
S->AddUser();
}
__finally
{
S->Active=false;
}
}

核心代码如上。

[warton]

关注

[TR@SOE]

To Singler，

由于我是上CABLE MODEM，所以QQ很不稳定，经常我发不出去，然后别的朋友看到我总是上上下下，断裂身体的干活。

实在不行，你给我发MSN吧，有点讨厌QQ了。我在MSN上的ID是[e-mail]

[yyfzy]

TR老大啊，你用哪个公司的CM啊？？质量这么不好，呵呵

要不换我们公司的吧，不过你们最终用户的CM好象是广电局提供的吧。

另：MSN是什么啊？？

[TR@SOE]

我是用的有线电视台提供的CABLE MODEM，是走闭路电视进来的。

MSN你不知道？？？？？？…………………………………………ft...

[yyfzy]

TR老大啊，我刚才也注册了MSN

帐号是:[e-mail]

我已经把你加到我的里面了

[yyfzy]

呵呵

我们公司就是产那个东东啊
Cable Modem(电缆调制解调器）