excel表格每产生一次就要30K，我想做一个状态提示栏，让其显示磁盘的剩余容量，当磁盘快用完时产生一个“报警”，并提示运行人员将excel表格移动到其他地方。请问该如何编写脚本？谢谢！
最佳答案
简单的vbs来实现的话可以这样做
dim DriveC
dim FreeSpace
dim FSO
Set FSO = CreateObject("Scripting.FileSystemObject")
Set DriveC = FSO.GetDrive("C") ''写进要查看的磁盘名字
FreeSpace = FormatNumber(DriveC.FreeSpace / 1024 / 1024, 3)
''处理结果，返回的DriveC的FreeSpace属性是字节，除一个 1024 就是k，再除就是M
msgbox FreeSpace ''这里显示的就是c盘剩余空间为多少M
根据你的需要，需要显示得规范的话，就处理一下，把结果按G，M，k显示即可。
提问者对于答案的评价：
谢谢了。
原创文章，作者：more0621，如若转载，请注明出处：https://www.zhaoplc.com/plc263625.html
微信扫一扫 
支付宝扫一扫 