怎么发送快捷方式到桌面？

abmin

将脚本自身EXE，发送一份快捷启动方式图标 到桌面呢？

忆辰辅助

1. 功能 按钮0_点击()
   
2.     桌面快捷方式("TC", "C:\\Program Files\\TC脚本开发工具\\TC.exe")
   
3. 结束
   
4. 
   
5. 
   
6. 功能 桌面快捷方式(名称, 指向)
   
7.     变量 文件句柄 = 文件创建(系统获取系统路径(1) & 名称 & ".url","读写|共享读|共享写|总是创建")
   
8.     如果(文件句柄 == 0)
   
9.         返回 0
   
10.     否则
    
11.         文件写入一行字符(文件句柄, "[InternetShortcut]")
    
12.         文件写入一行字符(文件句柄, "URL=" & 指向)
    
13.         文件写入一行字符(文件句柄, "IconFile=" & 指向)
    
14.         文件写入一行字符(文件句柄, "IconIndex=0")
    
15.         文件关闭(文件句柄)
    
16.         返回 1
    
17.     结束
    
18. 结束

复制代码

zxyzxy1919

忆辰辅助 发表于 2015-5-20 14:15

谢谢，学习了

alanges

这个试了，可以，但是会被360查。有提示

忆辰辅助

abmin 发表于 2015-5-20 16:02
所以能纠正一下吗 我不会写喔，唉

我上面已经发过好吧，六楼

abmin

忆辰辅助 发表于 2015-5-20 15:54
是你自己路径写的不对好不好

所以能纠正一下吗 我不会写喔，唉

忆辰辅助

abmin 发表于 2015-5-20 15:09
变成这样了

是你自己路径写的不对好不好

abmin

忆辰辅助 发表于 2015-5-20 15:04
自己改改不就得了么，这样就是指向自身了

= = 而且程序图标 获取不到， 这个发送的是IE快捷方式= =

abmin

忆辰辅助 发表于 2015-5-20 15:04
自己改改不就得了么，这样就是指向自身了

变成这样了

1. 功能 按钮0_点击()
   
2.     变量 名称="测试"
   
3.     变量 文件句柄 = 文件创建(系统获取系统路径(1) & 名称 & ".url","读写|共享读|共享写|总是创建")
   
4.     如果(文件句柄 == 0)
   
5.         返回 0
   
6.     否则
   
7.         文件写入一行字符(文件句柄, "[InternetShortcut]")
   
8.         文件写入一行字符(文件句柄, "URL=" & 系统获取工作路径())
   
9.         文件写入一行字符(文件句柄, "IconFile=" & 系统获取工作路径())
   
10.         文件写入一行字符(文件句柄, "IconIndex=0")
    
11.         文件关闭(文件句柄)
    
12.         返回 1
    
13.     结束
    
14. 结束

复制代码

忆辰辅助

1.     变量 指向 = 窗口获取路径(窗口获取自我句柄())

复制代码

自己改改不就得了么，这样就是指向自身了

abmin

忆辰辅助 发表于 2015-5-20 14:55
代码你测试了么？参数你自己改就行了

你的代码测试过了，发送的不是程序自身的快捷方式。
我就是想 让 脚本 可以发送自己的快捷方式 到桌面，这样我就把脚本放到硬盘里，每次从桌面开启就行了。

我给你的4X代码，在4X完美测试。 在5X不行。修改成5X代码后，没有反映