| GetSpecialFolder 方法 |
|
GetSpecialFolder 方法的语法有以下部分:
| 部分 | 描述 |
| object | 必选。应为 FileSystemObject 的名称。 |
| folderspec | 必选。要返回的特殊文件夹名称。可以是“设置”部分列出的任何常数。 |
| 常数 | 值 | 描述 |
| WindowsFolder | 0 | Windows 文件夹,包含 Windows 操作系统安装的文件。 |
| SystemFolder | 1 | System 文件夹,包含库、字体和设备驱动程序文件。 |
| TemporaryFolder | 2 | Temp 文件夹,用于保存临时文件。可以在 TMP 环境变量中找到该文件夹的路径。 |
Dim fso, tempfile
Set fso = CreateObject("Scripting.FileSystemObject")
Function CreateTempFile
Dim tfolder, tname, tfile
Const TemporaryFolder = 2
Set tfolder = fso.GetSpecialFolder(TemporaryFolder)
tname = fso.GetTempName
Set tfile = tfolder.CreateTextFile(tname)
Set CreateTempFile = tfile
End Function
Set tempfile = CreateTempFile
tempfile.WriteLine "世界你好"
tempfile.Close