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

黑色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

[au3]Local $var = DriveGetDrive("all")
Local $Drives = ""
If Not @error Then
Local $Var = _GetDiskType()
For $J = 1 To $Var[0]
      $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[0] = $Count
      For $J = 1 To $Count
            $Return[$J] = RegRead($Enum & RegRead($Disk, $J - 1), "FriendlyName")
      Next
      Return $Return
EndFunc ;==>_GetDiskType[/au3]

黑色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

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

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

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

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

很盲目。。不知道怎么做

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

学习了。收藏。

		自动登录	找回密码
密码			加入

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

本帖子中包含更多资源

评分

本帖子中包含更多资源