VBS调用临时文件夹如何写

nai

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

yu2n

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

1. Msgbox CreateObject("WScript.Shell").ExpandenVironmentStrings("%TEMP%")

复制代码

例2：获取用户名

1. Msgbox CreateObject("WScript.Shell").ExpandenVironmentStrings("你的用户名是：%USERNAME%")

复制代码

apang

例3：

1. MsgBox CreateObject("Scripting.FileSystemObject").GetSpecialFolder(2)

复制代码

nai

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

1. set fso=createobject("scripting.filesystemobject")
   
2. fso.deletefile "C:\Users\administrator\AppData\Local\Temp\*.*"

复制代码

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

1. set fso=createobject("scripting.filesystemobject")
   
2. fso.deletefile "%TEMP%\*.*"

复制代码

行不通

apang

回复 4# nai


    亲，这样行得通不？

1. 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%")

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