开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 2967|回复: 84
打印 上一主题 下一主题
收起左侧

[易语言纯源码] 【纯源码】U盘全方面操作源码 BUG修复

  [复制链接]

结帖率:87% (20/23)
跳转到指定楼层
楼主
发表于 2025-3-23 23:15:23 | 只看该作者 回帖奖励 |正序浏览 |阅读模式   广东省东莞市
分享源码
界面截图: -
是否带模块: 纯源码
备注说明: -
帖子来源:【纯源码】U盘全方面操作源码https://125.confly.eu.org/forum.php?mod=viewthread&tid=14725988

修复:USB_移除所有U盘(报错问题)、USB_移除U盘 (失败问题)、USB_打开设备(失败问题)
测试平台 winxp win7 win10
本项目也是公司有个项目需要 刚好看到就下载学习使用,发现问题也顺带也修复一下,其他的没全部测试望大佬们须知!


修复源码: 【纯源码】U盘全方面操作源码_U盘操作.e (33.3 KB, 下载次数: 170, 售价: 2 枚 精币)












补充内容 (2025-7-10 21:11):
置顶有修复代码附件和方式

点评

为你点个赞   安徽省合肥市  发表于 2025-3-28 09:35

评分

参与人数 33好评 +10 精币 +43 收起 理由
danshiyuan + 1 + 2 支持开源~!感谢分享
booms + 1 感谢分享,很给力!~
黯丄辶 + 1 感谢分享,很给力!~
初阳123 + 1 感谢分享,很给力!~
jc520hll + 1 感谢分享,很给力!~
cbl521ysys + 1 感谢分享,很给力!~
3266167 + 1 感谢分享,很给力!~
文西哥 + 1 感谢分享,很给力!~
望尘莫及 + 1 感谢分享,很给力!~
pcghr355 + 1 感谢分享,很给力!~
huangdi956 + 1 感谢分享,很给力!~
ican8 + 1 感谢分享,很给力!~
z134 + 1 感谢分享,很给力!~
ma4747 + 1 感谢分享,很给力!~
t176 + 1 感谢分享,很给力!~
无尘666 + 1 感谢分享,很给力!~
huangdi9569 + 1 感谢分享,很给力!~
pj小黑屋 + 1 感谢分享,很给力!~
zjbin1989 + 1 感谢分享,很给力!~
liy456 + 1 感谢分享,很给力!~
圆圈 + 1 + 1 支持开源~!感谢分享
暮光之城 + 1 感谢分享,很给力!~
hackjoe + 1 感谢分享,很给力!~
风雨3137 + 1 感谢分享,很给力!~
oldghost + 1 + 1 大神的举手之劳,造福一方呀!
gytxtx + 1 + 2 开源精神必须支持~
kyo9766 + 1 感谢分享,很给力!~
李泽勇2 + 1 + 3 非常感谢!
abpyu + 1 + 2 支持开源~!感谢分享
w589321 + 1 + 2 感谢分享,很给力!~
多多帅吧 + 1 感谢你的支持,精易有你更精彩
Conquer + 1 + 2 支持开源~!感谢分享
笨来无一悟 + 1 + 5 功德+1

查看全部评分


本帖被以下淘专辑推荐:

结帖率:87% (20/23)

签到天数: 9 天

来自 78楼
 楼主| 发表于 2025-7-6 20:32:49 | 只看该作者   广东省东莞市
