[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
Batcher

Rank: 12Rank: 12Rank: 12

帖子
14761 
积分
45932 
技术
846  
捐助
745  
注册时间
2008-6-9 
1楼 跳转到 »
发表于 2018-10-7 18:49 | 显示全部帖子
mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(""%~2.lnk""):b.TargetPath=""%~1"":b.WorkingDirectory=""%~dp1"":b.Hotkey=""%~3"":b.Save:close")
我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14761 
积分
45932 
技术
846  
捐助
745  
注册时间
2008-6-9 
2楼
发表于 2018-10-7 22:26 | 显示全部帖子
回复 3# idzyr


    2楼代码已更新，你再试试
我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14761 
积分
45932 
技术
846  
捐助
745  
注册时间
2008-6-9 
3楼
发表于 2018-10-8 08:12 | 显示全部帖子
回复 5# idzyr


是的，使用call命令调用:CreateShort函数，后面几个是位置参数
%1就是"%SrcFile%"
%2就是"%LnkFile%"
%3就是"%Hotkey%"
以此类推

17行写的很清楚嘛
VBScript
我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表