求助如何用易语言获取U盘磁盘驱动器名称

三岁那年

各位的大佬求助一下 易语言如何写获取U盘的 驱动器名称，请附上你的源码感谢大佬！！！！！！！！！！！！


补充内容 (2025-12-6 17:30):
刚才忘了说了 比如通过G盘取这个磁盘器的名字  通过盘符来判断名字

企鹅号525150138

cmd命令:
wmic diskdrive get caption,deviceid /format:list

Milknwb

https://bbs.ijingyi.com/forum.php?mod=viewthread&tid=14449791    你看看这个，不知道有没有用

三岁那年

Milknwb 发表于 2025-12-6 17:37
https://bbs.ijingyi.com/forum.php?mod=viewthread&tid=14449791    你看看这个，不知道有没有用 ...

取不到信息。。。。。。

wtflxk

  

子程序名	返回值类型	公开	备 注
取磁盘描述	文本型
参数名	类 型	参考	可空	数组	备 注
驱动器号	整数型				物理驱动器号 (0=第一块硬盘,1=第二块...)

变量名	类 型	静态	数组	备 注
ret	文本型
arr	文本型		0
SCSI	文本型
Disk	文本型
vid	文本型

ret ＝ 系统_取文本注册项 ( #HKEY_LOCAL_MACHINE, “SYSTEM\CurrentControlSet\services\Disk\Enum\”, 到文本 (驱动器号), G_SYSINFO.是否是64位系统 ())
arr ＝ 分割文本 (ret, “\”, )
如果真 (取数组成员数 (arr) ≥ 3)
SCSI ＝ arr [1]
Disk ＝ arr [2]
vid ＝ arr [3]
返回 (系统_取文本注册项 ( #HKEY_LOCAL_MACHINE, “SYSTEM\CurrentControlSet\Enum\” ＋ SCSI ＋ “\” ＋ Disk ＋ “\” ＋ vid, “FriendlyName”, G_SYSINFO.是否是64位系统 ()))
返回 (“”)

.版本 2<br /> <br /> .子程序 取磁盘描述, 文本型, 公开<br /> .参数 驱动器号, 整数型, , 物理驱动器号 (0=第一块硬盘,1=第二块...)<br /> .局部变量 ret, 文本型<br /> .局部变量 arr, 文本型, , "0"<br /> .局部变量 SCSI, 文本型<br /> .局部变量 Disk, 文本型<br /> .局部变量 vid, 文本型<br /> <br /> ret ＝ 系统_取文本注册项 (#HKEY_LOCAL_MACHINE, “SYSTEM\CurrentControlSet\services\Disk\Enum\”, 到文本 (驱动器号), G_SYSINFO.是否是64位系统 ())<br /> arr ＝ 分割文本 (ret, “\”, )<br /> .如果真 (取数组成员数 (arr) ≥ 3)<br />     SCSI ＝ arr [1]<br />     Disk ＝ arr [2]<br />     vid ＝ arr [3]<br />     返回 (系统_取文本注册项 (#HKEY_LOCAL_MACHINE, “SYSTEM\CurrentControlSet\Enum\” ＋ SCSI ＋ “\” ＋ Disk ＋ “\” ＋ vid, “FriendlyName”, G_SYSINFO.是否是64位系统 ()))<br /> .如果真结束<br /> 返回 (“”)

我是这么取的

尛龍科技

  

子程序名	返回值类型	公开	备 注
获取U盘信息

变量名	类 型	静态	数组	备 注
objWMI	对象
colItems	对象
objItem	对象
枚举数量	整数型
i	整数型
objServices	对象

如果真 (objWMI.创建 (“WbemScripting.SWbemLocator”, ))
objServices ＝ objWMI.对象型方法 (“ConnectServer”, “localhost”, “root\CIMV2”, “”, “”)
如果真 (objServices.是否为空 () ＝ 假)
colItems ＝ objServices.对象型方法 (“ExecQuery”, “SELECT * FROM Win32_DiskDrive WHERE InterfaceType='USB'”)
枚举数量 ＝ colItems.读数值属性 (“Count”, )
如果真 (枚举数量 ＞ 0)
输出调试文本 (“找到 ” ＋ 到文本 (枚举数量) ＋ “ 个USB设备”)
计次循环首 (枚举数量, i)
objItem ＝ colItems.对象型方法 (“ItemIndex”, i － 1)
如果真 (objItem.是否为空 () ＝ 假)
输出调试文本 (“USB设备” ＋ 到文本 (i) ＋ “:”)
输出调试文本 (“  名称: ” ＋ objItem.读文本属性 (“Caption”, ))
输出调试文本 (“  设备ID: ” ＋ objItem.读文本属性 (“DeviceID”, ))
输出调试文本 (“  型号: ” ＋ objItem.读文本属性 (“Model”, ))
输出调试文本 (“  序列号: ” ＋ objItem.读文本属性 (“SerialNumber”, ))
输出调试文本 (“  大小: ” ＋ 到文本 (objItem.读数值属性 (“Size”, ) ÷ 1024 ÷ 1024 ÷ 1024) ＋ “ GB”)

计次循环尾 ()
输出调试文本 (“未找到USB设备”)

colItems ＝ objServices.对象型方法 (“ExecQuery”, “SELECT * FROM Win32_LogicalDisk WHERE DriveType=2”)
枚举数量 ＝ colItems.读数值属性 (“Count”, )
计次循环首 (枚举数量, i)
objItem ＝ colItems.对象型方法 (“ItemIndex”, i － 1)
如果真 (objItem.是否为空 () ＝ 假)
输出调试文本 (“可移动磁盘 ” ＋ objItem.读文本属性 (“DeviceID”, ) ＋ “:”)
输出调试文本 (“  卷标: ” ＋ objItem.读文本属性 (“VolumeName”, ))
输出调试文本 (“  文件系统: ” ＋ objItem.读文本属性 (“FileSystem”, ))
输出调试文本 (“  总大小: ” ＋ 到文本 (objItem.读数值属性 (“Size”, ) ÷ 1024 ÷ 1024 ÷ 1024) ＋ “ GB”)
输出调试文本 (“  可用空间: ” ＋ 到文本 (objItem.读数值属性 (“FreeSpace”, ) ÷ 1024 ÷ 1024 ÷ 1024) ＋ “ GB”)

计次循环尾 ()

.版本 2<br /> <br /> .子程序 获取U盘信息<br /> .局部变量 objWMI, 对象<br /> .局部变量 colItems, 对象<br /> .局部变量 objItem, 对象<br /> .局部变量 枚举数量, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 objServices, 对象<br /> <br /> .如果真 (objWMI.创建 (“WbemScripting.SWbemLocator”, ))<br />     objServices ＝ objWMI.对象型方法 (“ConnectServer”, “localhost”, “root\CIMV2”, “”, “”)<br /> <br />     .如果真 (objServices.是否为空 () ＝ 假)<br />         colItems ＝ objServices.对象型方法 (“ExecQuery”, “SELECT * FROM Win32_DiskDrive WHERE InterfaceType='USB'”)<br />         枚举数量 ＝ colItems.读数值属性 (“Count”, )<br /> <br />         .如果真 (枚举数量 ＞ 0)<br />             输出调试文本 (“找到 ” ＋ 到文本 (枚举数量) ＋ “ 个USB设备”)<br /> <br />             .计次循环首 (枚举数量, i)<br />                 objItem ＝ colItems.对象型方法 (“ItemIndex”, i － 1)<br />                 .如果真 (objItem.是否为空 () ＝ 假)<br />                     输出调试文本 (“USB设备” ＋ 到文本 (i) ＋ “:”)<br />                     输出调试文本 (“  名称: ” ＋ objItem.读文本属性 (“Caption”, ))<br />                     输出调试文本 (“  设备ID: ” ＋ objItem.读文本属性 (“DeviceID”, ))<br />                     输出调试文本 (“  型号: ” ＋ objItem.读文本属性 (“Model”, ))<br />                     输出调试文本 (“  序列号: ” ＋ objItem.读文本属性 (“SerialNumber”, ))<br />                     输出调试文本 (“  大小: ” ＋ 到文本 (objItem.读数值属性 (“Size”, ) ÷ 1024 ÷ 1024 ÷ 1024) ＋ “ GB”)<br />                 .如果真结束<br /> <br />             .计次循环尾 ()<br />             输出调试文本 (“未找到USB设备”)<br />         .如果真结束<br /> <br />         colItems ＝ objServices.对象型方法 (“ExecQuery”, “SELECT * FROM Win32_LogicalDisk WHERE DriveType=2”)<br />         枚举数量 ＝ colItems.读数值属性 (“Count”, )<br /> <br />         .计次循环首 (枚举数量, i)<br />             objItem ＝ colItems.对象型方法 (“ItemIndex”, i － 1)<br />             .如果真 (objItem.是否为空 () ＝ 假)<br />                 输出调试文本 (“可移动磁盘 ” ＋ objItem.读文本属性 (“DeviceID”, ) ＋ “:”)<br />                 输出调试文本 (“  卷标: ” ＋ objItem.读文本属性 (“VolumeName”, ))<br />                 输出调试文本 (“  文件系统: ” ＋ objItem.读文本属性 (“FileSystem”, ))<br />                 输出调试文本 (“  总大小: ” ＋ 到文本 (objItem.读数值属性 (“Size”, ) ÷ 1024 ÷ 1024 ÷ 1024) ＋ “ GB”)<br />                 输出调试文本 (“  可用空间: ” ＋ 到文本 (objItem.读数值属性 (“FreeSpace”, ) ÷ 1024 ÷ 1024 ÷ 1024) ＋ “ GB”)<br />             .如果真结束<br /> <br />         .计次循环尾 ()<br />     .如果真结束

三岁那年

尛龍科技 发表于 2025-12-6 19:48
[e=0].版本 2

.子程序 获取U盘信息

获取不到 谢谢了哥 我已经弄好了