А как через Ls задавать Multivalue поля?

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

rocsolanka

Гость
#1
Есть Multivalue поле в которое надо затолкать значение нескольких других MultiValue полей. Формулой это просто: Field=Field1:Field2:... Fieldn. А можно так же красиво сделать LS? Я пока кроме ArrayAppend или Split(Join(...)) вариантов не нашла :-((
 
V

VZH

Гость
#2
<!--QuoteBegin-rocsolanka+3:12:2005, 16:21 -->
<span class="vbquote">(rocsolanka @ 3:12:2005, 16:21 )</span><!--QuoteEBegin-->Есть Multivalue поле в которое надо затолкать значение нескольких других MultiValue полей. Формулой это просто: Field=Field1:Field2:... Fieldn. А можно так же красиво сделать LS? Я пока кроме ArrayAppend или Split(Join(...)) вариантов не нашла :-((
[snapback]27955" rel="nofollow" target="_blank[/snapback]​
[/quote]

что-то типо этого

Dim S(5) As String
....
S(1)=docSource.A(0)
S(2)=docSource.B(0)
...
DocTarget.S=S
 
R

rocsolanka

Гость
#3
Да это-то я знаю :) Просто надеялась, что это все одним махом можно сделать, как в формулах. :)
 

Medevic

Что это ? :)
Lotus team
10.12.2004
3 346
2
#4
Для: rocsolanka
Если написать функцию (я так и сделал), которая это делает, то можно и одним махом.
 
G

Guest

Гость
#5
dim v as variant
dim s as string
dim doc as notesDocument
set doc = .......

s="многозначные поля"
v= evaluate("@SetField(""c"";c:"w":"e":"R":"""+s+""")",doc)

вопросы?
 
V

VZH

Гость
#6
<!--QuoteBegin-Guest+15:12:2005, 12:23 -->
<span class="vbquote">(Guest @ 15:12:2005, 12:23 )</span><!--QuoteEBegin-->dim v as variant
dim s as string
dim doc as notesDocument
set doc = .......

s="многозначные поля"
v= evaluate("@SetField(""c"";c:"w":"e":"R":"""+s+""")",doc)

вопросы?
[snapback]28409" rel="nofollow" target="_blank[/snapback]​
[/quote]

Можно и так, только надо иметь ввиду, что все эти evaluate сравнительно медленно выполняются.
 
Статус
Закрыто для дальнейших ответов.