Просмотр Исходного

\\
1. Сконвертировать из другой программы в excel или файл с разделителями

2. Открыть этот файл в excel получаем например
\\
*Code:*

  

{code}
1 ivan Иван ivan@mail.local 12345

1 sergey sergey ivan@mail.local 12345
{code}
\\
3. Создать новую первую колонку в ней сформировать строку вида select user_id from gln_usr_add(PARENT_ID,login,NAME,EMAIL,1,1,PSW,0,null);PARENT_ID это id группы в которую помещается пользовательПолучится подобная строка формул
\\
*Code:*

{code}
="select user_id from gln_usr_add("&B1&",'"&C1&"','"&D1&"','"&E1&"',1,1,'"&F1&"',0,null);"
{code}
\\
и ее результат

\\
*Code:*

{code}
select user_id from gln_usr_add(1,'ivan','Иван','ivan@mail.local',1,1,'12345',0,null);
{code}
\\
4. Колонку выделяем и ctrl+c

5. В ibexpert подключаемся к бд и нажимаем ctrl+F12 откроется новый скрипт

6. В него вставляем и выполняем

Для работы с БД нужно подключиться по vpn администратором.

Пароль к бд такой же как в локальной консоли, пользователь SYSDBA, настройки ibexpert:
\\
  !worddavf66ae1f6e29c2fffd82ff9615a50fa2d.png|height=471,width=623!
----
Если у вас отображаетсяCannot perform operation -- DB is not open.

1. Предварительно двойной клик по строчке регистрации БД в дереве, произойдет подключения к БД

2. В окне скрипта выберите галочку "Использовать текущее подключение" По всем вопросам работы с бд обращайтесь в ICQ 164592853 или по телефону.
----
Как изменить другие поля и реквизиты:

Выполнить скрипт он создаст новую, процедуру GLN2_USR_ADD.

Строку для нее готовить по аналогии с верхним примером,

select user_id from gln2_usr_add(.................);

поля идут последовательно ниже видно от PARENT_ID до IP_STR.

Отредактируйте скрип по вашему желанию.

\\
*Code:*

{code}
SET TERM ^ ;


CREATE PROCEDURE GLN2_USR_ADD (


PARENT_ID INTEGER,


LOGIN VARCHAR(32),


NAME VARCHAR(128),


EMAIL VARCHAR(128),


NET_SIZE INTEGER,


END_USER SMALLINT,


PSW VARCHAR(16),


AD_IS INTEGER,


SUID NUMERIC(18,0),


BALANCE NUMERIC(15,2),


COMMENT VARCHAR(1024),


ENABLED INTEGER,


IP_STR VARCHAR(16)


)


RETURNS (


USER_ID INTEGER)


AS


begin


select user_id from gln_usr_add(:PARENT_ID,:LOGIN,:NAME,:EMAIL,:NET_SIZE,:END_USER,:PSW, :AD_IS,:SUID)


into user_id;


--Обновим баланс(остаток на начало мес) пользователя
update users set enabled=:enabled,
ostatok=:BALANCE*10000000000
where id=:user_id;

update users set
--установим ip адрес
users.ip=uf_string2ip(:ip_str),
--отключим предупреждение приближения к лимиту
users.limit_warning=null,
--Автоматический акт
users.auto_account=1,
--Дата следующего автоматического акта
users.next_auto_acount='01.07.2008',
--Сменим тип авторизации на подключение через агента
users.auth_type=2,
--Сменим кеш поле тип авторизации на подключение через агента
users.auth_type_cache=2,
--Разрешим почту
users.allow_mail=1,
--Разрешим доступ к почте из интернет
users.allow_mail_internet=1
where id=:user_id;

/* <-расскомментируйте этот блок
--Добавим атрибут комментарий
INSERT INTO ATTRIBUTE_VALUES (
USER_ID,
ATTRIBUTE_ID,
ATTRIBUTE_VALUE)
VALUES (
:USER_ID,
2,
:comment);


'Наименование' id=2

*/

suspend;

end

^

SET TERM ; ^

GRANT EXECUTE ON PROCEDURE GLN_USR_ADD

TO PROCEDURE GLN2_USR_ADD;

GRANT SELECT,UPDATE ON USERS TO PROCEDURE GLN2_USR_ADD;

GRANT INSERT ON ATTRIBUTE_VALUES TO PROCEDURE GLN2_USR_ADD;

GRANT EXECUTE ON PROCEDURE GLN2_USR_ADD TO SYSDBA;
{code}
GLN2_USR_ADD
\\

----
----

Если не подключается и пишет "Undefined service gds_db/tcp"

Положить файл gds32.dll в system32, взять можно из каталога с ICSManager

В файле C:WINDOWS\services проверьте наличие записи :

gds_db 3050/tcp

gds_db 3050/udp

если запись отсутствует то необходимо ее добавить и после этого продолжить установку клиентской части.\|