Subject | Re: [IBO] IBOSecurityService |
---|---|
Author | Dmitry Beloshistov |
Post date | 2005-04-29T12:37:55Z |
Hello, jdlynn123!
You wrote to <IBObjects@yahoogroups.com> on Fri, 29 Apr 2005 11:50:11 -0000:
j> Does anyone have an example of how to add a new user using this
j> component??
Some around this:
Uses IBOAdmin;
IBSS:=TIBOSecurityService.Create(IB_Connection);
try
IBSS.ServerName:=IB_Connection.Server;
IBSS.Params.Clear;
IBSS.Params.Add('user_name='+IB_Connection.Username);
IBSS.Params.Add('password='+IB_Connection.Password);
IBSS.UserName:='NEWUSER';
IBSS.Password:='1234';
IBSS.Active:=True;
IBSS.AddUser;
IBSS.Active:=False;
finally IBSS.Free; end;
WBR,Dmitry Beloshistov AKA [-=BDS=-]
You wrote to <IBObjects@yahoogroups.com> on Fri, 29 Apr 2005 11:50:11 -0000:
j> Does anyone have an example of how to add a new user using this
j> component??
Some around this:
Uses IBOAdmin;
IBSS:=TIBOSecurityService.Create(IB_Connection);
try
IBSS.ServerName:=IB_Connection.Server;
IBSS.Params.Clear;
IBSS.Params.Add('user_name='+IB_Connection.Username);
IBSS.Params.Add('password='+IB_Connection.Password);
IBSS.UserName:='NEWUSER';
IBSS.Password:='1234';
IBSS.Active:=True;
IBSS.AddUser;
IBSS.Active:=False;
finally IBSS.Free; end;
WBR,Dmitry Beloshistov AKA [-=BDS=-]