| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
agipsy Cdt

Registrado: 01 Sep 2006Mensajes: 15Ubicación: MONTERIA - COLOMBIA
|
Publicado: Mie 18 Oct, 2006 1:16 am Asunto: Manejo de usuarios con Interbase Admin en c++ builder |
|
|
Yo estoy haciendo una aplicación en c++ builder6 e Interbase y estoy usando los componentes IBSecurityService de la pestaña InterBase Admin de Builder y tengo 4 asi:
IBSecurityService1 con la propiedad SecurityAction= ActionAddUser
IBSecurityService2 con la propiedad SecurityAction= ActionDeleteUser
IBSecurityService3 con la propiedad SecurityAction= ActionModifyUser
IBSecurityService4 con la propiedad SecurityAction= ActionDisplayUser
No me deja crear un usuario nuevo trabajando en mi sistema como SYSDBA.
Si tienen código relacionado con esto por favor envienmelo.
:)Adriana |
|
| Volver arriba |
|
 |
Cesar C. Salazar Gonzalez Master


Registrado: 01 Oct 2002Mensajes: 2155Ubicación: San Cristóbal de Las Casas, Chiapas
|
Publicado: Jue 19 Oct, 2006 9:33 am Asunto: |
|
|
Usa el siguiente codigo dentro del primer componente
| Código: |
IBSecurityService1->UserName = "usuario";
IBSecurityService1->FirstName = "Nombre";
IBSecurityService1->MiddleName = "Apellido 1";
IBSecurityService1->LastName = "Apellido 2";
// para crear la cuenta del usuario
IBSecurityService1->UserName = "Usuario";
IBSecurityService1->Password = "123456";
IBSecurityService1->AddUser(); |
Esto permite agregar un usuario a la base de datos..
tambien puedes usar la funcion buscar del foro, existen varios enlaces relacionados con ello
Saludos _________________
 |
|
| Volver arriba |
|
 |
ciberale Cdt

Registrado: 17 Oct 2003Mensajes: 18
|
Publicado: Sab 01 Sep, 2007 3:58 pm Asunto: |
|
|
El código correcto sería este (hay que establecer además la propiedad Active = true del IBSecurityDevice), en tiempo de ejecución crea una conexión con el componente.
| Código: |
bool AgregarUsuario (AnsiString usuario, AnsiString password, AnsiString nombre, TIBDatabase* T)
{
bool value = false;
TIBSecurityService *service = new TIBSecurityService(NULL);
try
{
//Por defecto pilla el server de localhost
//service->ServerName = "localhost";
service->Params->Add("user_name=" + T->Params->Values["user_name"]);
service->Params->Add("password=" + T->Params->Values["password"]);
service->LoginPrompt = false; //Se evita que se introduzca el login del server para el acceso de añadir usuario
service->Active = true;
//Datos del nuevo usuario
service->UserName = usuario;
service->Password = password;
//Datos opcionales
service->FirstName = nombre;
//service->MiddleName = "";
//service->LastName = "";
//Operación de agregar usuario
service->AddUser();
service->Active = false;
value = true;
}
catch (EDatabaseError &error)
{ }
delete service;
return value;
} |
|
|
| Volver arriba |
|
 |
|