タイトル通りで、VBscript でシンボリックリンクのリンク先(実体へのpath)を取得したいのですがググっても見つけきれませんでした。
よろしくお願いいたします。
1 件の回答
ここに書かれているとおりです。
https://stackoverflow.com/questions/30624989/how-to-get-target-path-of-a-junction
foldername = "C:\the Junction\test"
Set sh = CreateObject("WScript.Shell")
Set fsutil = sh.Exec("fsutil reparsepoint query """ & foldername & """")
Do While fsutil.Status = 0
WScript.Sleep 100
Loop
If fsutil.ExitCode <> 0 Then
WScript.Echo "An error occurred (" & fsutil.ExitCode & ")."
WScript.Quit fsutil.ExitCode
End If
Set re = New RegExp
re.Pattern = "Substitute Name:\s+(.*)"
For Each m In re.Execute(fsutil.StdOut.ReadAll)
targetPath = m.SubMatches(0)
Next
WScript.Echo targetPath