51Testing软件测试论坛

标题: vbs中有没有清空临时文件夹的命令,大侠告诉一下怎么用啊? [打印本页]

作者: csj    时间: 2010-8-12 15:22
标题: vbs中有没有清空临时文件夹的命令,大侠告诉一下怎么用啊?
vbs中有没有清空临时文件夹的命令,大侠告诉一下,如果有怎么用啊?
作者: xhhuang1618    时间: 2010-8-12 17:33
标题: 回复 1# 的帖子
you try it:
Call del("c:\PMCM")


Function Del(folderspec)
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set objFolders = fso.GetFolder(folderspec)
    Set objFile= objFolders.Files
        Set objFolder = objFolders.SubFolders

        For Each obj in objFile
                obj.Delete
        Next

        For Each obj in objFolder
                obj.Delete
        Next
       
End Function




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2