在运行脚本并输出(文件夹中的文件大小)假设存储在变量中时,是否存在任何VB脚本来查找文件夹大小,假定该文件夹路径位于该位置。
使用以下脚本,我可以找出文件夹的大小,这里我必须手动提供路径,并且输出将出现在消息框中....
'此示例演示如何获取任何文件夹的大小。 “它使用“文件夹”对象的“ .Size”属性。
Dim Fso,消息,FolderObj,FolderPath Set Fso = CreateObject(“ Scripting.FileSystemObject”)'创建“ FileSystemObject”对象。 FolderPath = InputBox(“输入文件夹的完整路径:”,“文件夹路径”)'获取文件夹的路径 如果(Fso.FolderExists(FolderPath))然后'检查文件夹是否在指定路径退出 Set FolderObj = Fso.GetFolder(FolderPath)'返回“文件夹”对象 Msg =“ Folder:”&FolderPath&“使用”&FolderObj.Size&“ Bytes”'.Size属性返回以字节为单位的文件夹大小。 其他“文件夹不退出。 Msg =“文件夹:”&FolderPath&“不存在。 万一 MsgBox Msg