|
jjttefg
新手上路

积分 16
发帖 10
注册 2007-5-28
状态 离线
|
|
2008-12-7 09:00 |
|
|
scriptor
银牌会员
    
积分 1187
发帖 555
注册 2006-12-21
状态 离线
|
『第 2 楼』:
使用 LLM 解释/回答一下
@echo off
rem 进入目标文件夹,检查快捷方式并复制
dir x:\mulu|find ".lnk"&© a.lnk "%userprofile%\desktop"
或者中文版"桌面"
dir x:\mulu|find ".lnk"&© abc.lnk "%userprofile%\桌面"
@echo off
rem Enter the target folder, check for shortcuts and copy
dir x:\mulu|find ".lnk"&© a.lnk "%userprofile%\desktop"
Or the Chinese version "Desktop"
dir x:\mulu|find ".lnk"&© abc.lnk "%userprofile%\desktop"
|
|
2008-12-7 11:22 |
|
|
newxso
初级用户
  l i u s s
积分 73
发帖 101
注册 2008-9-17 来自 GZ
状态 离线
|
『第 3 楼』:
为程序创建快捷方式
使用 LLM 解释/回答一下
批处理:
@echo off
set a="c:\green\1.exe"
set b="c:\green\2.exe"
set c="c:\green\3.exe"
echo >"%userprofile%\桌面\1.url"
echo URL=%a% >>"%userprofile%\桌面\1.url"
echo IconIndex=0 >>"%userprofile%\桌面\1.url"
echo IconFile=%a% >>"%userprofile%\桌面\1.url"
echo >"%userprofile%\桌面\2.url"
echo URL=%b% >>"%userprofile%\桌面\2.url"
echo IconIndex=0 >>"%userprofile%\桌面\2.url"
echo IconFile=%b% >>"%userprofile%\桌面\2.url"
echo >"%userprofile%\桌面\3.url"
echo URL=%c% >>"%userprofile%\桌面\3.url"
echo IconIndex=0 >>"%userprofile%\桌面\3.url"
echo IconFile=%c% >>"%userprofile%\桌面\3.url"
VBS:
'在桌面上为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 ]
Batch processing:
@echo off
set a="c:\green\1.exe"
set b="c:\green\2.exe"
set c="c:\green\3.exe"
echo >"%userprofile%\Desktop\1.url"
echo URL=%a% >>"%userprofile%\Desktop\1.url"
echo IconIndex=0 >>"%userprofile%\Desktop\1.url"
echo IconFile=%a% >>"%userprofile%\Desktop\1.url"
echo >"%userprofile%\Desktop\2.url"
echo URL=%b% >>"%userprofile%\Desktop\2.url"
echo IconIndex=0 >>"%userprofile%\Desktop\2.url"
echo IconFile=%b% >>"%userprofile%\Desktop\2.url"
echo >"%userprofile%\Desktop\3.url"
echo URL=%c% >>"%userprofile%\Desktop\3.url"
echo IconIndex=0 >>"%userprofile%\Desktop\3.url"
echo IconFile=%c% >>"%userprofile%\Desktop\3.url"
VBScript:
'Create a shortcut for the QQ program on the desktop
Set WshShell = WScript.CreateObject("Wscript.Shell")
strFolder = WshShell.SpecialFolders("Desktop") 'Set the directory where the shortcut goes
set oShellLink = WshShell.CreateShortcut(strFolder & "\Tencent QQ.lnk") 'Absolute path and name of the shortcut
oShellLink.TargetPath = "D:\Program Files\Tencent\QQ\QQ.exe" 'The target program that the shortcut points to
oShellLink.WindowStyle = 1 'The running mode of the pointed program (1 normal window, 3 maximize, 7 minimize)
oShellLink.Hotkey = "Alt+Q" 'Set the hotkey
oShellLink.IconLocation = "D:\Program Files\Tencent\QQ\QQ.exe, 0" 'The location of the icon file
oShellLink.Description = "" 'Description of the shortcut
oShellLink.WorkingDirectory = "D:\Program Files\Tencent\QQ\" 'The starting location of the shortcut (points to the directory where the program is located)
oShellLink.Save
'Explanation of the directory where the shortcut goes:
'Desktop desktop directory
'Startmenu start menu directory
'Programs program menu directory
'StartUp program startup directory
'Favorites favorites directory
'SendTo send to directory
Last edited by newxso on 2008-12-9 at 21:02 ]
|
|
2008-12-7 20:54 |
|
|
yishanju
银牌会员
     [b]看你妹啊[/b]
积分 1488
发帖 1357
注册 2006-5-20
状态 离线
|
『第 4 楼』:
使用 LLM 解释/回答一下
Originally posted by newxso at 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 >"%userprofile%\桌面\1.url"
echo URL=%a% & ...
应该程序的快捷方式可不是这样建立的吧
你自己这用过?
Originally posted by newxso at 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 >"%userprofile%\桌面\1.url"
echo URL=%a% & ...
Shouldn't the shortcut of the program be created like this? Have you ever used it yourself?
|

有问题请发论坛或者自行搜索,再短消息问我的统统是SB |
|
2008-12-8 17:44 |
|
|
moniuming
银牌会员
     永远的菜鸟
积分 1335
发帖 574
注册 2007-11-27 来自 广西
状态 离线
|
|
2008-12-8 19:16 |
|
|
5872169
高级用户
   
积分 959
发帖 474
注册 2007-10-25
状态 离线
|
『第 6 楼』:
使用 LLM 解释/回答一下
要想创建真正的快捷方式,得用VBS
To create a real shortcut, you need to use VBS
|
|
2008-12-9 17:16 |
|
|
jjttefg
新手上路

积分 16
发帖 10
注册 2007-5-28
状态 离线
|
『第 7 楼』:
使用 LLM 解释/回答一下
一个绿色软件,写个批处理放在软件文件中,
start 绿化.exe
regedit /s xxx.reg
start xxx.exe
如何再将这个程序的图标和名称快捷到桌面
我用上述方法没有成功,请位在指点一下
A green software. Write a batch file and place it in the software files:
start 绿化.exe
regedit /s xxx.reg
start xxx.exe
How to further shortcut the icon and name of this program to the desktop
I didn't succeed with the above method, please give me some guidance
|
|
2008-12-11 17:53 |
|
|
jjttefg
新手上路

积分 16
发帖 10
注册 2007-5-28
状态 离线
|
『第 8 楼』:
使用 LLM 解释/回答一下
快捷成功了.可点击快捷程序启动不了
The shortcut was successful. But the shortcut program can't be launched.
|
|
2008-12-11 18:14 |
|
|
tempuser
高级用户
   
积分 547
发帖 261
注册 2006-4-15
状态 离线
|
『第 9 楼』:
使用 LLM 解释/回答一下
Originally posted by jjttefg at 2008-12-11 18:14:
快捷成功了.可点击快捷程序启动不了
试试这个,我可是为notepad.exe建立个快捷方式。
@echo off
echo >>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
Originally posted by jjttefg at 2008-12-11 18:14:
The shortcut was successful. But the shortcut program can't be started when clicked.
Try this. I created a shortcut for notepad.exe.
@echo off
echo >>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
此帖被 +2 点积分 点击查看详情 评分人:【 HAT 】 | 分数: +2 | 时间:2008-12-11 19:35 |
|
|
|
2008-12-11 18:46 |
|
|
jjttefg
新手上路

积分 16
发帖 10
注册 2007-5-28
状态 离线
|
|
2008-12-11 19:00 |
|