Определение глобальных переменных

[Guest]

Где можно определять глобальные переменные. Причина тому, что надо считывать с формы такие значения как путь к серверу, который будет считаться глобальным для всех форм.

Другие - Ресурсы базы данных – Общая программа БД – (Declarations) ?

 

[Medevic]

В профильных документах.
Смотреть @GetProfileField, @Command([EditProfileDocument]; ...) и т.д.

 

[morpheus]

Денис Кириченко
если что используйте Environmet ( в юзеровый notes.ini скидываються переменная и её значение ) вообще читайте хэлп

 

[Archi2001]

Ещё, если например, есть много баз которые будут использовать одни и теже пути, параметры и т.п., можно создать одну базу, в которой будет хранится вся информация (о путях, наименованиях и пр.) в одном "железном" месте... хотя этот вариант имеет несколько минусов, в частности скорость и возможные проблемы при распределённых приложениях ...

 

[Guest]

Денис Кириченко
если что используйте Environmet ( в юзеровый notes.ini скидываються переменная и её значение ) вообще читайте хэлп

Взял из Help-a:

The Programmer's pane contains a placeholder on the Objects tab called (Globals) that allows you to define global variables and subprograms using LotusScript. To define a global variable or subprogram perform these steps:
1. Click (Globals) on the Objects tab.
2. Select (Options), (Declarations), Initialize, or Terminate from the Objects tab.
3. Enter your LotusScript variable or subroutine in the Script area.
4. Refer to the subprogram or variable in any script in the application.

Вот только не понятно, где найти этот: 1. Click (Globals) on the Objects tab.
Не подскажите?

 

[morpheus]

Вот только не понятно, где найти этот: 1. Click (Globals) on the Objects tab.

Это глобальные переменные для Одной формы .. зайти можно когда клацаете на форму и слева в списве обьектов выбрать в самом верху (Globals)

 

[Archi2001]

Вот только не понятно, где найти этот: 1. Click (Globals) on the Objects tab.
Не подскажите?

Например, заходите в форму и слева от Programmer's Pane есть "столбик" с "Obects" ... Самый верхний пункт там с "плюсиком" и будет Globals

П.С. я просто с Morpheus одновременно набирал сообщение - это не дубль h34r:

 

[Kee_Keekkenen]

там где удобно можно использовать Shared Field

 

[Guest]

А можно еще скрестить два предложенных варианта: пути держать в отдельной БД, а на формы разместить Shared Filed-ы, которые будут обращаться к этой самой БД

 

[Guest]

там где удобно можно использовать Shared Field

Если я создам Shared Field (Общее поле), в нужной мне форме. Назовем ее допустим (System Information), к этому полю можно будет достучатся с любой формы и если да, то:

Dim form As NotesForm
Set form = db.GetForm("System Information")

до этого поля как достучаться?!?!

 

[Medevic]

Вот изобретатель велосипеда...
Чем профили не нравятся?

 

[Guest]

Вот изобретатель велосипеда...
Чем профили не нравятся?

Да я в Help-e по нему доку найти не могу

 

[Medevic]

Да я в Help-e по нему доку найти не могу

В том ищешь? В смысле в дизайнерском хелпе? Просто иногда у меня он сбивается.
Искать нужно, например, @GetProfileField.


А еще можно по "Profile forms" поискать. Там всё расписано.

 

[Guest]

В том ищешь? В смысле в дизайнерском хелпе? Просто иногда у меня он сбивается.
Искать нужно, например, @GetProfileField.
А еще можно по "Profile forms" поискать. Там всё расписано.

Попытаюсь объяснить, что понял: Что бы создать профайл я использую db.getProfileDocument , он и создает его. Для чтения профайла, использую @GetProfileField. Но как записать в профайл данные из формы, в которой я и собственно храню нужную мне информацию?

 

[Medevic]

Что бы создать профайл я использую db.getProfileDocument , он и создает его.

Или @Command([EditProfileDocument]) на собаках.

Но как записать в профайл данные из формы, в которой я и собственно храню нужную мне информацию?

@SetProfileField или @Command([EditProfileDocument]).

 

[Guest]

Или @Command([EditProfileDocument]) на собаках.

@SetProfileField или @Command([EditProfileDocument]).

А обзывать его не как не надо?

 

[Medevic]

Надо.

 

[Guest]

Надо.

Я правильно понял?

Sub Querysave(Source As Notesuidocument, Continue As Variant)
Dim db As NotesDatabase	
Dim cDoc As NotesUIDocument
Dim proDoc As NotesUIDocument
Dim session As NotesSession

Set cDoc = Source
Set session = New NotesSession	
Set db = session.CurrentDatabase
Set proDoc = db.GetProfileDocument("SystemInformation")
proDoc.PathToDB = cDoc.PathToDB
End Sub

 

[Medevic]

Зачем так сложно?
Создаешь форму с нужными полями. Например, с полем "SystemInformation". Называешь её (форму), например, "Profile"
Делаешь кнопку @Command([EditProfileDocument]; "Profile"). Жмешь и попадаешь в документ. Заполняешь поле, выходишь. Потом где тебе надо используешь @GetProfileField("Profile"; "SystemInformation") и получаешь значение поля "SystemInformation".

 

[Guest]

Зачем так сложно?
Создаешь форму с нужными полями. Например, с полем "SystemInformation". Называешь её (форму), например, "Profile"
Делаешь кнопку @Command([EditProfileDocument]; "Profile"). Жмешь и попадаешь в документ. Заполняешь поле, выходишь. Потом где тебе надо используешь @GetProfileField("Profile"; "SystemInformation") и получаешь значение поля "SystemInformation".

Спасибочки, огромное

Зачем так сложно?
Создаешь форму с нужными полями. Например, с полем "SystemInformation". Называешь её (форму), например, "Profile"
Делаешь кнопку @Command([EditProfileDocument]; "Profile"). Жмешь и попадаешь в документ. Заполняешь поле, выходишь. Потом где тебе надо используешь @GetProfileField("Profile"; "SystemInformation") и получаешь значение поля "SystemInformation".

А так нельзя:

Set proDoc = db.GetProfileDocument("InformationSystem")	
Dim a1 As String
Dim a2 As String
a1 = Cstr(proDoc.GetItemValue("PathToServer")(0))

Народ, plise Help, очень надо знать есть ли возможность у LotusScript выташить значение из поля Профайла. Пробовал, через:

proDoc.PathToServer
proDoc.FieldGetText("PathToServer")
proDoc.GetItemValue("PathToServer")(0)

Не выходит