易语言写的创建快捷方式
列出桌面所有快捷方式，然后用：
.版本 2
.支持库 eAPI
取快捷方式目标 (, , , , , , , )
这个命令循环取所有目标，判断其中和自身一个路径的就不创建。
给你写了个列子：
.版本 2
.支持库 shell
.支持库 eAPI
.子程序 创建快捷方式_
.局部变量 局部_快捷方式, 文本型, , "0"
.局部变量 局部_路径, 文本型
.局部变量 文件, 文本型
.局部变量 x, 整数型
.局部变量 局部_目标, 文本型
.局部变量 自身路径, 文本型
.局部变量 局部是否存在, 逻辑型
局部_路径 ＝ 取特定目录 (#系统桌面)
文件 ＝ 寻找文件 (局部_路径 ＋ “*.*”贺唤, )
.判断循环首 (文件 ≠ “.” 或 文件 ≠ “..” 或 文件 ≠ “”)
加入成员 (局部_快捷方式, 局部_路径 ＋ 文件)
文件 ＝ 寻找文件 (, )
.如果真 (文件 ＝ “”)
跳出循环 ()
.如果真结束
.判断循环尾 ()
.计次循环首 (取数组成员数 (局部_快捷方式), x)
取快捷方式目标 (局部_快捷方式 [x], 局部_目标, , , , , , )
自身路径 ＝ 取运行目录 () ＋ “\” ＋ 取执行文件名 ()
.判断开始 (到小写 (局部_目标) ＝ 到小写 (自身路径))
局部是否存在 ＝ 真
跳出循环 ()
.默认
键拍虚 局部是否存在稿燃 ＝ 假
.判断结束
.计次循环尾 ()
.判断开始 (局部是否存在 ＝ 真)
.判断开始 (文件是否存在 (取特定目录 (#系统桌面) ＋ “快捷方式名字.lnk”) ＝ 假)
信息框 (“快捷方式名字已被改变！”, 0, )
.默认
.判断结束
.默认
创建快捷方式 (取特定目录 (#系统桌面) ＋ “快捷方式名字.lnk”, 取运行目录 () ＋ “\” ＋ 取执行文件名 (), , , )
============
需要自己修改一下创建快捷方式的名字，其他基本不用改，目的：判断存在不创建，但还会判断该快捷方式是否被改过，命令“取快捷方式目标（）”提供多种参数，自己可以研究下，我已经给了第一个例子，后面的照葫芦画瓢就可以了。
‘=============
测试结果：
你把“快捷方式名字.lnk”改为“123.lnk”，再次创建就会提示已被修改。
调用格式：
〈逻辑型凳丛〉
创建快捷方式
（文本型
快捷方式文件名，文本型坦行
指让粗哗向文件路径，〔文本型
备注信息〕，〔文本型
命令行文本
要彻底避免就要猜空读取桌面的文件进行校对。。。
你是想让易程序创建一快捷方式后下次打开就不创建了？
