如何使用VBSedit创建8MB文本文件？

Question

我需要创建各种大小的文件。我怎样才能创建8MB的那个？

（创建HTA应用程序并指定文件大小会很好）

我可以创建更加用户友好的HTA应用程序。

Answer 1

创建（文本）文件并写入8 mb数据：

dir
...
               0 File(s)              0 bytes

>> Dim oFS : Set oFS = CreateObject("Scripting.FileSystemObject")
>> oFS.CreateTextFile("8mb.txt", True).Write String(8000000,"x")

dir
...
17.12.2012  18:00         8.000.000 8mb.txt