中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-07-24 13:09
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 如何用cmd创建某个软件的快捷方式? 查看 2,580 回复 8
楼 主 如何用cmd创建某个软件的快捷方式? 发表于 2006-05-10 17:46 ·  中国 广东 汕头 电信
初级用户
积分 108
发帖 38
注册 2006-05-07 10:16
20年会员
UID 55078
状态 离线
在winxp里如何用命令来创建快捷方式?
2 发表于 2006-05-10 17:55 ·  中国 山东 济南 移动
钻石会员
★★★★★
积分 10,051
发帖 3,040
注册 2002-11-11 00:00
23年会员
UID 223
性别 男
状态 离线
internet快捷方式是文本格式的,可以参考一下。


───────────────── 版主提示 ─────────────────
关于这个方案的实现有以下实例,具体请参考,
实例1:

echo >>a.url
echo URL=c:\windows\system32\notepad.exe >>a.url
echo IconIndex=29 >>a.url
echo IconFile=C:\windows\system32\shell32.dll >>a.url


实例2:

@echo off
if exist "%1.url" echo 链接 "%1.url" 已创建! & goto :eof
if exist "%~f2" echo 目标 "%~f2" 不存在! & goto :eof
echo > "%1.URL"
echo URL=%~f2 >> "%1.URL"
echo IconIndex=0 >> "%1.URL"
echo IconFile=%~f2 >> "%1.URL"

如何用批处理创建一个快捷方式?
http://www.cn-dos.net/forum/viewthread.php?tid=20183
───────────────── 版主提示 ─────────────────


[ Last edited by willsort on 2006-5-11 at 17:46 ]
简单就是美
3 发表于 2006-05-10 20:09 ·  中国 上海 电信
中级用户
★★
大师兄
积分 377
发帖 99
注册 2005-08-26 07:37
20年会员
UID 41945
状态 离线
Windows XP里没有命令是专么干这件事的。可以借助其他工具。
1. Windows 95或Nt 4.0 Resource Kit里都有一个叫shortcut.exe的命令。(推荐)
2. 第三方Shortcut.exe
3. 使用vbs
-------------------------------------------------------------------------------------------
Dim WSHShell, fs
Set WSHShell = WScript.CreateObject("WScript.Shell")
Set fs = WScript.CreateObject("Scripting.FileSystemObject")
Function MakeDesktopShortcut( name, target )
Dim Shortcut,DesktopPath,StartupPath
DesktopPath = WSHShell.SpecialFolders("Desktop")
Set Shortcut = WSHShell.CreateShortcut(DesktopPath & "\" & name & ".lnk")
Shortcut.TargetPath = target
StartupPath = fs.GetParentFolderName( target )
If fs.FolderExists( StartupPath ) then
Shortcut.WorkingDirectory = StartupPath
End If
Shortcut.Save
End Function

MakeDesktopShortcut "Shortcut to Notepad", "C:\Windows\Notepad.exe"
--------------------------------------------------------------------------------------------
4 发表于 2006-05-10 20:43 ·  中国 湖北 荆门 电信
荣誉版主
★★★
积分 2,013
发帖 718
注册 2006-02-18 07:07
20年会员
UID 50550
状态 离线
可以参考这个贴子,或者参考楼上的vbs方法,给个注释:

set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop") '获得桌面目录
set oShellLink = WshShell.CreateShortcut(strDesktop & "\qq.lnk") '快捷方式存放目录及名称
oShellLink.TargetPath = "C:\Program Files\Tencent\QQ\CoralQQ.exe" '指向的可执行文件
oShellLink.WindowStyle = 1 '运行方式
oShellLink.Hotkey = "CTRL+SHIFT+F" '快捷键
oShellLink.IconLocation = "C:\Program Files\Tencent\QQ\QQ.exe, 0" '图标
oShellLink.Description = "qq" '备注
oShellLink.WorkingDirectory = "C:\Program Files\Tencent\QQ\" '起始目录
oShellLink.Save '创建快捷方式
5 发表于 2006-05-10 22:24 ·  中国 四川 成都 联通
铂金会员
★★★★
积分 7,493
发帖 2,672
注册 2005-09-02 00:00
20年会员
UID 42173
性别 男
状态 离线
在XP下可以试试这个:


fsutil file createnew C:\test 0
rundll32.exe appwiz.cpl,NewLinkHere C:\test


系统会提示在C:\下建立一个快捷方式

[ Last edited by electronixtar on 2006-5-10 at 22:32 ]
6 发表于 2006-07-24 19:39 ·  中国 河南 焦作 博爱县 联通
新手上路
积分 2
发帖 1
注册 2006-07-24 18:52
19年会员
UID 59162
状态 离线
建一个“c:\setups”文件夹的快捷方式到sendto,添加到右键“发送到”,怎么弄?
7 发表于 2006-12-19 20:26 ·  中国 广东 东莞 电信
初级用户
积分 31
发帖 16
注册 2006-12-19 15:55
19年会员
UID 73967
性别 男
状态 离线
小技巧,说不定以后会帮上我的大忙呢
8 发表于 2006-12-20 08:03 ·  中国 安徽 芜湖 电信
高级用户
★★★
积分 906
发帖 346
注册 2006-07-10 09:58
20年会员
UID 58334
性别 男
状态 离线
Originally posted by dst1213 at 2006-7-24 19:39:
建一个“c:\setups”文件夹的快捷方式到sendto,添加到右键“发送到”,怎么弄?

放到那个文件夹就行了
9 发表于 2006-12-20 08:11 ·  中国 广东 深圳 电信
初级用户
★★
积分 135
发帖 64
注册 2006-12-20 04:35
19年会员
UID 74003
性别 男
状态 离线
我顶!!
论坛跳转: