找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 30062|回复: 10

[文件操作] 【已解决】求大神指点批处理创建桌面快捷方式

[复制链接]
发表于 2019-1-6 17:35:54 | 显示全部楼层 |阅读模式
本帖最后由 708841460 于 2019-1-10 08:46 编辑

给D:\某文件夹\XX.exe创建桌面快捷方式。系统:win7 X64
发表于 2019-1-6 19:37:40 | 显示全部楼层
批处理创建快捷方式
http://bbs.bathome.net/thread-11050-1-1.html

BAT调用mshta、VBS、PowerShell创建lnk快捷方式
http://bbs.bathome.net/thread-35005-1-1.html
http://bbs.bathome.net/thread-33196-1-1.html

批处理调用shortcut命令批量修改lnk快捷方式
http://bbs.bathome.net/thread-15756-1-1.html

评分

参与人数 1技术 +1 收起 理由
708841460 + 1 感谢给帖子标题标注[已解决]字样

查看全部评分

发表于 2019-1-6 19:48:06 | 显示全部楼层
本帖最后由 ivor 于 2019-1-6 19:58 编辑


  1. MKLINK Link Target
复制代码

评分

参与人数 2技术 +2 收起 理由
708841460 + 1 感谢给帖子标题标注[已解决]字样
aries215 + 1 这个秒杀url

查看全部评分

发表于 2019-1-6 22:21:15 | 显示全部楼层

我来给楼上大佬做个实例注释

本帖最后由 yhcfsr 于 2019-1-6 22:24 编辑

回复 3# ivor : 怎么每个帖子都要加个SVG链接,害得我也忍不住.
  1. MKLINK "%userprofile%\desktop\XX.exe" "D:\某文件夹\XX.exe"
复制代码
 楼主| 发表于 2019-1-7 09:12:30 | 显示全部楼层
回复 4# yhcfsr


C:\Users\ASUS>MKLINK /d "%userprofile%\desktop\XX.lnk" "D:\123.exe"
你没有足够的权限执行此操作。
大神,能在指点一下吗?显示没权限
发表于 2019-1-7 09:44:07 | 显示全部楼层
回复 5# 708841460


“以管理员身份运行”打开一个CMD窗口再执行命令试试

评分

参与人数 1技术 +1 收起 理由
708841460 + 1 乐于助人

查看全部评分

发表于 2019-1-7 09:54:37 | 显示全部楼层
回复 5# 708841460

首先,管理员身份运行命令行.
其次,/D参数是针对目录的,单文件不要用这个参数.

评分

参与人数 1技术 +1 收起 理由
708841460 + 1 完美解决问题

查看全部评分

 楼主| 发表于 2019-1-7 10:09:07 | 显示全部楼层
本帖最后由 708841460 于 2019-1-7 10:11 编辑

回复 7# yhcfsr


    谢谢大神,成功了。但是远程运行的时候只能直接运行,能不能让文件自己获取管理员权限呢?
发表于 2019-1-7 10:34:07 | 显示全部楼层
  1. @echo off
  2. ::管理员权限
  3. %1 start "" mshta vbscript:createobject("shell.application").shellexecute("""%~0""","::",,"runas",1)(window.close)&exit
  4. cd /d "%~dp0"

  5. ...........其他语句..............
复制代码

评分

参与人数 1技术 +1 收起 理由
708841460 + 1 优秀

查看全部评分

 楼主| 发表于 2019-1-7 10:44:31 | 显示全部楼层
回复 9# yhcfsr


    已解决,非常感谢
 楼主| 发表于 2019-1-10 08:45:26 | 显示全部楼层
这个代码效果更好一点,虽然我看不懂

  1. set SrcFile=e:\123.exe
  2. set LnkFile=%userprofile%\desktop\123
  3. call :CreateShort "%SrcFile%" "%LnkFile%"
  4. goto :eof

  5. :CreateShort
  6. mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(""%~2.lnk""):b.TargetPath=""%~1"":b.WorkingDirectory=""%~dp1"":b.Save:close")
复制代码
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-18 22:11 , Processed in 0.024735 second(s), 9 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表