默认外部关联程序的正确打开姿势

vioer

先声明,本人基本上还是个小白(明天是我学习易语言一周月的日子...),不知道哪里有错误,也可能一开始就全弄错了.不过没关系,本人脸皮厚的很,粪蛋石头都可以扔,让我知道错在哪儿就很开心...

问题的发现:还是在弄我的雷电中控,想加一个知道扩展名,就能用系统默认关联程序打开的功能.

先找了精易模块自带的:
源码瞎改了改,为了调试方便:

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
_编辑框1_放开某键	逻辑型
参数名	类 型	参考	可空	数组	备 注
键代码	整数型
功能键状态	整数型

如果真 (键代码 ＝ #回车键 )
编辑框2.加入文本 (编辑框1.内容 ＋ “=>” ＋ 文件_取关联 (编辑框1.内容) ＋ #换行符 )

子程序名	返回值类型	公开	备 注
文件_取关联	文本型		写入一个后缀，取得此后缀文档打开方式，失败则返回空文本
参数名	类 型	参考	可空	数组	备 注
后缀	文本型				文件后缀，如"txt","*.txt",".txt"三者都可以

变量名	类 型	静态	数组	备 注
程序名	文本型
打开方式	文本型

后缀 ＝ 子文本替换 (后缀, “*”, , , , 真)
后缀 ＝ 子文本替换 (后缀, “.”, , , , 真)
程序名 ＝ 取文本zc项 ( #根类, “.” ＋ 后缀 ＋ “\”, )
调试输出 (程序名)
如果 (取文本长度 (程序名) ＝ 0)
返回 (“没有找到关联程序1”)
打开方式 ＝ 取文本zc项 ( #根类, 程序名 ＋ “\shell\”, “open”)
程序名 ＝ 取文本zc项 ( #根类, 程序名 ＋ “\shell\” ＋ 打开方式 ＋ “\command\”, )
如果真 (取文本长度 (程序名) ＝ 0)
返回 (“没有找到关联程序2”)
返回 (程序名)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _编辑框1_放开某键, 逻辑型<br /> .参数 键代码, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> .如果真 (键代码 ＝ #回车键)<br />     编辑框2.加入文本 (编辑框1.内容 ＋ “=>” ＋ 文件_取关联 (编辑框1.内容) ＋ #换行符)<br /> .如果真结束<br /> <br /> <br /> .子程序 文件_取关联, 文本型, 公开, 写入一个后缀，取得此后缀文档打开方式，失败则返回空文本<br /> .参数 后缀, 文本型, , 文件后缀，如"txt","*.txt",".txt"三者都可以<br /> .局部变量 程序名, 文本型<br /> .局部变量 打开方式, 文本型<br /> <br /> 后缀 ＝ 子文本替换 (后缀, “*”, , , , 真)<br /> 后缀 ＝ 子文本替换 (后缀, “.”, , , , 真)<br /> 程序名 ＝ 取文本zc项 (#根类, “.” ＋ 后缀 ＋ “\”, )<br /> 调试输出 (程序名)<br /> .如果 (取文本长度 (程序名) ＝ 0)<br />     返回 (“没有找到关联程序1”)<br /> .否则<br />     打开方式 ＝ 取文本zc项 (#根类, 程序名 ＋ “\shell\”, “open”)<br />     程序名 ＝ 取文本zc项 (#根类, 程序名 ＋ “\shell\” ＋ 打开方式 ＋ “\command\”, )<br />     .如果真 (取文本长度 (程序名) ＝ 0)<br />         返回 (“没有找到关联程序2”)<br />     .如果真结束<br />     返回 (程序名)

运行截图如下:

前面的都正常,可是我的GIF,JPG是可以直接用看图软件打开的啊?ICO也有默认编辑程序,为什么找不到呢?
我百思不得其解,在论坛里扒了扒也大同小异.后来到zc表里才找到原因.看图软件换过一回,最初那个没删干净,程序名在,打开方式没了...
可是系统怎么能自动打开呢?

为此我百度了半天....

最后找了这么个东西:

1. rundll32.exe shell32.dll OpenAs_RunDLL 3d.ico

复制代码

把这个放到CMD里运行,弹出一个对话框:

这太神奇了....这个对话框把我最近打开ICO的程序都列出来了....

研究了半天,焦点集中到了shell32.dll上面....接着百度,,,这里面是有API的....
于是.....接着翻百度...还有EAPI伴侣...


弄了下面这个东西:
查找默认关联程序的正确姿势,不OK.e (102.57 KB, 下载次数: 6)

2019-2-23 23:08 上传

点击文件名下载附件
里面有DLL,(DLL是伴侣里粘过来的)所以自己看代码吧..
这个东西倒挺好,但必须全路径才能识别,不符合我的要求啊...更糟糕的是,我居然发现:

这太扯了....ACCDB是ACCESS的文件...怎么用暴风影音打开了?看来这个API只认扩展名的头三个字母,多一个都不带认的.....
接着捣鼓了半天,ShellExecuteEx啥的也不行....


想了半天,系统应该还是从zc表关联扩展名的,问题出在哪儿呢?
接着疯狂百度"zc表"....


终于....................找到答案了!
下面是重点:

1. HKEY_CLASSES_ROOT里面的设置是能够选择正确的应用程序打开相应文件的关键所在.在Windows 2000之后,该zc表项目中的文件关联设置分别存在HKEY_CURRENT_USER和HKEY_LOCAL_MACHINE里....而HKEY_CURRENT_USER包含只适用当前用户的文件关联设置,它会覆盖HKEY_LOCAL_MACHINE项中的设置.,HKEY_CLASS_ROOT zc表项则成为融合上面两个zc表项内容的一个镜像.

复制代码

看来问题就在这儿了.HKEY_CLASSES_ROOT里虽然丢了打开方式,系统仍然能够自动关联文件,一定是保存在HKEY_CURRENT_USER里.重点就在这儿!!!!!!!!
废话不说了,路径:

1. HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts

复制代码

SO,精易模块里的文件关联命令要改,我水平差,估计写的也很难看,大家先看看,能改的好看就更好了.
(顺便叨唠几句-----------易语言的[取文本zc项命令]貌似有BUG,如果项里有点儿(".")就不工作,类似下面这种:
Applications\iconmaker.exe\shell\open\command
也可能是我没用对,大家可以试一下,所以我的代码里前半程用的易语言,后面发现它不工作,只好到精易模块里抄了一段过来..........)

源码送上:
查找默认关联程序的正确姿势,OK了.e (10.97 KB, 下载次数: 19)

2019-2-23 22:52 上传

点击文件名下载附件

这段代码已经完全符合我的要求,输入扩展名可以正确的显示出关联程序....

实际上,既然找到根源所在,这个思路还可以更完善一些,比如,有默认程序调用默认程序,没有默认程序的可以用[最近打开它的程序],特殊的扩展名,比如调用{098f2470-bae0-11cd-b579-08002b30bfeb}这种,都可以显示出来,不过我想了一下,这会不会带来安全问题?所以没敢乱动.

好了,虽然折腾了一天,但总算有点收获,如果确实一开始就全错了也没啥,好歹学了些许东西...
另外,如果能调用API列出所有的关联程序就更好,不过,目前我这水平肯定还做不到....

mengshneg

感谢楼主分享

堕天圣黑猫

⊙_⊙一脸懵逼的看完(°ー°〃)好厉害的。、。、、

网络注册会员

支持支持支持

kyo9766

看看写法，感谢分享

明靓

好东西,以前一直想做,没想到楼主做了,而且还做得这么细致,服!

mood1000

        共同努力，共同进步

hrbsxk

值得学习你的精神！！加油相信你哦

4mi

楼主辛苦了，谢谢楼主，感谢楼主分享，楼主好人一生平安！！！

178826559

学习了，楼主好样的！！！

这才是做学问的样子。

回头看下我自己~~~~~~~~~~哀叹……