Dim wShell, oShortcut
    'Dim strDesktop$ ' 为了与VBS兼容，
    Dim strDesktop    ' 这里改写一下，测试通过。。。
    Set wShell = CreateObject("Wscript.shell")
    strDesktop = wShell.SpecialFolders("Desktop")
    strDesktop = strDesktop + "\搜物网-货源必备.lnk"
    Set oShortcut = wShell.CreateShortcut(strDesktop)
    oShortcut.TargetPath = "http://www.sowu.com/"                 '快捷方式对象的目标路径
    oShortcut.Description = "MM图" & vbCrLf & ""    '快捷方式对象的说明
    'oShortcut.Hotkey = "CTRL+ALT+A"                                         '快捷方式对象的热键
    'oShortcut.WorkingDirectory = "d:\program Files\uusee\skins\UUPlayer"    '快捷方式对象的工作目录
    oShortcut.IconLocation = "%SystemRoot%\system32\SHELL32.dll,211"        '快捷方式对象的图标位置
    oShortcut.Save

windows创建桌面快捷方式的VBA脚本的更多相关文章

  1. vc++ windows 创建桌面快捷方式

    创建桌面快捷方式 在windows软件开发中,软件安装过程中总是需要在桌面创建快捷方式,下面介绍一种创建桌面快捷方式的方法,具体代码如下: /* * 创建快捷方式 * szExePath[in]:要创 ...

  2. Windows中创建桌面快捷方式

    Windows中创建桌面快捷方式 -------------- -------------- -------------- --------------

  3. 手把手教你在ubuntu下创建桌面快捷方式

    习惯使用windows的朋友来说创建桌面快捷方式简直就是so easy, 鼠标右键点击文件-->选择发送桌面快捷方式.就OK了.对于ubuntu下该如何创建桌面快捷方式呢?以下以创建eclips ...

  4. 为Ubuntu Gnome环境创建桌面快捷方式

    为Ubuntu Gnome环境创建桌面快捷方式 安装gnome-panel包 sudo apt-get install --no-install-recommends gnome-panel 启动终端 ...

  5. winform创建桌面快捷方式

    //引用IWshRuntimeLibrary COM组件-Windows Script Host Object Model /// <summary> /// 创建快捷方式的类 /// & ...

  6. Ubuntu创建桌面快捷方式

    默认情况下，ubuntu会将自动安装的软件快捷方式保存在/usr/share/applications目录下，如果我们要创建桌面快捷方式，只需要右键-复制-桌面 就Ok，如图： 上面的方法是通过系统自 ...

  7. WPF 创建桌面快捷方式

    #region 创建桌面快捷方式 string deskTop = System.Environment.GetFolderPath(System.Environment.SpecialFolder. ...

  8. 解决Inno Setup制作安装包无法创建桌面快捷方式的问题

    转自:http://yedward.net/?id=104 昨天想把个java程序做成exe安装软件,然后就去下载了Inno Setup这个软件安装包制作软件,Inno Setup这个软件确实非常好用 ...

  9. C#创建桌面快捷方式 和 开机启动

              /// <summary>         /// 创建桌面快捷方式 2010-11-25         /// </summary>         p ...

随机推荐

  1. [Java] SSH框架笔记_Struts2配置问题

    1.Unable to load bean: type: class:com.opensymphony.xwork2.ObjectFactory - bean - jar:file:/D:/Progr ...

  2. 《Cortex-M0权威指南》之体系结构---存储器系统

    转载请注明来源:cuixiaolei的技术博客 Cortex-M0处理器为32位处理器,所以具有最大4G的寻址空间.在体系结构上,存储器空间被划分位一系列的区域,每个区域都有推荐的用途,以提高不同设备 ...

  3. Java中Integer的最大值和最小值

    从JDK1.0开始,Integer中就定义了MIN_VALUE和MAX-VALUE两个常量: /** * A constant holding the minimum value an {@code ...

  4. jQuery过滤选择器:not()方法使用介绍

    在jQuery的早期版本中,:not()筛选器只支持简单的选择器,说明我们传入到:not这个filter中的selector可以任意复杂,比如:not(div a) and :not(div,a) & ...

  5. Table of Contents - Jersey

    Jersey 1.19.1 Getting Started Get started with Jersey using the embedded Grizzly server Get started ...

  6. 简直喝血！H.265要被专利费活活玩死

    转自 http://news.mydrivers.com/1/440/440145.htm H.264是如今最流行的视频编码格式之一,不但技术先进,而且专利费很低,企业每年只需支付650万美元,而个人 ...

  7. Part 16 Important concepts related to functions in sql server

    Important concepts related to functions in sql server

  8. UIWebView ［web视图］

    #import "ViewController.h"#define width_screen self.view.bounds.size.width#define height_s ...

  9. 程序代码创建IISWEB站点

    #region 新建立一个IISWEB站点 ///<summary> ///添加一个站点 ///</summary> public string CreateWebSite() ...

  10. 20150323--MVC

    MVC: Model view(视图层,模板) Control(控制层) 三层:数据访问,商业逻辑,用户界面(Webform,MVC). 服务端无状态:接受请求,返回页面,每次请求并返回界面,前后不是 ...