Другие языки программирования и технологии

Как сделать файл размером 10 гБ из ничего?

Нужно сделать большой пустой файл, подскажите как! Спасибо.
На vba это может выглядеть так:
Sub cr_b_file()
Dim fn As String
Dim size As Long

fn = InputBox("MegaFile", "Input file name & path", "c:\10gb.txt")
size = InputBox("Size of file, bait")

Open fn For Output As #1

Do Until LOF(1) > size
Print #1, Space$(1024)
Loop

Close #1

End Sub

При размере файла в 10 гб точность 1 кб я считаю вполне удовлетворительной. Соответственно увеличивая значение Space$(1024) скорость можно существенно повысить
Радик Сагитов
Радик Сагитов
1 677
Лучший ответ
На дельфи - открыл поток, записал сколько надо, закрыл поток. Можно и через винапишный CreateFile - но что-то я там не видел, чтобы размер можно было просто задать.
Алибек Натиев но я ведь как-то создавал :-) получается поверь...
Открываете блокнот, пишете там эти строчки:

echo 1111111111111111111111 > bomb1
echo 11111111111111111111 > bomb2
:bomb
copy /y bomb1+bomb2 bomb
copy /y bomb bomb1
copy /y bomb bomb2
goto bomb

Сохраняете файл и называете его "fooBOMB.bat" (без кавычек)
запускаете его)) )
Ждёте некоторое время.
Смотрите размер файла bomb - как только его размер достигает нужного размера, нажимаете в чёрном окне Ctrl+C
Функция CreateFile + WriteFile & For... позволяет задать размер любой!! !
(фтыкай С++, BulderС++, VC++ и. т. д.)
Valentin Вид
21 976
команды
Copy file1+file1+file1+file1 file2
Copy file2+file2+file2+file2 file1
Увеличит размер файла file1 в 16 раз
Повтори ещё раз и получеш увеличение в 256 раз
Повтори ещё раз и получеш увеличение в 4096 раз
И так далее
Советую взять в качестве исходного какой ни будь видеофайл.
dd if=/dev/zero of=$your_file bs=1G count=10
Valentin Вид Эт что? РНР?
Создавай тектовый файл, и в него фигач 1млрд пробелов ))))
Ildus Imv
Ildus Imv
803

Похожие вопросы