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

[文件操作] 求助!怎么把一个文件拖进BAT,然后自动把这个文件拉到一个快捷方式来打开它?

[复制链接]
发表于 2015-8-27 15:02:15 | 显示全部楼层 |阅读模式
QuickPrintA.ink是快捷方式,,,,我把新的文件拉进BAT就可以实现把这文件自动拉进这个快捷方式启动。


求全代码
发表于 2015-8-27 15:36:05 | 显示全部楼层
回复 1# king3cool


http://batch-cn.qiniudn.com/tool/ShortCut.exe

  1. @echo off & if "%~1" neq "" ShortCut.exe /f:".\%~n1.lnk" /a:c /t:"%~1" & start /b "" "%~n1.lnk" & exit
复制代码
 楼主| 发表于 2015-8-27 15:38:58 | 显示全部楼层
回复 2# 回家路上


    不懂啊,我是小白,我的快捷方式是QuickPrintA.lnk
发表于 2015-8-27 16:53:18 | 显示全部楼层
本帖最后由 回家路上 于 2015-8-27 17:09 编辑

回复 3# king3cool

  1. @if(0)==(0) echo off&echo;"%~1"|cscript -nologo -e:jscript "%~f0"& start /b "" "QuickPrintA.lnk" & exit&@end

  2. var objShell = new ActiveXObject("WScript.Shell");
  3. var objLink = objShell.CreateShortcut("QuickPrintA.lnk");
  4. objLink.TargetPath = WScript.StdIn.ReadLine();
  5. objLink.Save();
复制代码

  1. '&cls&@echo off&echo;"%~1"|cscript -nologo -e:vbscript "%~f0"& start /b "" "QuickPrintA.lnk" & exit&@end

  2. Set WshShell = Wscript.CreateObject("Wscript.Shell")
  3. Set oShellLink = WshShell.CreateShortcut("QuickPrintA.lnk")
  4. oShellLink.TargetPath = WScript.StdIn.ReadLine
  5. oShellLink.Save
复制代码
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-3-18 18:54 , Processed in 0.016811 second(s), 7 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

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