VSProject.WebReferencesFolder 屬性
取得代表專案 Web 參考資料夾的 ProjectItem 物件。如果資料夾不存在,這個屬性會傳回 Nothing (Null 參照 (即 Visual Basic 中的 Nothing) 參考)。唯讀。
命名空間: VSLangProj
組件: VSLangProj (在 vslangproj.dll 中)
語法
'宣告
'用途
屬性值
傳回代表 Web 參考資料夾的 ProjectItem 物件。
備註
專案的 Web 參考可經由存取 WebReferencesFolder 的 ProjectItems 屬性來擷取。
一個專案最多只能包含一個 Web 參考資料夾。這個資料夾可使用 CreateWebReferencesFolder 建立。除此之外,當使用 CreateWebReferencesFolder 方法將第一個 Web 參考加入至專案時,也會自動建立這個資料夾。
在 Visual Basic 或 C# 專案中,WebReferencesFolder 專案項目的 Kind 屬性一定是 vsProjectItemKindPhysicalFolder,因為 Visual Basic 和 C# 專案只支援實體檔案。
範例
' Macro Editor
' This example creates a Web references folder, if it does not
' already exist, and displays some of the folder properties.
Imports VSLangProj
Sub WebReferencesFolderExample()
' This example assumes that the first project in the
' solution is either a Visual Basic or C# project.
Dim aVSProject As VSProject = _
CType(DTE.Solution.Projects.Item(1).Object, VSProject)
' Add a new folder if it does not already exist.
If (aVSProject.WebReferencesFolder Is Nothing) Then
Dim newFolder As ProjectItem
newFolder = aVSProject.CreateWebReferencesFolder()
End If
' Display the name of the Web references folder.
Dim theFolder As ProjectItem = aVSProject.WebReferencesFolder
MsgBox("The name of the WebReferences folder is " _
& theFolder.Name & ".")
' All Visual Basic and C# Web references folders are physical.
If (theFolder.Kind = _
EnvDTE.Constants.vsProjectItemKindPhysicalFolder) Then
MsgBox(theFolder.Name & " is a physical folder.")
End If
MsgBox("There are " & theFolder.ProjectItems.Count.ToString() & _
" Web references.")
End Sub