Help!sos!now!Проблема при работе скрипта

  • Автор темы Max_from_UA
  • Дата начала
Статус
Закрыто для дальнейших ответов.
M

Max_from_UA

Гость
#1
Нашел скрипт "Кнопка, добавляющая новые данные в поля представления"

dim NDB As NotesDatabase
dim NV As NotesView
dim ND As NotesDocument
dim keys(1) As Variant

Set NV=NDB.GetView("ViewName")'На всякий случай беру вид прямо из базы
'Первый столбец в виде отображает поле organization_1, второй столбец
'отображает поле organization_2, оба столбца отсортированы

keys(0)="Первое требуемое значение"
keys(1)="Второе требуемое значение"

'Проверяем нет ли уже такого значения в виде
if NV.GetDocumentByKey(keys) Is Nothing then
Set ND=NDB.CreateDocument
'Название формы, документы по которой отбираются в вид
ND.Form="FormName"
ND.organization_1=keys(0)
ND.organization_2=keys(1)
Call ND.Save(True, False)
'Если скрипт находится на кнопке, в этом виде - можно вид отрефрешить
End if

В 4.6.4 не пашет, что тут не так и как его следует переделать для следующей задачи, уже упомянутой один разок.
У меня есть два поля org_1 и org_2.
Следует по нажатию кнопки добавить их значения в представление ОРГАНИЗАЦИИ, при условии, что они не совподают с уже существующими там значениями organizatio_1 и organizatio_2. Представление заполняется формой
с полями organizatio_1 и organizatio_2, которые нахожятся не в той форме, что поля org_1 и org_2.

Форма Организация с полями organizatio_1 и organizatio_2 задает представление ОРГАНИЗАЦИИ.
ФОРМА Карточка с полями org_1 и org_2 существует отдельно.

Можно ли обойтись только @-функциями.

Большое спасибо за работоспособный ответ.
 

Гость
#2
А что не пашет-то?
Ты сам пробовал разбираться?
 
D

Domino6

Гость
#3
<!--QuoteBegin-Max_from_UA+23:03:2006, 11:10 -->
<span class="vbquote">(Max_from_UA @ 23:03:2006, 11:10 )</span><!--QuoteEBegin-->что тут не так и как
[snapback]32342" rel="nofollow" target="_blank[/snapback]​
[/quote]

Нет сессии
Нет определения базы
 
M

Max_from_UA

Гость
#4
Нет сессии
Нет определения базы
Спасибо, я сообщу, если запашет.
Кстати, електронных учебников ни у кого нету для начинающих девелоперов и программистов.
 
Статус
Закрыто для дальнейших ответов.