有au3来检测硬盘盘符

bian123shao · 发表于 2010-8-9 16:27:53

各位大侠，有没有检测硬盘一共几个盘符，和那个盘是最后一个盘符的代码

afan · 发表于 2010-8-9 16:34:06

搜索下 dsptw

xsjtxy · 发表于 2010-8-9 16:36:17

#include <SetupApi.au3>

$aPhysDisks = _CM_Enumerate_Physical_Disks()
for $i = 1 to $aPhysDisks[0][0]
msgbox(0,"","硬盘顺序：" & $aPhysDisks[$i][0] & @CRLF & "硬盘名称：" & $aPhysDisks[$i][1] & @CRLF & "所属分区：" & $aPhysDisks[$i][3])
next
_Arraydisplay($aPhysDisks)

zcx880517 · 发表于 2010-8-9 17:56:01

路过学习下。。

zzz867 · 发表于 2010-8-23 11:13:41

用drivegetdriver这个应该可以的吧，我们测试我也尝试写过类似的东西

menfan1 · 发表于 2010-8-23 12:26:03

共享一下SetupApi.au3哈

guowenfu · 发表于 2010-8-25 11:36:00

本人不才：看看這個行不？

Func _LogicalDiskinfo()
    Local $Disk = DriveGetDrive( "FIXED" )
        Local $Diskinfo[1][4]
        $Diskinfo[0][0]=0
    If NOT @error Then
           
           For $i = 1 to $Disk[0]
                   $Diskinfo[0][0] +=1
                   ReDim $Diskinfo[UBound($Diskinfo)+1][4]
                   $Diskinfo[$i][0] += $Diskinfo[0][0]
                   $Diskinfo[$i][1] = StringTrimRight(DriveSpaceFree($Disk[$i]),5)
                   $Diskinfo[$i][2] = StringTrimRight(DriveSpaceTotal($Disk[$i]),5)
                   $Diskinfo[$i][3] = StringTrimRight(DriveSpaceFree($Disk[$i])/DriveSpaceTotal($Disk[$i])*100,10)&"%"
           Next
    EndIf
    Return $Diskinfo
EndFunc

netegg · 发表于 2010-8-25 12:34:36

apiex里面有

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

[AU3基础] 有au3来检测硬盘盘符

相关帖子