【VBS】获取文件夹大小
文件截图:
运行结果:
第一步:编写脚本 GetFloderSize.vbs
1 '获得文件夹的大小 by 王牌飞行员(https://www.cnblogs.com/KMould/p/12334814.html) 2020年02月20日
2 Option Explicit
3 On Error Resume Next
4 Dim objFSO, objLocalFolder, strArg, longLocalFolderSize, strSizeMess
5 '判断参数
6 If WScript.Arguments.Count < 2 Then
7 WScript.Echo "缺少参数,第一个参数为文件夹路径,第二个参数为报告路径"
8 WScript.Quit
9 Else
10 strArg = WScript.Arguments(0)
11 End If
12
13 Set objFSO = CreateObject("Scripting.FileSystemObject")
14 Set objLocalFolder = objFSO.GetFolder(strArg)
15
16 If objLocalFolder = Empty Then
17 WScript.Echo "Invalid Path"
18 WScript.Quit
19 End If
20
21 longLocalFolderSize = objLocalFolder.Size
22
23 If longLocalFolderSize>=1024 And longLocalFolderSize<1024*1024 Then
24 strSizeMess = Round( longLocalFolderSize/1024, 3 ) & " K"
25 ElseIf longLocalFolderSize>=1024*1024 And longLocalFolderSize<1024*1024*1024 Then
26 strSizeMess = Round( longLocalFolderSize/1024/1024, 3 ) & " M"
27 ElseIf longLocalFolderSize>=1024*1024*1024 And longLocalFolderSize<1024*1024*1024*1024 Then
28 strSizeMess = Round( longLocalFolderSize/1024/1024/1024, 3 ) & " G"
29 ElseIf longLocalFolderSize>=1024*1024*1024*1024 Then
30 strSizeMess = Round( longLocalFolderSize/1024/1024/1024/1024, 3 ) & " T"
31 Else
32 strSizeMess = longLocalFolderSize & " B"
33 End If
34 Set objFSO = Nothing
35 Set objLocalFolder = Nothing
36
37 '-------------------get report --------------------------------
38 Dim strReport,fs,f
39 strReport=WScript.Arguments(1)
40 set fs =CreateObject("scripting.filesystemobject")
41 set f =fs.opentextfile(strReport,8)
42 f.writeline date() & " " & strArg & " " & strSizeMess
43 f.close
44 Set fs = Nothing
45 '--------------------------------------------------------------
46 'WScript.Echo "完成!"
47 WScript.Quit
第二步:使用批处理脚本GetFloderSize.bat调用VBS脚本使用
@echo off
rem 文件夹路径 报告路径
call GetFloderSize.vbs D:\M D:\报告.txt
echo 成功!
【VBS】获取文件夹大小的更多相关文章
- Linux C++获取文件夹大小
项目中要计算指定文件夹的大小.百度查到这篇文章,https://my.oschina.net/Tsybius2014/blog/330628方法可行,运行正确. 拿到我们的项目中,却遇到一些问题:程序 ...
- 用C#实现获取文件夹大小的源代码
using System; using System.Collections.Generic; using System.IO; using System.Linq; using System.Tex ...
- python 获取文件夹大小
__author__ = 'bruce' import os from os.path import join,getsize def getdirsize(dir): size=0l for (ro ...
- c# 获取文件夹大小
private long GetDirectorySizeMethod1(string directory) { long directorySize = 0; DirectoryInfo di = ...
- C#获取文件和文件夹大小
代码如下: /// <summary> /// 获取文件夹大小 /// </summary> /// <param name="dirPath"> ...
- python3获取文件及文件夹大小
获取文件大小 os.path.getsize(file_path):file_path为文件路径 >>> import os >>> os.path.getsize ...
- python 获取文件和文件夹大小
1.os.path.getsize可以获取文件大小 >>> import os >>> file_name = 'E:\chengd\Cd.db' >> ...
- python获取文件及文件夹大小
Python3.3下测试通过 获取文件大小 使用os.path.getsize函数,参数是文件的路径 获取文件夹大小 import os from os.path import join, getsi ...
- android 获取文件夹、文件的大小 以B、KB、MB、GB 为单位
android 获取文件夹.文件的大小 以B.KB.MB.GB 为单位 public class FileSizeUtil { public static final int SIZETYPE_B ...
随机推荐
- SQL Server 查看进程阻塞及处理
修改或删除数据前先备份,先备份,先备份(重要事情说三遍)! 1.首先,查看线程,分析是否存在阻塞进程,blocked>0都是当前被阻塞的进程 SELECT * FROM sysprocesse ...
- 如何在Mac OS X中开启VIM语法高亮和显示行号
VIM (Wikipedia图) Vim 是一款相当给力的源自UNIX平台的命令行文本编辑器,不过不给力的是,Mac OS X下并没有诸多Linux发行版上VIM那些牛逼哄哄的神马代码高亮显示啊,自动 ...
- 使用JSONassert进行JSON对象对比
在日常工作中,会接到用户提出一张订单,修改后需要记录每次修改的信息,然后需要查看修改前后的差异信息这样的需求.要实现这样的功能方式有很多.下面介绍下JSONassert的简单使用,也方便自己后续使 ...
- volatile 的使用
① 编译器很聪明,会帮我们做些优化,比如: int a; a = 0; // 这句话可以优化掉,不影响 a 的结果 a = 1; ② 有时候编译器会自作聪明,比如: int *p = ioremap( ...
- [转载]备忘:oh my zsh 的安装、更新、删除
备忘:oh my zsh 的安装.更新.删除 傅易君 关注 0.8 2016.09.25 00:56* 字数 68 阅读 14920评论 0喜欢 4 查看系统当前 shell $ cat /etc/ ...
- [转载]虚拟化之KVM配置
虚拟化之KVM配置 2017-11-06 [TOC] 虚拟化:通过虚拟化工具把cpu,内存,硬盘等真实硬件资源给模拟成更少的虚拟硬件资源.进行虚拟化的好处是,最大限度的利用硬件资源.也是云计算的基础. ...
- Linux性能监控与分析之--- CPU
Linux性能监控与分析之--- CPU 望月成三人关注 2016.07.25 18:16:12字数 1,576阅读 2,837 CPU性能指标 用户进程使用CPU的比率 系统进程使用CPU的比率 W ...
- openstack创建vlan网络并配置网络设备
1.在管理员-->网络-->创建网络. 2.填写网络信息,这里要划分新的VLAN,注意在物理网络中填写的事VLAN,段ID指的是vlan的id 3.创建的网络. 4.创建子网,在里面修改子 ...
- 2019年又迎来Hi1620,鲲鹏920则是Hi1620系列的正式品牌和型号
据记者了解,2013年华为就发布了Hi1610,2014年的Hi1612是ARM64位CPU,2016年的Hi1616是首颗支持多路的ARM处理器,2019年又迎来Hi1620,鲲鹏920则是Hi16 ...
- mysql默认值
1.创建表时添加默认值 语法: <字段名><类型><默认值> 实例: MySQL [wordpress]> create table ly_content( ...