ОБСУЖДЕНИЕ

Добавление значений в начало списка

9 ответов 5,4 тыс.
AI-выжимка обсуждения скоро

Краткие тезисы обсуждения со ссылками на ключевые ответы появятся здесь.

Статус
Закрыто для дальнейших ответов.
Автор темы
Всем добрый день!
Вопрос может и простой,но уже голову сломала. И вроде сталкивалась с тако задачей, а вспомнить ее решение не могу. Помогите!

Есть поле Dialog List, при нажатии на кнопку в него добавляются значения. Добавляются они в конец списка(AppendToTextList использую). Как сделать,чтобы они добавлялись в начало?
 
Путём помещения значения в массив, далее к новому элементу ArrayAppend старого списка и помещением результата обратно.
Либо Evaluate({filed моё_поле_со_списком:="} + новое_значение + {":моё_поле_со_списком}, doc)
 
Dim result As Variant
result =note.Lotusname 'мое новое значение
Call note.replaceitemvalues("ReviewerList", Arrayappend(result, note.getitemvalues("ReviewerList")))

Выдает ошибку Illegal use. Что не так записываю :(
 
что такое
Код:
getitemvalues
:(
Note - NotesDocument?
 
Value без s в конце
Call note.replaceitemvalue("ReviewerList", Arrayappend(result, note.getitemvalue("ReviewerList"))))

И ещё учесть, что поле ReviewerList бывает пустым. Пустота же не нужна.
Мне больше evaluate нравится. Читабельней как-то.

result = Evaluate({field ReviewerLis:=@Trim(Lotusname:ReviewerLis); ""}, note)
 
Код:
Dim result As Variant
result = note.GetItemValue("Lotusname") 'мое новое значение
Call note.replaceitemvalues("ReviewerList", Fulltrim(Arrayappend(result, note.getitemvalue("ReviewerList")))) 'по желанию ArrayUnique
Почему Option Declare не включен?
 
Спасибо огромное,за замечания и помощь. Туплю сегодня по-страшному (в предвкушении долгожданного отпуска) :(
 
Статус
Закрыто для дальнейших ответов.

Статистика тем

Создано
kilcher,
Последний ответ от
kilcher,
Ответы
9
Просмотры
5 409