amwuujj 发表于 2010-11-10 11:58:44

AU3如何查看硬盘个数?

如题。。。谢谢。。

3mile 发表于 2010-11-10 12:53:12

#include <array.au3>
Local $Var = _GetDiskType()
_ArrayDisplay($Var)
Func _GetDiskType()
        Local $Disk = "HKLM\SYSTEM\CurrentControlSet\Services\Disk\Enum\"
        Local $Enum = "HKLM\SYSTEM\CurrentControlSet\Enum\"
        Local $Count = RegRead("HKLM\SYSTEM\CurrentControlSet\Services\Disk\Enum\", "Count")
        Dim $Return[$Count + 1]
        $Return = $Count
        For $J = 1 To $Count
                $Return[$J] = RegRead($Enum & RegRead($Disk, $J - 1), "FriendlyName")
        Next
        Return $Return
EndFunc   ;==>_GetDiskType

G,man。 发表于 2010-11-10 13:03:23

哈哈 顺路学习了

amwuujj 发表于 2010-11-16 09:46:47

本帖最后由 amwuujj 于 2010-11-16 09:48 编辑

回复 2# 3mile


    多谢了。。。

   额。不过。这个在PE下能行的通嘛?》

haodd 发表于 2010-11-16 10:40:26

学习了 呵呵
页: [1]
查看完整版本: AU3如何查看硬盘个数?