Foxtable(狐表)用户栏目专家坐堂 → 如何用代码将已创建的快捷方式复制的桌面?


  共有4276人关注过本帖树形打印复制链接

主题:如何用代码将已创建的快捷方式复制的桌面?

帅哥哟,离线,有人找我吗?
lsy
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2014/6/16 14:10:00 [显示全部帖子]

以下是引用blackzhu在2014-6-16 11:25:00的发言:
引用下这个dll:

 下载信息  [文件大小:4.5 KB  下载次数:1]
图片点击可在新窗口打开查看点击浏览该文件:mylnk.rar



执行代码:

Dim x As New mylnk.mylnk
x.CreateShortCut("测试","测试.foxdb")

 第一个参数为快捷方式名字,第二个参数为你的系统名字

及时雨。


 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2014/6/16 14:24:00 [显示全部帖子]

Dim x As New mylnk.mylnk
x.CreateShortCut(FileSys.GetName(ProjectFile),ProjectFile)

 回到顶部