解决64位系统快捷方式取目标被重定向

月下美孤

Wow64DisableWow64FsRedirection(0)  Win11失效；最近也是踩了坑，翻了不少帖子没有好的解决方案
洗澡的时候有灵感了，经测试起始位置这个属性不会被重定向

原理：通过比对目标与起始位置。

  

子程序名	返回值类型	公开	备 注
_拖放对象1_得到文件
参数名	类 型	参考	可空	数组	备 注
接收到的文件路径	文本型

变量名	类 型	静态	数组	备 注
局text	文本型
a	文本型

判断 (文件_取扩展名 (接收到的文件路径) ＝ “.lnk”)
取快捷方式目标 (接收到的文件路径, 局text, , a, , , , )
如果真 (寻找文本 (局text, a, , 假) ＝ -1)
局text ＝ a ＋ “\” ＋ _取文件名 (局text)



局text ＝ 接收到的文件路径

调试输出 (局text)

i支持库列表	支持库注释
eAPI	应用接口支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 eAPI<br /> .支持库 spec<br /> <br /> .子程序 _拖放对象1_得到文件<br /> .参数 接收到的文件路径, 文本型<br /> .局部变量 局text, 文本型<br /> .局部变量 a, 文本型<br /> <br /> .判断开始 (文件_取扩展名 (接收到的文件路径) ＝ “.lnk”)<br />     取快捷方式目标 (接收到的文件路径, 局text, , a, , , , )<br /> <br />     .如果真 (寻找文本 (局text, a, , 假) ＝ -1)<br />         局text ＝ a ＋ “\” ＋ _取文件名 (局text)<br />     .如果真结束<br /> <br /> .默认<br /> <br />     局text ＝ 接收到的文件路径<br /> .判断结束<br /> <br /> <br /> 调试输出 (局text)

  

子程序名	返回值类型	公开	备 注
文件_取扩展名	文本型		返回一个文件的后缀名,如：.jpg  如果没有后缀,返回空
参数名	类 型	参考	可空	数组	备 注
文件名	文本型				需要处理的原始文件名

返回 (PathFindExtensionA (文件名))

.版本 2<br /> <br /> .子程序 文件_取扩展名, 文本型, 公开, 返回一个文件的后缀名,如：.jpg  如果没有后缀,返回空<br /> .参数 文件名, 文本型, , 需要处理的原始文件名<br /> <br /> 返回 (PathFindExtensionA (文件名))

  

DLL命令名	返回值类型	公开	备 注
_取文件名	文本型		文件_取文件名, 成功返回路径文本指针地址
DLL库文件名:
shlwapi.dll
在DLL库中对应命令名:
PathFindFileNameA
参数名	类 型	传址	数组	备 注
路径文本	文本型

.版本 2<br /> <br /> .DLL命令 _取文件名, 文本型, "shlwapi.dll", "PathFindFileNameA", 公开, 文件_取文件名, 成功返回路径文本指针地址<br />     .参数 路径文本, 文本型