terse

试试这样呢

@echo off
set /p T=【右键】粘贴.lnk路径
for /f "delims=" %%i in ('find ":" "%t%" ^|findstr /r "^[A-z]:[\\]"') do (
      echo "%%~dpi"
)
pause
复制代码

terse

回复 21# yyz219
这样呢 echo "%%i"

terse

回复 24# yyz219
正如16楼B版主解释 部分INK文件无用？
直接FIND呢

for /f "eol=/ delims=" %%i in ('find ":\" ^<"%t%"') do echo;%i
复制代码

terse

WScript.Shell 解决部分问题 某些情况下可以用ADODB.Stream处理一下

1>1/* :
@echo off
cscript //E:JScript //nologo "%~f0">#.txt
exit
*/
var ph = new ActiveXObject('htmlfile').parentWindow.clipboardData.getData('Text');
var ws = new ActiveXObject("WScript.Shell");
WSH.Echo(ws.CreateShortcut(ph).TargetPath);
复制代码

terse

我不知道怎么使用
yyz219 发表于 2022-12-28 19:58

    存为bat文件

terse

看你已解决了，还是发上来吧，应该符合你的需求，保存为BAT文件 直接运行

1>1/* : @echo off &cscript //E:JScript //nologo "%~f0" "D:\桌面\Desktop\关机.lnk" >#.txt &exit */
WSH.Echo(new ActiveXObject("WScript.Shell").CreateShortcut(WSH.Arguments(0)).TargetPath);
复制代码

回复 37# yyz219