нужен вариант работы с бинарными файлами большой ёмкости, без помещения всего содержимого файла в память (посему adodb.Stream отпадает)

какой ещё объект системы (Win) можно заюзать, дабы можно было блоками читать/писать в/из COMSafeArray?

уж больно неохота в скрипт заворачивать

Теоретически, если произвольная запись не интересует, то можно Scripting.FileSystemObject и объект TextStream, который читает файлы посимвольно, и также последовательно и посимвольно пишет. Мне через него удавалось с образами дисков работать - конечно, были определённые тормоза, но расход памяти был минимальный.

посимвольно не устраивает - слишком тормознуто.
мне бы поблочно читать/писать надо

пока мысль такая, что если ничего лучше не предложат, использовать jscript и его File

(3) а что за файл и что ты с ним будешь делать (и как) ? XML ?

(4) нет. чистый бинарник. а делать буду - читать/писать

Нетленка это умеет -  прочитать блок и представить его в COM-массиве нужной размерности.

(6) что за нетленка?

(5)+ ну тоды без ВК думаю никак.. хотя про WScript.Shell почитай еще..

есть ещё вариант с BinFiles.dll, но чё-то мне этот вариант нравится ещё меньше, чем с jscript

(7) Не знаем нетленку? Бида-бида.

http://infostart.ru/public/15589/

Объект
Addin.FileStream, там описание подробное (в версии 2.2) есть и демопример.

(10) похвали себя, похвали..))

(12) Это -- не кукурузу охранять!

(11) так что там лучше скачивать - 2.3, или 2.2.?

(14) 2.3

(15) спасибо, ознакомлюсь с твоей нетленкой ;-)

(13) это еще уметь надо!

(15) а как она с 8.2 себя ведёт - нормуль?

(18) Под Толстым клиентом - да.

может, ещё какие варианты будут?

^

Ну, можно ещё сваять OLE-сервер, в котором реализовать открытие файла и чтение двоичного блока с произвольного адреса - работы на несколько часов.

ЧтениеТекста?

Вот жешь :)   -

   fileName = "F:\VIDEO\Otryad.Osobogo.Nazna4eniya.2011.DVDRip.avi";
   fso = Новый COMОбъект("Scripting.FileSystemObject");
   fileObject = fso.OpenTextFile(ИмяФайла, 1, 0, 0);
   Пока file.AtEndOfStream = 0 Цикл
     символы = fileObject.Read(1024); //1024 - количество символов, или ReadLine() - для считывания всей строки
     Сообщить(стр);
     ОбработкаПрерыванияПользователя();
   КонецЦикла;
   file.Close();

Книга знаний: Пример чтения и записи текстовых файлов (Scripting.FileSystemObject)
http://www.script-coding.com/WSH/FileSystemObject.html

P.S.
Проверил на большом видео файле, считывание начинается мгновенно, т.е. в память все сразу не кладет.
Также с помощью нее можно и писать в файл.

(24) не взлетит. будет проблема с нулями. поэтому придётся читать посимвольно, что обернётся тормозами

(22) да зачем писать, уже готовые есть.

ладно, щас буду выбирать какой-нибудь вариант

(25) так используй в скрипте из (24) не fso.OpenTextFile а FileOpen
http://msdn.microsoft.com/en-us/library/afh37kh8(v=vs.71).aspx

Mode ставишь Binary и погнал!

(26) Так если .Net подцепить, то можно всё, что угодно сделать, причём на этом самом .Net

Вот еще вариант:



   // Работа с SAPI: forum.script-coding.com
   ИмяФайла = "D:\kvk\Soft\images\openSUSE\openSUSE-12.1-DVD-i586.iso";
   ИмяВыходногоФайла = "D:\kvk\temp\test.iso";
   РазмерБуфера = 1048576;
   Буфер = "";
   Остаток = "";
   memoryStream = Новый COMОбъект("SAPI.spMemoryStream");
   fileStream = Новый COMОбъект("SAPI.spFileStream");
   fileStream.Open(ИмяФайла);
   outStream = Новый COMОбъект("SAPI.spFileStream");
   outStream.Format.Type = 1;
   outStream.Open(ИмяВыходногоФайла, 3);
   Пока Истина Цикл
       ОбработкаПрерыванияПользователя();
       Байтов = fileStream.Read(Буфер, РазмерБуфера);
       Если Байтов < РазмерБуфера Тогда
           Если Байтов > 0 Тогда
               memoryStream.SetData(Буфер);
               memoryStream.Read(Остаток, Байтов);
               //Сообщить(Остаток);
               outStream.Write(Остаток);
           КонецЕсли;
           Прервать;
       Иначе
           //Сообщить(Буфер);
           outStream.Write(Буфер);
       КонецЕсли;
   КонецЦикла;
   fileStream.Close();
   outStream.Close();

(28) тэк-тэк-тэк. спич-апи для чтения файлов - оригинально-с!

а он примет COMSafeArray в качестве буфера? тут, я вижу, строка, а строка не катит по уже озвученным причинам (нули и т.п.)

именно COMSafeArray, но стоит проверить. У меня скрипт был на VBS (оттуда взял) - считал хэши довольно быстро (сейчас всё на PowerShell через объекты .Net)

(30) да, вкусные методы .Net я смотрел, но не хочу к .Net привязываться.
спасибо, сейчас потестю

(28) да, точно, COMSafeArray возвращает.
просто немного смутило Буфер = "";

серый форму рулит. спасибо :)

+(32) *серый форум