创建快捷方式的脚本
来源:百度文库 编辑:神马文学网 时间:2024/04/28 06:22:53
cd.>tmp.vbs
for /f "usebackq skip=4 tokens=*" %%a in (%0) do @echo %%a>>tmp.vbs
tmp.vbs&del tmp.vbs /q
goto :eof
Set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop") :'特殊文件夹“桌面”
Rem 在桌面创建一个记事本快捷方式
set oShellLink = WshShell.CreateShortcut(strDesktop & "\记事本.lnk")
oShellLink.TargetPath = "notepad.exe" : '目标
oShellLink.WindowStyle = 3 :'参数1默认窗口激活,参数3最大化激活,参数7最小化
oShellLink.Hotkey = "Ctrl+Alt+e" : '快捷键
oShellLink.IconLocation = "notepad.exe, 0" : '图标
oShellLink.Description = "记事本快捷方式" : '备注
oShellLink.WorkingDirectory = strDesktop : '起始位置
oShellLink.Save : '创建保存快捷方式
Rem 在桌面创建一个“微软中国”的Url快捷方式
set oUrlLink = WshShell.CreateShortcut(strDesktop & "\微软中国.url")
oUrlLink.TargetPath = "http://www.microsoft.com/china"
oUrlLink.Save
for /f "usebackq skip=4 tokens=*" %%a in (%0) do @echo %%a>>tmp.vbs
tmp.vbs&del tmp.vbs /q
goto :eof
Set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop") :'特殊文件夹“桌面”
Rem 在桌面创建一个记事本快捷方式
set oShellLink = WshShell.CreateShortcut(strDesktop & "\记事本.lnk")
oShellLink.TargetPath = "notepad.exe" : '目标
oShellLink.WindowStyle = 3 :'参数1默认窗口激活,参数3最大化激活,参数7最小化
oShellLink.Hotkey = "Ctrl+Alt+e" : '快捷键
oShellLink.IconLocation = "notepad.exe, 0" : '图标
oShellLink.Description = "记事本快捷方式" : '备注
oShellLink.WorkingDirectory = strDesktop : '起始位置
oShellLink.Save : '创建保存快捷方式
Rem 在桌面创建一个“微软中国”的Url快捷方式
set oUrlLink = WshShell.CreateShortcut(strDesktop & "\微软中国.url")
oUrlLink.TargetPath = "http://www.microsoft.com/china"
oUrlLink.Save
创建快捷方式的脚本
创建快捷方式
如何创建“锁定计算机”的快捷方式
如何创建桌面快捷方式?
VB.NET创建快捷方式的两种方法
创建一个不占资源的多功能“快捷方式”
VB.NET创建快捷方式的两种方法
创建“快速启动”栏快捷方式
如何使用脚本创建环境变量?
【捧吧电脑技巧篇】:如何创建“锁定计算机”的快捷方式_王捧吧_贴吧
创建快捷方式去掉小箭头妙招
批量创建和删除文件脚本
最简单的“快捷方式”
快捷方式
使用脚本自动创建AD中的层次化结构容器及对象 - 矩阵天空 - 51CTO技术博客-领先的...
当不小心删除了回到桌面的方式,如何创建显示桌面快捷方式方法! - じSkyづ的日志 - 网...
使用 Microsoft AJAX Library 创建自定义客户端脚本
创建事务性脚本 (用mts管理事务、组件)
所有快捷方式都打不开系统提示:无法找到脚本文件c\program files\winrar\monitor.jse
如何使用windows的快捷方式
去掉快捷方式的小箭头
桌面快捷方式不见了的解决办法
提高语言能力的快捷方式
Tcl脚本的历史