VBScript Create 方法
最后修改于 2025 年 4 月 9 日
VBScript 中的 Create 方法是 FileSystemObject 的一部分。它用于创建新文件、文件夹或文本流。此方法对于 VBScript 中的文件系统操作至关重要。它提供了创建各种类型对象的不同变体。
Create 方法包括 CreateTextFile、CreateFolder 等。每种方法在文件系统操作中都有特定的用途。本教程将通过实际示例涵盖这些方法，以演示其用法。
Create 方法概述
VBScript 中的 Create 方法用于创建新的文件系统对象。它们可通过 FileSystemObject 访问。这些方法返回新创建对象的引用，以便进一步操作。
关键方法包括用于文本文件的 CreateTextFile 和用于目录的 CreateFolder。每种方法都有特定的参数来控制创建行为。了解这些方法可实现强大的文件系统自动化。
创建文本文件
此示例演示了使用 CreateTextFile 创建新文本文件。该方法在指定路径创建空白文本文件。它返回一个用于写入的 TextStream 对象。
Set fso = CreateObject("Scripting.FileSystemObject")
Set file = fso.CreateTextFile("C:\Temp\example.txt", True)
file.WriteLine "This is a test file created with VBScript"
file.Close
Set file = Nothing
Set fso = Nothing
脚本创建 FileSystemObject 并调用 CreateTextFile。第二个参数 (True) 会覆盖现有文件。脚本将一行写入文件并关闭它。完成后务必释放对象。
创建文件夹
此示例展示了如何使用 CreateFolder 创建新目录。该方法在指定路径创建文件夹。如果文件夹已存在，它将引发错误。
Set fso = CreateObject("Scripting.FileSystemObject")
On Error Resume Next
Set folder = fso.CreateFolder("C:\Temp\NewFolder")
If Err.Number = 0 Then
WScript.Echo "Folder created successfully"
Else
WScript.Echo "Error creating folder: " & Err.Description
End If
Set folder = Nothing
Set fso = Nothing
脚本尝试创建“C:\Temp\NewFolder”。错误处理会捕获文件夹已存在的情况。该方法返回一个 Folder 对象。对于文件系统操作，务必包含错误处理。
创建带 Unicode 编码的文件
此示例使用 CreateTextFile 创建 Unicode 文本文件。第三个参数控制 Unicode 编码。将其设置为 True 会创建 Unicode 文件而不是 ASCII 文件。
Set fso = CreateObject("Scripting.FileSystemObject")
Set file = fso.CreateTextFile("C:\Temp\unicode.txt", True, True)
file.WriteLine "This file uses Unicode encoding"
file.Close
Set file = Nothing
Set fso = Nothing
脚本创建了一个 Unicode 编码的文本文件。第三个 True 参数启用了 Unicode 支持。这对于非 ASCII 字符集至关重要。文件操作与 ASCII 文件相同。
创建多个文件夹
此示例演示了创建嵌套文件夹结构。它使用多个 CreateFolder 调用来构建目录树。每次调用都会创建层次结构的一个级别。
Set fso = CreateObject("Scripting.FileSystemObject")
On Error Resume Next
fso.CreateFolder "C:\Temp\Project"
fso.CreateFolder "C:\Temp\Project\Documents"
fso.CreateFolder "C:\Temp\Project\Images"
If Err.Number = 0 Then
WScript.Echo "Folder structure created successfully"
End If
Set fso = Nothing
脚本在 C:\Temp 下创建了三个嵌套文件夹。如果文件夹已存在，错误处理可防止脚本终止。此方法可构建复杂的目录结构。每个文件夹都必须单独创建。
创建和写入文本文件
此综合示例创建文本文件并写入多行。它演示了从创建到写入和关闭的完整过程。该示例展示了实际的文件操作。
Set fso = CreateObject("Scripting.FileSystemObject")
Set file = fso.CreateTextFile("C:\Temp\data.log", True)
file.WriteLine "Log file created: " & Now()
file.WriteLine "-------------------------------"
file.WriteLine "This is line 1 of the log file"
file.WriteLine "This is line 2 of the log file"
file.WriteBlankLines(1)
file.WriteLine "End of log file"
file.Close
Set file = Nothing
Set fso = Nothing
脚本创建了一个带有时间戳和结构化内容的日志文件。WriteLine 添加带换行符的文本，而 WriteBlankLines 添加空行。写入后务必关闭文件，以确保数据已保存。
来源
在本篇文章中，我们探讨了 VBScript 中的 Create 方法，涵盖了文件和文件夹的创建。从简单的文本文件到复杂的目录结构，这些示例演示了基本的文件系统操作。通过这些知识，您可以在 VBScript 项目中实现强大的文件处理。