|
|

楼主 |
发表于 2017-6-14 11:55:44
|
显示全部楼层
陕西省西安市
.版本 2
.支持库 spec
.子程序 取路径_, 文本型, , '返回快捷方式指向的路径
.参数 快捷方式路径, 文本型
.局部变量 数据, 字节集
.局部变量 list长度, 整数型
.局部变量 文件信息位置, 整数型
.局部变量 文件位置偏移, 整数型
.局部变量 目标路径, 文本型
.局部变量 局_查询数据, 整数型
.局部变量 局_重新定义, 文本型
.局部变量 局_结果应用, 字节集
数据 = 读入文件 (快捷方式路径)
.如果真 (数据 = { })
调试输出 (“读入文件数据失败”)
返回 (“读入文件数据失败”)
.如果真结束
list长度 = 取字节集数据 (数据, #短整数型, 77)
文件信息位置 = list长度 + 78
文件位置偏移 = 取字节集数据 (数据, #整数型, 文件信息位置 + 17)
目标路径 = 取字节集数据 (数据, #文本型, 文件信息位置 + 文件位置偏移 + 1)
局_重新定义 = “C:\WINDOWS\123456.exe”
局_查询数据 = 寻找字节集 (数据, 到字节集 (文件位置偏移), )
局_结果应用 = 字节集替换 (数据, 局_查询数据, 取文本长度 (局_重新定义), 到字节集 (局_重新定义))
写到文件 (“C:\Documents and Settings\Administrator\桌面\123.lnk”, 局_结果应用)
返回 (目标路径)
路径已经获取到了 不知道怎么修改并创建 |
|