Есть ли способ проверить из vbscript, является ли папка символической ссылкой?

Question

У меня есть некоторый визуальный базовый код скрипта в моем инсталляторе, и мне нужно проверить, является ли данная папка символической ссылкой или нормальной папкой Есть ли способ выполнить такую ​​задачу в VBScript?

Answer 1

Элементы файловой системы, которые являются символическими ссылками, имеют установленный атрибут FILE_ATTRIBUTE_REPARSE_POINT (1024). Вы можете проверить этот атрибут следующим образом:

Const FA_REPARSE_POINT = &h400

Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder("C:\MyFolder")

If (f.Attributes And FA_REPARSE_POINT) = FA_REPARSE_POINT Then
  ' The folder is a symbolic link
Else
  ' The folder is a normal folder
End If