Split

[VINNY-PYX]

Я достаю из базы данных строку такого вида: 1;2;3;. Делаю Split вот так:

Код: Выделить всё

Dim arra(),Theme,i
if request("Theme")=1 then
theme=algebra
end if
arra=split(objrec.fields("" & Theme & "");";")
for i=0 to ubound(arra)
response.write arra(i)
next


Так вот, в чем ошибка? У меня возникает такая ошибка в 5 строке (в примере): Несоответствие типа. Что мне сделать, чтобы её исправить?