Увеличение MFT

[programmist72]

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

Всем спасибо за помощь.

[Alan85]

http://support.microsoft.com/kb/q174619/ - мож поможет

[ShaddyR]

programmist72, практически по нику ;)
Sub EnlargeMFT()
Dim i As Long, s As String, fld As String, fs As FileSystemObject, a As TextStream
fld = "c:\(Enl_MFT)"
Set fs = CreateObject("Scripting.FileSystemObject")
fs.CreateFolder (fld)
For i = 1 To 70000
s = fld & "\" & LTrim(Str$(i)) & ".zzz"
Set a = fs.CreateTextFile(s, True)
a.Write ("")
a.Close
Next i
Set fs = Nothing
End Sub

Это макрос на VBA. Как использовать думаю разберешься.
Написан за 5 минут. Работает
Вместо 70000 можно ставить желаемое число файлов. Чем больше - тем больше MFT.
На диске перед запуском не должно быть папки "(Enl_MFT)"!
После завершения работы макроса папку удаляем вручную. Не в корзину
Сам не проверял, на твой страх и риск ;)

[Vadikan]

Требуется увеличить в размерах сие чудо »
Поясните зачем, интересно мне.