论坛 › 已解决问题区 › 如何获得系统中驱动器的数量

黑色de郁金香 发表于 2009-8-20 16:25:35

如何获得系统中驱动器的数量

本帖最后由 黑色de郁金香 于 2009-8-21 11:34 编辑

这里所说的驱动器不是盘符，一个驱动器可以包含很多盘符，详细见附件图，图上画蓝线的就是驱动器数量，一共三个，不知道auit该用什么函数获取它们的数量，请大侠帮帮忙

netegg 发表于 2009-8-20 16:33:05

实现可以，不过信息不一定这么全

黑色de郁金香 发表于 2009-8-20 16:36:37

请大侠赐教，被这个问题折腾了一整天了，脑袋都大了

黑色de郁金香 发表于 2009-8-20 16:39:22

只要知道有几个驱动器就行了

pusofalse 发表于 2009-8-20 17:01:34

SetupDiGetClassDevs
SetupDiEnumDeviceInfo
SetupDiGetClassDescription
这3个API可以做到，MSDN上都有其用法。

黑色de郁金香 发表于 2009-8-20 17:20:07

谢谢 pusofalse 的热心帮助！我在研究研究

大绯狼 发表于 2009-8-20 17:44:10

Local $var = DriveGetDrive("all")
Local $Drives = ""
If Not @error Then
    Local $Var = _GetDiskType()
    For $J = 1 To $Var
      $Drives = $Drives & $Var[$J] & @CRLF
    Next
EndIf
MsgBox(0,0,$Drives)
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

黑色de郁金香 发表于 2009-8-21 11:34:13

大绯狼谢谢你！问题已经成功解决！

netegg 发表于 2009-8-21 12:47:48

读注册表？有个api可以搞定

黑色de郁金香 发表于 2009-8-22 13:25:26

本帖最后由 黑色de郁金香 于 2009-8-30 13:56 编辑

9# netegg
非常感谢大绯狼还有netegg的帮助！

afan 发表于 2009-8-22 14:17:40

9# netegg
非常感谢大绯狼
黑色de郁金香 发表于 2009-8-22 13:25 http://www.autoitx.com/images/common/back.gif

9#貌似不是大灰狼是鸡蛋...

lrbin50 发表于 2009-9-9 23:57:38

9楼API的那两个怎用?能给个实例么？

itimen 发表于 2013-4-12 12:00:16

很盲目。。不知道怎么做

r200802 发表于 2013-4-15 09:09:01

学习了。收藏。

查看完整版本: 如何获得系统中驱动器的数量