Получить текущий путь временного каталога в VBScript?

Трюк VB, чтобы получить путь к текущему временному каталогу:

Private Declare Function GetTempPath Lib "kernel32" Alias "GetTempPathA" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long

не работает в VBScript. Так?

Ответ 1

WScript.CreateObject("Scripting.FileSystemObject").GetSpecialFolder(2)

Мне потребовалось некоторое время, чтобы найти его в Google. Итак, для следующего, ищущего то же, что и я...

Ответ 2

Const WindowsFolder = 0

Const SystemFolder = 1

Const TemporaryFolder = 2

Dim fso: Set fso = CreateObject("Scripting.FileSystemObject")

Dim tempFolder: tempFolder = fso.GetSpecialFolder(TemporaryFolder)

Ответ 3

Другая возможность:

CreateObject("WScript.Shell").ExpandEnvironmentStrings("%Temp%")

Ответ 4

Вы также можете использовать API GetTempPath. Это немного сложно назвать API из vbscript. Вот несколько указаний о том, как сделать вызовы Win32 API из vbscript:

Ссылка 1

Ссылка 2

Ссылка 3