根据快捷方式获取原路径

如下VBS脚本实现了标题中的功能。

'link2target.vbs

Set objArgs = Wscript.Arguments
if not objArgs.Count=1 Then
    Wscript.echo "共有 " & objArgs.Count & " 个参数，需要1个.lnk文件！"
else
    set shell = Wscript.CreateObject("WScript.Shell")
    set lnk = shell.CreateShortcut(objArgs(0))
    Wscript.echo "如下内容已经复制到粘贴板：" & vbcrlf & lnk.Targetpath
    shell.Run "cmd.exe /c echo " & lnk.Targetpath & "| clip", 0, True
end if

使用方法：

E:\test>tree /f
卷 BSP 的文件夹 PATH 列表
卷序列号为 1CCE-F968
E:.
│  Link2Target.vbs
│  test.lnk
│
└─test
        test.txt

E:\test>Link2Target.vbs test.lnk

E:\test>for /F "delims=" %T in ('powershell Get-Clipboard') do echo %T

E:\test>echo E:\test\test\test.txt
E:\test\test\test.txt

E:\test>