精易论坛

标题: 通过U盘序列号确定盘符 [打印本页]

作者: yppy988 时间: 2019-4-15 10:53
标题: 通过U盘序列号确定盘符
[e]
.版本 2
.支持库 spec
.支持库 eAPI

.程序集窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕
.局部变量 n, 文本型

U盘识别 (“60A44C413B99BE31E99800E1”, n)
调试输出 (n)

.子程序 U盘识别, , , 通过序列号识别到U盘盘符
.参数序列号, 文本型, , U盘序列号
.参数盘符, 文本型, , 接收盘符变量
.局部变量系统信息, 系统信息
.局部变量路径, 文本型
.局部变量 zc表, zc表操作
.局部变量列表, 文本型, , "0"
.局部变量计次, 整数型
.局部变量临时盘符, 文本型
.局部变量驱动列表, 文本型, , "0"

取系统信息 (系统信息)
驱动列表＝取驱动器列表 (3)
.如果 (系统信息.操作系统＝ “Windows 7”)
路径＝ “HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Enum\WpdBusEnumRoot\UMB”
.否则
路径＝ “HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Enum\SWD\WPDBUSENUM”
.如果结束
zc表.枚举子项 (路径, 列表)

.计次循环首 (取数组成员数 (列表), 计次)
.如果真 (寻找文本 (列表 [计次], 序列号, , 假) ≠ -1)
      临时盘符＝ zc表.取字符串值 (路径＋ “\” ＋列表 [计次], “FriendlyName”)
      跳出循环 ()
.如果真结束

.计次循环尾 ()

.如果 (取文本长度 (临时盘符) ＝ 3 且寻找文本 (临时盘符, “:”, , 假) ≠ -1)
.计次循环首 (取数组成员数 (驱动列表), 计次)
      .如果真 (驱动列表 [计次] ＋ “\” ＝临时盘符)
         盘符＝临时盘符
         跳出循环 ()
      .如果真结束

.计次循环尾 ()
.否则
.计次循环首 (取数组成员数 (驱动列表), 计次)
      .如果真 (取磁盘卷标 (驱动列表 [计次]) ＝临时盘符)
         盘符＝驱动列表 [计次] ＋ “\”
         跳出循环 ()
      .如果真结束

.计次循环尾 ()
.如果结束
[/e]

之前提问区的问题经过测试的出来的方法欢迎大家在测试一下有无BUG

U盘.e

765.47 KB, 下载次数: 121, 下载积分: 精币 -2 枚

作者: kyo9766 时间: 2019-4-16 08:23
学习学习 U盘怎么识别序列号，感谢分享

作者: dodge123 时间: 2019-4-16 16:05
学习学习 U盘怎么识别序列号

作者: jable 时间: 2019-4-23 20:47
尽力啊想学一下。。。。。。。。。。。。。。。。。。

作者: yunying 时间: 2019-4-26 17:34
提示: 作者被禁止或删除内容自动屏蔽

作者: yppy988 时间: 2019-4-26 19:02

yunying 发表于 2019-4-26 17:34
网盘已经很强大了~ 不怎么使用U盘

用来加密用的

作者: Cydias 时间: 2019-5-25 18:01
所以是不是可以用于做usb压枪宏

作者: Yeng 时间: 2019-6-29 16:38
来学习下嘻嘻嘻

作者: 四君子 时间: 2019-10-26 22:38
强烈支持楼主的分享！！！

作者: 259504 时间: 2022-5-20 10:48
顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶

作者: 259504 时间: 2022-5-21 09:17
顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶

作者: wanlig34 时间: 2023-2-22 08:32
感谢分享

作者: KAYsk 时间: 2024-2-23 17:12
看看看看看看

作者: yangjz 时间: 2024-3-14 12:34
啊发给我哇啊我给

欢迎光临精易论坛 (https://125.confly.eu.org/)