首页 相关文章 取得Disk Free Space与Total Space

取得Disk Free Space与Total Space

  

Private Declare Function GetDiskFreeSpace Lib "kernel32" _  Alias "GetDiskFreeSpaceA" (ByVal lpRootPathName As String, _  lpSectorsPerCluster As Long, lpBytesPerSector As Long, _  lpNumberOfFreeClusters As Long, lpTtoalNumberOfClusters As Long) As Long'Path = "c:\" 指定Volume 代号, 如: c:\ d:\ e:\Public Function GetFreeSpace(Byval Path as String) as LongDim aa As LongDim Path As StringDim SecPerClust As LongDim BytePerSec As Long, FreeClust As Long, totClust As LongPath = "c:\" '指定Volume 代号, 如: c:\ d:\ e:\aa = Get...[ 查看全文 ]

2016-02-19 标签:

取得Disk Free Space与Total Space的相关文章

手机页面
收藏网站 回到头部