Как глобально или локально получить гиперссылку на документ.

PaKo

Well-known member
29.04.2005
59
0
#1
Необходимо дать пользователю по клику получит гипер-ссылку на д-т.
Не лотусовую, а ту что в св-вах документа в поле "Код".

Я сделал кнопку с кодом:
Код:
Dim tmpvar As Variant
Dim ws As New NotesUIWorkspace
tmpvar=Inputbox$("Ссылка на документ" ,,ws.CurrentDocument.Document.NotesURL,100,100)
Пользователь нажимает кнопку и получает в inputbox'e выделенную ссылку. Остается только ctrl+c и все. Но эту кнопку необходимо вставлять в каждый д-т. Можно ли в панели инструментов сделать глобальную кнопку? И еще. Можно ли реализоват ьчто б ссылка автоматом копировалась в буфер?
 

Omh

Lotus team
04.07.2007
2 210
1
#2
Можно.

Кнопки на панели хранятся в базе bookmarks.nsf.
Про это много статей и на этом форуме и на других.

Копирнуть в клипборд можно через uidoc.Copy или использая WinAPI/Java.

Varinat в твоём коде не нужен, вполне хватит String.