array med 255 tegn

Sådan som jeg forstår dit problem, så har du en række data i en tabel, du vil ha' hældt i et array, ikke?

I så fald, så burde noget ala det her virke (har ikke testet det):

arraySize = 1
Dim tegnArray()
While Not RS.EOF
  Redim Preserve tegnArray(arraySize)
  tegnArray(arraySize - 1) = RS("tegnData")
  arraySize = arraySize + 1
  RS.MoveNext
Wend

...sig til hvis jeg har misforstået noget :-)