Разное

Alan85 · Отправлено: **22:16, 05-04-2009** | #2

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

ShaddyR · Конфигурация компьютера

programmist72, практически по нику

Цитата RuBoard:

Код:

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 · Конфигурация компьютера

Цитата programmist72:

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

Поясните зачем, интересно мне.