Dim File1 As New System.IO.FileStream("E:\copy\first", System.IO.FileMode.Open, System.IO.FileAccess.Read)
Dim File2 As New System.IO.FileStream("E:\copy\second", System.IO.FileMode.OpenOrCreate, System.IO.FileAccess.Write)
Dim i = File1.ReadByte()
Do Until i = -1
File2.WriteByte(i)
i = File1.ReadByte()
Loop
Чтение и запись части бинарного файла
Создавал я раньше подобную тему для вб6, а сейчас реч идет о вб .Net 2008. Мне нужно организовать копирование файла со статусом в ProgressBar. Писать процедуру не прошу. Подскажите каким способом открывать файлы и какими методами пользоваться при чтении и записи. А то запутался уже. Сделал рабочий пример:
Этот пример работает супер, md5 совпадает, но это по одному байту чтение\запись... Долго работать будет....Функция Read, которая позволяет читать несколько файлов мне тоже не нравится, так как она эти несколько байтов читает в массив байтов, тоже не красиво....
Надо как то за один раз прочитать примерно 4кб, записатьт и все это в цикле...
Код:
Этот пример работает супер, md5 совпадает, но это по одному байту чтение\запись... Долго работать будет....Функция Read, которая позволяет читать несколько файлов мне тоже не нравится, так как она эти несколько байтов читает в массив байтов, тоже не красиво....
Надо как то за один раз прочитать примерно 4кб, записатьт и все это в цикле...