VSProject2.WebReferencesFolder プロパティ
プロジェクトの Web References フォルダーを表す ProjectItem オブジェクトを取得します。フォルダーが存在しない場合、このプロパティは Nothing (nullnull 参照 (Visual Basic では Nothing) 参照) を返します。
名前空間: VSLangProj80
アセンブリ: VSLangProj80 (VSLangProj80.dll 内)
構文
'宣言
ReadOnly Property WebReferencesFolder As ProjectItem
ProjectItem WebReferencesFolder { get; }
property ProjectItem^ WebReferencesFolder {
ProjectItem^ get ();
}
abstract WebReferencesFolder : ProjectItem
function get WebReferencesFolder () : ProjectItem
プロパティ値
型 : EnvDTE.ProjectItem
Web References フォルダーを表す ProjectItem オブジェクト。
解説
WebReferencesFolder の ProjectItems プロパティにアクセスすることによって、プロジェクトの Web 参照を取得できます。
1 つのプロジェクトに格納できる [Web References] フォルダーの数は 1 つです。このフォルダーは、CreateWebReferencesFolder メソッドを使用して作成できます。また、このフォルダーは、CreateWebReferencesFolder メソッドで最初の Web 参照がプロジェクトに追加されたときに自動的に作成されます。
Visual Basic プロジェクトと Visual C# プロジェクトがサポートしているのは物理ファイルだけであるため、Visual Basic または Visual C# プロジェクトでは、WebReferencesFolder プロジェクト項目の Kind プロパティは、常に vsProjectItemKindPhysicalFolder です。
例
この例では、Web 参照フォルダーが存在しなければ作成し、メッセージ ボックスにフォルダー プロパティの一部を表示します。このサンプル コードをアドインとして実行するには、「方法 : オートメーション オブジェクト モデルのコード例をコンパイルおよび実行する」を参照してください。この例を実行する前に、Visual Basic または Visual C# プロジェクトを開いておきます。
[Visual Basic]
' Add-in code.
' This example creates a Web references folder, if it does not
' already exist, and displays some of the folder properties.
Imports VSLangProj
Imports VSLangProj80
Public Sub OnConnection(ByVal application As Object _
, ByVal connectMode As ext_ConnectMode, ByVal addInInst As Object, _
ByRef custom As Array) Implements IDTExtensibility2.OnConnection
applicationObject = CType(application, DTE2)
addInInstance = CType(addInInst, AddIn)
WebReferencesFolderExample(applicationObject)
End Sub
Sub WebReferencesFolderExample(ByVal dte As DTE2)
' This example assumes that the first project in the
' solution is a Visual Basic or C# project.
Dim aVSProject As VSProject2 = _
CType(applicationObject.Solution.Projects.Item(1)._
Object, VSProject2)
' 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
[C#]
using System.Windows.Forms;
using VSLangProj;
using VSLangProj2;
using VSLangProj80;
public void OnConnection(object application, ext_ConnectMode
connectMode, object addInInst, ref Array custom)
{
applicationObject = (DTE2)application;
addInInstance = (AddIn)addInInst;
WebReferencesFolderExample((DTE2)applicationObject);
}
public void WebReferencesFolderExample( DTE2 dte )
{
// This example assumes that the first project in the
// solution is a Visual Basic or C# project.
VSProject2 aVSProject = ( ( VSProject2 )
(applicationObject.Solution.Projects.Item( 1 ).Object ) );
// Add a new folder if it does not already exist.
if ( ( aVSProject.WebReferencesFolder == null ) )
{
ProjectItem newFolder = null;
newFolder = aVSProject.CreateWebReferencesFolder();
}
// Display the name of the Web references folder.
ProjectItem theFolder = aVSProject.WebReferencesFolder;
MessageBox.Show( "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 ) )
{
MessageBox.Show( theFolder.Name + " is a physical folder.");
}
MessageBox.Show( "There are " +
theFolder.ProjectItems.Count.ToString() + " Web references.");
}
.NET Framework セキュリティ
- 直前の呼び出し元に対する完全な信頼。このメンバーは、部分的に信頼されているコードから使用することはできません。詳細については、「部分信頼コードからのライブラリの使用」を参照してください。