[问题求助] VBS调用临时文件夹如何写

nai

VBS调用临时文件夹，临时文件夹的路径该如何写？我要的是临时文件夹变量。VBS能否使用临时文件夹变量？

yu2n

回复 1# nai
例1：TEMP环境变量（临时文件夹位置）

Msgbox CreateObject("WScript.Shell").ExpandenVironmentStrings("%TEMP%")
复制代码

例2：获取用户名

Msgbox CreateObject("WScript.Shell").ExpandenVironmentStrings("你的用户名是：%USERNAME%")
复制代码

apang

例3：

MsgBox CreateObject("Scripting.FileSystemObject").GetSpecialFolder(2)
复制代码

nai

回复 2# yu2n
可能是我没有讲清楚，比如：

set fso=createobject("scripting.filesystemobject")
fso.deletefile "C:\Users\administrator\AppData\Local\Temp\*.*"
复制代码

绝对路径”C:\Users\administrator\AppData\Local\Temp“我想改成环境变量如何改，我试过用

set fso=createobject("scripting.filesystemobject")
fso.deletefile "%TEMP%\*.*"
复制代码

行不通

apang

回复 4# nai


    亲，这样行得通不？

CreateObject("WScript.Shell").Run "cmd /c del /a /q /f ""%temp%\*"""
复制代码

nai

回复 5# apang
这样调用批处理代码是可以，

czjt1234

还是调用批处理好

否则要加On Error Resume Next
防止有文件删除不掉而报错，反而啰嗦

9zhmke

环境变量要用ExpandEnvironmentStrings("%temp%")扩展出来才能用，比如：

Dim WshShell
Set WshShell=WScript.CreateObject("WScript.Shell")
msgbox WshShell.ExpandEnvironmentStrings("%temp%")

其实这些都可以百度到....