2010-02-23 46 views

回答

3

作为符号链接的文件系统项目具有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 
相关问题