0

我需要创建各种大小的文件。如何创建一个 8MB 的?

(最好创建一个 HTA 应用程序并指定文件大小)

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

4

1 回答 1

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
于 2012-12-17T17:03:39.743 回答