• Познакомьтесь с пентестом веб-приложений на практике в нашем новом бесплатном курсе

    «Анализ защищенности веб-приложений»

    🔥 Записаться бесплатно!

  • CTF с учебными материалами Codeby Games

    Обучение кибербезопасности в игровой форме. Более 200 заданий по Active Directory, OSINT, PWN, Веб, Стеганографии, Реверс-инжинирингу, Форензике и Криптографии. Школа CTF с бесплатными курсами по всем категориям.

Удаление Ярлыка Базы С Воркспейса

  • Автор темы Baneslaer
  • Дата начала
B

Baneslaer

Нужно удалить старый ярлык почтовой базы с воркспейса. База в момент удаления может быть открыта пользователем.
Собственно интересует код, как это правильно сделать...
 
B

Baneslaer

или может кто-то использовал команду @Command( [RenameDatabase] ; server : database ; newServer )...Если кто-то использовал, то как она работает? Без глюков?
 

savl

Lotus Team
28.10.2011
2 597
310
BIT
160
Baneslaer
Работать с workspace лотуса нельзя из кода, удаление вручную, добавить программно ярлык можно.
@Command( [RenameDatabase] ; server : database ; newServer ) - работает только с репликами.
Если есть Scanez (Lite версия тоже может, проверил), то можно просто подменить реплику базе, тогда прокатит.
Вот еще программное решение подмены реплики:
 
B

Baneslaer

Baneslaer
Работать с workspace лотуса нельзя из кода, удаление вручную, добавить программно ярлык можно.
@Command( [RenameDatabase] ; server : database ; newServer ) - работает только с репликами.
Если есть Scanez (Lite версия тоже может, проверил), то можно просто подменить реплику базе, тогда прокатит.
Вот еще программное решение подмены реплики:

Дело в том, что осуществляется переезд с одного сервера на другой.
Какие ярлыки есть у пользователя неизвестно и нужно удалить/подменить все старые на новые.
Нашел решение такого плана, но еще его не тестировал -

We have a database that has a replica on 100+ servers. It is being consolidated to exist on one of three regional servers.
So, we needed an email button to send to users that would allow them to pick one of the three regional servers, and then
needed to remove/replace any/all database icons pointing to that replica with the new selected, regional server. We could
not find any code in the forum to assist us when we first looked at this requirement, so I am posting it here for others to
use. Following is the code that does the actual updating of the user's desktop icons. You will have to add code, if you want to
allow the user to select a server from a list, and to allow for users that have no icon at all pointing to a replica of the database.
Keep in mind that the user will be prompted for a "Yes/No" answer when the FileDatabaseRemove is executed.

vNewServerLocation := "Replace this with the New Server location the user selected";
vRepID := "48256B47002F1DC4";

vIconList := @DbLookup("":"ReCache";"":"bookmark.nsf";"(ByURL)";"Notes:///" + vRepID;"$ReplicaFilePaths");

vCount := @Elements(vIconList);

@For(n := 1; n < vCount; n := n + 1;
@Command( [AddDatabase]; @Left(vIconList[n];"!!") :mad:Right(vIconList[n];"!!") );
@Command([WindowWorkspace]);
@Command( [FileDatabaseRemove] )
);

@Command([RenameDatabase];@Left(vIconList[vCount];"!!") :mad:Right(vIconList[vCount];"!!"); vNewServerLocation)
 
C

Crock

Нужно удалить старый ярлык почтовой базы с воркспейса. База в момент удаления может быть открыта пользователем.
Собственно интересует код, как это правильно сделать...
Такие вещи делаются сторонними продуктами типа ClientGenie -
причём совершенно прозрачно для пользователя и без его участия
 
30.05.2006
1 345
12
BIT
0
юю
Нашел решение такого плана, но еще его не тестировал -

vNewServerLocation := "Replace this with the New Server location the user selected";
vRepID := "48256B47002F1DC4";

vIconList := @DbLookup("":"ReCache";"":"bookmark.nsf";"(ByURL)";"Notes:///" + vRepID;"$ReplicaFilePaths");

vCount := @Elements(vIconList);

@For(n := 1; n < vCount; n := n + 1;
@Command( [AddDatabase]; @Left(vIconList[n];"!!") :mad:Right(vIconList[n];"!!") );
@Command([WindowWorkspace]);
@Command( [FileDatabaseRemove] )
);

@Command([RenameDatabase];@Left(vIconList[vCount];"!!") :mad:Right(vIconList[vCount];"!!"); vNewServerLocation)
Работает. Мы людЯм волшебные письма рассылаем, с button-ом в пузе
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!