标题: [已结]将一个软件中的启动文件创建快捷方式到桌面 [打印本页]
作者: jjttefg 时间: 2008-12-7 09:00 标题: [已结]将一个软件中的启动文件创建快捷方式到桌面
一个绿色软件,写个批处理放在软件文件中,
start 绿化.exe
regedit /s xxx.reg
start 程序.exe
如何再将这个程序的图标和名称快捷到桌面
───────────────── 版务记录 ─────────────────
执行：HAT
操作：[2008-12-07]在帖子标题中增加搜索关键字
说明：原标题"[求助]帮忙写个批处理"不利于论坛搜索
处罚：扣除2点积分
提示：建议阅读以下帖子
{1415}提问的智慧
{7326}论坛新手必读，所有人的基本行为准则
{22703}请不要做浮躁的人
{32667}[愤怒]那些连标题都写不清楚的人们啊，你们醒醒吧
{32825}本版严厉整顿烂帖
───────────────── 版务记录 ─────────────────
[ Last edited by HAT on 2008-12-11 at 19:35 ]
作者: scriptor 时间: 2008-12-7 11:22
@echo off
rem 进入目标文件夹,检查快捷方式并复制
dir x:\mulu|find ".lnk"&© a.lnk "%userprofile%\desktop"
或者中文版"桌面"
dir x:\mulu|find ".lnk"&© abc.lnk "%userprofile%\桌面"
作者: newxso 时间: 2008-12-7 20:54 标题: 为程序创建快捷方式
批处理：
@echo off
set a="c:\green\1.exe"
set b="c:\green\2.exe"
set c="c:\green\3.exe"
echo [InternetShortcut] >"%userprofile%\桌面\1.url"
echo URL=%a% >>"%userprofile%\桌面\1.url"
echo IconIndex=0 >>"%userprofile%\桌面\1.url"
echo IconFile=%a% >>"%userprofile%\桌面\1.url"
echo [InternetShortcut] >"%userprofile%\桌面\2.url"
echo URL=%b% >>"%userprofile%\桌面\2.url"
echo IconIndex=0 >>"%userprofile%\桌面\2.url"
echo IconFile=%b% >>"%userprofile%\桌面\2.url"
echo [InternetShortcut] >"%userprofile%\桌面\3.url"
echo URL=%c% >>"%userprofile%\桌面\3.url"
echo IconIndex=0 >>"%userprofile%\桌面\3.url"
echo IconFile=%c% >>"%userprofile%\桌面\3.url"
VBS：set a="c:\green\1.exe"
set b="c:\green\2.exe"
set c="c:\green\3.exe"
echo [InternetShortcut] >"%userprofile%\桌面\1.url"
echo URL=%a% >>"%userprofile%\桌面\1.url"
echo IconIndex=0 >>"%userprofile%\桌面\1.url"
echo IconFile=%a% >>"%userprofile%\桌面\1.url"
echo [InternetShortcut] >"%userprofile%\桌面\2.url"
echo URL=%b% >>"%userprofile%\桌面\2.url"
echo IconIndex=0 >>"%userprofile%\桌面\2.url"
echo IconFile=%b% >>"%userprofile%\桌面\2.url"
echo [InternetShortcut] >"%userprofile%\桌面\3.url"
echo URL=%c% >>"%userprofile%\桌面\3.url"
echo IconIndex=0 >>"%userprofile%\桌面\3.url"
echo IconFile=%c% >>"%userprofile%\桌面\3.url"
'在桌面上为QQ程序创建快捷方式
Set WshShell = WScript.CreateObject("Wscript.Shell")
strFolder = WshShell.SpecialFolders("Desktop") '设置快捷方式所到的目录
set oShellLink = WshShell.CreateShortcut(strFolder & "\腾讯QQ.lnk") '快捷方式绝对路径和名称
oShellLink.TargetPath = "D:\Program Files\Tencent\QQ\QQ.exe" '快捷方式指向目标程序
oShellLink.WindowStyle = 1 '指向程序的运行方式（1常规窗口、3最大化、7最小化）
oShellLink.Hotkey = "Alt+Q" '设置热键
oShellLink.IconLocation = "D:\Program Files\Tencent\QQ\QQ.exe, 0" '图标文件位置
oShellLink.Description = "" '快捷方式描述
oShellLink.WorkingDirectory = "D:\Program Files\Tencent\QQ\" '快捷方式起始位置（指向程序所在目录）
oShellLink.Save
'快捷方式所到的目录说明:
'Desktop 桌面目录
'Startmenu 开始菜单目录
'Programs 程序菜单目录
'StartUp 程序启动目录
'Favorites 收藏夹目录
'SendTo 发送到目录
[ Last edited by newxso on 2008-12-9 at 21:02 ]Set WshShell = WScript.CreateObject("Wscript.Shell")
strFolder = WshShell.SpecialFolders("Desktop") '设置快捷方式所到的目录
set oShellLink = WshShell.CreateShortcut(strFolder & "\腾讯QQ.lnk") '快捷方式绝对路径和名称
oShellLink.TargetPath = "D:\Program Files\Tencent\QQ\QQ.exe" '快捷方式指向目标程序
oShellLink.WindowStyle = 1 '指向程序的运行方式（1常规窗口、3最大化、7最小化）
oShellLink.Hotkey = "Alt+Q" '设置热键
oShellLink.IconLocation = "D:\Program Files\Tencent\QQ\QQ.exe, 0" '图标文件位置
oShellLink.Description = "" '快捷方式描述
oShellLink.WorkingDirectory = "D:\Program Files\Tencent\QQ\" '快捷方式起始位置（指向程序所在目录）
oShellLink.Save
'快捷方式所到的目录说明:
'Desktop 桌面目录
'Startmenu 开始菜单目录
'Programs 程序菜单目录
'StartUp 程序启动目录
'Favorites 收藏夹目录
'SendTo 发送到目录
作者: yishanju 时间: 2008-12-8 17:44
| Quote: | |
|
应该程序的快捷方式可不是这样建立的吧
你自己这用过？
作者: moniuming 时间: 2008-12-8 19:16
| Quote: | |
|
看看这里?
批处理创建快捷方式的四种方法
作者: 5872169 时间: 2008-12-9 17:16
要想创建真正的快捷方式，得用VBS
作者: jjttefg 时间: 2008-12-11 17:53
一个绿色软件,写个批处理放在软件文件中,
start 绿化.exe
regedit /s xxx.reg
start xxx.exe
如何再将这个程序的图标和名称快捷到桌面
我用上述方法没有成功,请位在指点一下
作者: jjttefg 时间: 2008-12-11 18:14
快捷成功了.可点击快捷程序启动不了
作者: tempuser 时间: 2008-12-11 18:46
| Quote: | |
|
试试这个，我可是为notepad.exe建立个快捷方式。
@echo off
echo [InternetShortcut] >>a.url
echo URL=c:\windows\notepad.exe >>a.url
rem echo URL=http://10.64.240.131 >>a.url
echo IconIndex=20 >>a.url
echo IconFile=C:\windows\system32\shell32.dll >>a.url
作者: jjttefg 时间: 2008-12-11 19:00
非常感谢.成功了