本帖最后由 汉族 于 2025-7-10 21:10 编辑
Milknwb 发表于 2025-7-4 00:59
USB_取消监视函数已经修复,源代码有误。
源代码处是返回 (SetWindowLong (全_句柄, -4, &USB处理过程)
  
子程序名返回值类型公开备 注
USB_取消监视整数型 不等于0则成功
返回 (SetWindowLongA (全_句柄, -4, 全_proc))
DLL命令名返回值类型公开备 注
SetWindowLongA整数型 
DLL库文件名:
User32.dll
在DLL库中对应命令名:
SetWindowLongA
参数名类 型传址数组备 注
hWnd整数型
nIndex整数型
dwNewLong整数型



修复新的附件: 【纯源码】U盘全方面操作源码_U盘操作 1.e (33.46 KB, 下载次数: 1, 售价: 2 枚 精币)   别说卖的贵啦!望各位体谅! 不想花精币可以按上面的代码自己复制更改一下就行了
回复 支持 反对

使用道具 举报

结帖率:100% (1/1)

签到天数: 21 天

82
发表于 2025-7-12 21:39:46 | 只看该作者   河南省郑州市
66666666666666666666
回复 支持 反对

使用道具 举报

结帖率:100% (1/1)

签到天数: 21 天

81
发表于 2025-7-10 17:27:00 | 只看该作者   河南省郑州市

谢谢分享
回复 支持 反对

使用道具 举报

结帖率:56% (5/9)

签到天数: 10 天

80
发表于 2025-7-6 22:35:45 | 只看该作者   辽宁省沈阳市
汉族 发表于 2025-7-6 20:32
[e=1].版本 2

.子程序 USB_取消监视, 整数型, 公开, 不等于0则成功

话说这个有取窗口句柄,是不是控制台程序没有窗口的话用不了,有没有什么办法可以不用窗口又能使用,就是把取窗口句柄这个去掉

点评

这是用消息监听的,你可以把窗口的属性 更改为 假 亦或者直接内部写成一个模块完成窗口的事件消息。总之就是怎么简单怎么来   广东省东莞市  发表于 2025-7-10 21:06
回复 支持 反对

使用道具 举报

结帖率:56% (5/9)

签到天数: 10 天

79
发表于 2025-7-6 22:33:33 | 只看该作者   辽宁省沈阳市
汉族 发表于 2025-7-6 20:32
[e=1].版本 2

.子程序 USB_取消监视, 整数型, 公开, 不等于0则成功

靠腰了,我还被这个鬼指针折磨了一个晚上
回复 支持 反对

使用道具 举报

结帖率:56% (5/9)

签到天数: 10 天

77
发表于 2025-7-4 00:59:18 | 只看该作者   辽宁省沈阳市
本帖最后由 Milknwb 于 2025-7-4 01:00 编辑

USB_取消监视函数已经修复,源代码有误。
源代码处是返回 (SetWindowLong (全_句柄, -4, &USB处理过程)


这里的第三个参数不应该是&USB处理过程,应该是全局变量全_proc,在C++里边整数可以隐式转换为一个子程序指针,但是易语言不行,你直接写上去报错。
我在这边用到精易模块v10.4.5(主要是这个版本我用起来bug少,最新版的精易模块应该也没问题)的汇编类下边的到子程序指针()把这个全_proc转换成子程序指针。
  
子程序名返回值类型公开备 注
USB_取消监视整数型 不等于0则成功
返回 (SetWindowLong (全_句柄, -4, cc.到子程序指针 (全_proc)))



cc变量是我定义在程序集的汇编类变量
  
窗口程序集名保 留  保 留备 注
程序集1  定制QQ1739428816
变量名类 型数组备 注
cc汇编类  


评分

参与人数 1精币 +2 收起 理由
汉族 + 2 我没注意,我新建了一个API用 整数型 参数

查看全部评分

回复 支持 反对

使用道具 举报

结帖率:56% (5/9)

签到天数: 10 天

76
发表于 2025-7-4 00:16:14 | 只看该作者   辽宁省沈阳市
USB取消监视没用啊,用的是原作者帖子的USB例子,测试平台是win11
回复 支持 反对

使用道具 举报

结帖率:80% (8/10)

签到天数: 11 天

75
发表于 2025-5-4 21:52:42 | 只看该作者   河北省保定市
感谢分享,很给力!~
回复 支持 反对

使用道具 举报

结帖率:25% (1/4)

签到天数: 17 天

74
发表于 2025-4-13 12:32:16 | 只看该作者   四川省泸州市
U盘全方面操作源码 BUG修复
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报QQ: 793400750,邮箱:[email protected]
网站简介:精易论坛成立于2009年,是一个程序设计学习交流技术论坛,隶属于揭阳市揭东区精易科技有限公司所有。
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表