是否有任何VB脚本在我运行脚本时要查找文件夹路径的地方找到文件夹大小

时间:2019-12-17 05:42:57

标签: automationanywhere

在运行脚本并输出(文件夹中的文件大小)假设存储在变量中时,是否存在任何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

0 个答案:

没有答案