• Курсы Академии Кодебай, стартующие в мае - июне, от команды The Codeby

    1. Цифровая криминалистика и реагирование на инциденты
    2. ОС Linux (DFIR) Старт: 16 мая
    3. Анализ фишинговых атак Старт: 16 мая Устройства для тестирования на проникновение Старт: 16 мая

    Скидки до 10%

    Полный список ближайших курсов ...

Com-функция возвращает массив >32k

  • Автор темы D!m@n
  • Дата начала
D

D!m@n

Мужики, помогите...
Функция из COM-объекта возвращает массив размером >32K, мне его надо принять, а - никак...
Ошибка Array size exceeds maximum limit.
Код:
Dim objStream As Variant
Dim bBuffer As Variant

Set objStream = CreateObject("ADODB.Stream")

Call objStream.Open()
objStream.Type = 1 ' adTypeBinary
Call objStream.LoadFromFile(sFilename)
bBuffer = objStream.Read(-1) 'adReadAll ' <-- здесь происходит ошибка
Call objStream.Close()

Есть какие-нибудь варианты (пусть даже самые извращенные :eek: ) или вообще труба?
Заранее спасибо!
 
D

D!m@n

Да нет, NotesStream ничем не лучше... Да и дело даже не в ADODB.Stream, просто давно хотелось эту проблемку как-то решить...
XMLHttpRequest, например, тоже массив >32K может вернуть, а чем его заменишь?..
Конечно, можно зачитать файл частями и насовать в List, но, увы, потом эти данные надо отдать как аргумент в другую COM-функцию как целый массив, а List она не примет...

P.S. Спасибо за участие!
 
R

rins

Да нет, NotesStream ничем не лучше... Да и дело даже не в ADODB.Stream, просто давно хотелось эту проблемку как-то решить...
XMLHttpRequest, например, тоже массив >32K может вернуть, а чем его заменишь?..
Конечно, можно зачитать файл частями и насовать в List, но, увы, потом эти данные надо отдать как аргумент в другую COM-функцию как целый массив, а List она не примет...
P.S. Спасибо за участие!

ADODB.Stream не могу пока сказать, а XMLHttpRequest замечательно меняется на Java аналог с соотв. LS2J врапером.
 
D

D!m@n

Да можно и без враппера на Java агентик сварганить... Но речь-то про LS.
Представьте, что вместо XMLHttpRequest - самописный и незаменимый COM-класс...
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!