VSProject2.CreateWebReferencesFolder メソッド
プロジェクトの Web References フォルダーを作成します。
名前空間: VSLangProj80
アセンブリ: VSLangProj80 (VSLangProj80.dll 内)
構文
'宣言
Function CreateWebReferencesFolder As ProjectItem
ProjectItem CreateWebReferencesFolder()
ProjectItem^ CreateWebReferencesFolder()
abstract CreateWebReferencesFolder : unit -> ProjectItem
function CreateWebReferencesFolder() : ProjectItem
戻り値
型 : EnvDTE.ProjectItem
ProjectItem オブジェクト。
解説
Web References フォルダーが既に存在する場合、このプロパティは既に存在するフォルダーの ProjectItem を返します。
例
この例では、Web 参照フォルダーを作成します。この例が正常に機能するには、ソリューションの最初のプロジェクトは、Visual Basic または Visual C# プロジェクトである必要があります。このサンプル コードをアドインとして実行するには、「方法 : オートメーション オブジェクト モデルのコード例をコンパイルおよび実行する」を参照してください。
[Visual Basic]
' Add-in code.
Imports VSLangProj
Imports VSLangProj80
' This example creates a Web References folder, if it does not
' already exist, and displays some properties of the folder.
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 webFolder As ProjectItem
webFolder = 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 & ".")
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 webFolder = null;
webFolder = 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 + ".");
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 セキュリティ
- 直前の呼び出し元に対する完全な信頼。このメンバーは、部分的に信頼されているコードから使用することはできません。詳細については、「部分信頼コードからのライブラリの使用」を参照してください。