[其他] [已解决]帮我看下“查找快捷方式所指向目标.bat”那里出了问题，谢谢

yyz219

最佳方案：
（主要这些代码能够在PE中运行）
快捷方式所指向目标保存文本.bat

::【拖到这里：快捷方式所指向目标保存文本"#.txt"】
@echo off
>"快捷方式所指向目标保存文本.vbs" echo Set oWshShell = CreateObject("WScript.Shell")
>>"快捷方式所指向目标保存文本.vbs" echo Set oWshShortcut = oWshShell.CreateShortcut("%~1")
>>"快捷方式所指向目标保存文本.vbs" echo Dim fso, MyFile
>>"快捷方式所指向目标保存文本.vbs" echo Set fso = CreateObject("Scripting.FileSystemObject")
>>"快捷方式所指向目标保存文本.vbs" echo Set MyFile = fso.CreateTextFile("#.txt", True)
>>"快捷方式所指向目标保存文本.vbs" echo MyFile.WriteLine(oWshShortcut.TargetPath)
>>"快捷方式所指向目标保存文本.vbs" echo MyFile.Close

快捷方式所指向目标保存文本.vbs
del /q 快捷方式所指向目标保存文本.vbs
exit
复制代码

********************************
原来的问题：
查找快捷方式所指向目标.bat

@echo off&setlocal enabledelayedexpansion
set /p T=【右键】粘贴.lnk路径:
for /f "tokens=* delims=" %%i in ('type "%T%"^|find ":\"') do (
      set /a n=n%%2+1
      if !N! equ 2 echo %%i
)
pause
复制代码

要达到的效果：输入快捷方式路径（含扩展名），能够显示出快捷方式所指向目标
**********************************************************
实际情况：
1.输入：D:\桌面\Desktop\Dism++.lnk，能够正确显示
2.输入：D:\桌面\Desktop\关机.lnk，没有显示
另外，如果文件路径中有 ！号，也不能够正确显示（！号丢失）
*************************************************************
上面两个快捷方式实际所指向目标是：
D:\桌面\Desktop\Dism++.lnk————"D:\1绿色软件\bat批处理\C盘使用情况 -Dism++x64-.bat"
D:\桌面\Desktop\关机.lnk——————D:\1绿色软件\bat批处理\注销＋重新启动\关机.bat
————————————————————————————————————————————
问题不知道出现在哪里？谢谢

77七

@echo off
set /p T=【右键】粘贴.lnk路径:
for /f "delims=" %%i in ('type %T%^|find ":\"') do (
    set "mubiao=%%i"
)
echo "%mubiao%"
pause
复制代码

不知道改的对不对，我自己试了几个没问题 复制路径带上引号，如果不带就把%T%加引号

开延迟变量，!就会被省略
数学不太好...看不懂那个公式，是固定运行几次的意思？

hfxiang

试这个

@echo off
@rem 保存为ANSI格式
for /f "tokens=* delims=" %%a in ('type "%~1"^|find ":\"') do set dp=%%~a
echo;%dp%
pause
复制代码

yyz219

回复 3# hfxiang


    非常感谢，试一试先

hfxiang

补充一下，是直接拖放.lnk文件到脚本上即可，不用手工录入路径

yyz219

试这个
hfxiang 发表于 2022-12-28 10:41

    ！ 号问题解决了
********************************
但是，对  D:\桌面\Desktop\关机.lnk  显示不对

显示：
/D:\
请按任意键继续. . .

hfxiang

回复 6# yyz219


    请问“D:\ 桌面 \Desktop\ 关机.lnk”的快捷方式能正常正常运行吗？

yyz219

回复  yyz219


    请问“D:\ 桌面 \Desktop\ 关机.lnk”的快捷方式能正常正常运行吗？
hfxiang 发表于 2022-12-28 10:52

    能够正常运行的

yyz219

不知道改的对不对，我自己试了几个没问题 复制路径带上引号，如果不带就把%T%加引号

开延迟变量，!就会被 ...
77七 发表于 2022-12-28 10:37

    非常感谢 我试一试先

yyz219

不知道改的对不对，我自己试了几个没问题 复制路径带上引号，如果不带就把%T%加引号

开延迟变量，!就会被 ...
77七 发表于 2022-12-28 10:37

    ！ 号问题解决了
********************************
但是，对  D:\桌面\Desktop\关机.lnk  显示不对

显示：
/D:\
请按任意键继续. . .
（加  引号也不能够解决问题）

77七

回复 10# yyz219

D:\桌面\Desktop\Dism++.lnk 这个正常？你重新创建“关机”的快捷方式试一试

yyz219

回复  yyz219

D:\桌面\Desktop\Dism++.lnk 这个正常？你重新创建“关机”的快捷方式试一试
77七 发表于 2022-12-28 11:03

    重新创建“关机”的快捷方  两个都正常

Batcher

回复 6# yyz219


打开一个CMD窗口，执行：
type "D:\桌面\Desktop\关机.lnk" | find ":\"
就会发现这个有问题的lnk文件跟其他lnk文件不一样

yyz219

回复  yyz219


打开一个CMD窗口，执行：
type "D:\桌面\Desktop\关机.lnk" | find ":\"
就会发现这个 ...
Batcher 发表于 2022-12-28 11:28

    Microsoft Windows [版本 6.1.7601]
版权所有 (c) 2009 Microsoft Corporation。保留所有权利。

C:\Users\Administrator>type "D:\桌面\Desktop\关机.lnk" | find ":\"
/D:\

C:\Users\Administrator>

Batcher

回复 10# yyz219

@echo off
powershell "$objShell = New-Object -ComObject WScript.Shell; $objShell.CreateShortcut('D:\桌面\Desktop\关机.lnk').TargetPath"
pause
复制代码