纯脚本创建桌面快捷方式

最近在看关于wmi的书，深深感觉wscript的危害之大。这里将书上提到的一些应用的例程放上来，大家鉴赏一下，可

不要拿来做坏事哟。新建一个vbs脚本文件。键入下面的内容

call testwmi()

function testwmi()
dim objShell

set objShell = WScript.CreateObject("WScript.Shell")
dim strDesktop

strDesktop = objShell.SpecialFolders("Desktop")

'now, we can create shortcuts on the desktop
'let's do Internet Explorer

dim objShortcut

set objShortcut= objShell.CreateShortcut(strDesktop & "\IE.lnk")

objShortcut.TargetPath = "iexplore.exe"

objShortcut.WindowStyle = 1

objShortcut.Hotkey = "CTRL+SHIFT+I"

objShortcut.Description = "Launch Internet Explorer"

objShortcut.WorkingDirectory = strDesktop

objShortcut.Save

'let's create a link to my home page

dim objURL
set objURL = objShell.CreateShortcut(strDesktop & "\webtrados.url")
objURL.TargetPath = "http://www.iwebtrados.com.cn/"
objURL.Save
end function

转载于:https://www.cnblogs.com/webtrados/archive/2009/08/07/1541516.html

纯脚本创建桌面快捷方式相关推荐

windows脚本创建桌面快捷图标方式
一.示例为创建记事本的快捷方式到桌面 set path=%WINDIR%\notepad.exe set topath="%USERPROFILE%\桌面\记事本.url" ech ...
Ubuntu系统为程序创建桌面快捷方式
为了不用每次都要进入命令行启动应用程序,为程序创建快捷方式是一个很方便的方法,尤其是你的程序需要在团队外部使用的时候. 桌面创建快捷方式一般使用.desktop为后缀的文件实现,该文件的内容格式基本要 ...
Ubuntu安装Blender并创建桌面快捷方式的详细步骤（基于官方下载.tar.xz文件）
Ubuntu安装Blender并创建桌面快捷方式的详细步骤(基于官方下载.tar.xz文件) 1. 下载Blender 从blender官网下载.tar.xz安装文件,下载网址为:https://ww ...
Linux几个版本下创建桌面快捷方式、开始菜单快捷方式、文件管理器右键菜单(只deepin uos 20)
适配情况: 银河麒麟V10, 桌面图标不显示,开始菜单那显示效果可以中标麒麟V6, 二者图标都不显示,且开始菜单那未出现条目 Ubuntu20, 桌面快捷方式不起作用, 开始菜单起作用 Ubuntu ...
ubuntu clion 创建桌面快捷方式
ubuntu clion 创建桌面快捷方式首先在终端下输入 cd /usr/share/applications/ 进入applications目录下,建立一个clion.desktop文件 sud ...
解决Inno Setup制作安装包无法创建桌面快捷方式的问题
昨天想把个java程序做成exe安装软件,然后就去下载了Inno Setup这个软件安装包制作软件,Inno Setup这个软件确实非常好用,但是由于我下载的中文汉化版,根据向导一步步来就是不创建桌面 ...
[Android]为指定的应用创建桌面快捷方式
网上一搜一大把为自己的应用创建快捷方式,但是本文的侧重点在为"指定的应用"创建桌面快捷方式. 常见的桌面快捷方式有两要素:1.应用名 2.应用图标. 指定应用图标的信息是: ...
android自动创建桌面,Android应用启动后自动创建桌面快捷方式的实现方法
Android的开发其实是比较灵活的,其实在安装了Android应用程序之后,会在桌面上自动创建快捷方式,接下来爱站技术频道小编将会介绍Android应用启动后自动创建桌面快捷方式的实现方法给大家,有 ...
delphi编程创建桌面快捷方式
delphi编程创建桌面快捷方式 uses ActiveX,ComObj,StdCtrls,ShlObj,FileCtrl; procedure TForm1.N2Click(Sender: TOb ...

纯脚本创建桌面快捷方式

纯脚本创建桌面快捷方式相关推荐

最新文章

热门文章