论坛 › 『 提问交流 』 › 如何获取连接计算机所有磁盘的所有活动分区

kkkpep 发表于 2012-9-21 09:30:51

如何获取连接计算机所有磁盘的所有活动分区

不要借助 dsptw ，不少情况下运行异常
不要用WMI，大部分PE都不支持

kkkpep 发表于 2012-9-21 18:12:41

回复 2# guowenfu

可否给讲解一下？

guowenfu 发表于 2012-9-21 16:19:10

Func _LogicalDiskinfo()
Func _LogicalDiskinfo()
        Local $Disk = DriveGetDrive("FIXED")
        Local $Diskinfo
        $Diskinfo = 0
        If Not @error Then

                For $i = 1 To $Disk
                        $Diskinfo += 1
                        ReDim $Diskinfo
                        $Diskinfo[$i] += $Diskinfo
                        $Diskinfo[$i] = StringTrimRight(DriveSpaceFree($Disk[$i]), 5)
                        $Diskinfo[$i] = StringTrimRight(DriveSpaceTotal($Disk[$i]), 5)
                        $Diskinfo[$i] = StringTrimRight(DriveSpaceFree($Disk[$i]) / DriveSpaceTotal($Disk[$i]) * 100, 10) & "%"
                Next
        EndIf
        Return $Diskinfo
EndFunc   ;==>_LogicalDiskinfo

查看完整版本: 如何获取连接计算机所有磁盘的所有活动分区