Не удается объявить размер массива

  • Автор темы LIGHT
  • Дата начала
L

LIGHT

Гость
#1
Помогите победить.
Есть у меня строка в которой я считаю количесово элементов.

Код:
...
Dim CountElement As Intriger
UNIDarr = Split(UNIDLine,";") ' Это та самая строка, которая разбита разделителем
CountElement = Ubount(UNIDarr)
CountElement - это число элементов
Теперь я хочу создать другой масиив, и указать его размерность такуюже как UNIDarr
Код:
Dim ArrStruct(CountElement)
И тут ругань страшная, пробовал так
Код:
Dim ArrStruct()
Тоже самое, не ругается только если тупо вбить
Код:
Dim ArrStruct(10)
Как бы это побороть?
 

morpheus

скриптописец
07.08.2006
3 915
1
34
Украина, Киев
#3
Для: LIGHT
В дополнение к Redim - он переопределяет разменрность массива и стирает все его значения
а конструкция Redim Preserve - переопределяет и оставляет все ранее занесенные значения
 
L

LIGHT

Гость
#4
Спасибо! Заработало!!!

А не подскажете еще как можно весь массив в строку заколбасить, т.е есть например такой масив
Код:
Значение1
Значение2
Занчение3
Хочу получить
Код:
Значение1 (разделитель) Значение2 (разделитель) Значение3 (разделитель)
 
L

LIGHT

Гость
#6
И еще один вопрос, что бы новую тему не создавать.
Существует ли в Lotuse такой вид переменных, не массив а которые наматывают на себя все значения.
Аналог PHP
$peremennaya. = "a";
$peremennaya. = "b";
$peremennaya. = "c";

print $peremennaya;

Вывалит abc
 
L

LIGHT

Гость
#8
Все спасибо, разобрался.
Теперь такая заковыка вылезла.
Как на LS сделать @NewLine ???
 
L

LIGHT

Гость
#10
... И еще раз спасибо!!!
И последний вопрос на сегодня :)
Как вычислить время не локальное а серверное
Код:
Dim MoveDate As NotesDateTime
Set MoveDate = New NotesDateTime ("Today")

ServerTime=MoveDate.[color=#FF0000]?????[/color]
 

morpheus

скриптописец
07.08.2006
3 915
1
34
Украина, Киев
#14
<!--QuoteBegin-Medevic+18:06:2007, 15:03 -->
<span class="vbquote">(Medevic @ 18:06:2007, 15:03 )</span><!--QuoteEBegin-->@Now параметр [SERVERTIME].
[snapback]69756" rel="nofollow" target="_blank[/snapback]​
[/quote] - интересно интересно ))) :)

<!--QuoteBegin-Constantin A Chervonenko+18:06:2007, 19:36 -->
<span class="vbquote">(Constantin A Chervonenko @ 18:06:2007, 19:36 )</span><!--QuoteEBegin-->set tDoc = new NotesDocument(db)
print tDoc.Created
[snapback]69809" rel="nofollow" target="_blank[/snapback]​
[/quote] - хм.. а помоему не очень :P