VSProject2.CreateWebReferencesFolder, méthode
Crée le dossier Web References du projet.
Espace de noms : VSLangProj80
Assembly : VSLangProj80 (dans VSLangProj80.dll)
Syntaxe
'Déclaration
Function CreateWebReferencesFolder As ProjectItem
ProjectItem CreateWebReferencesFolder()
ProjectItem^ CreateWebReferencesFolder()
abstract CreateWebReferencesFolder : unit -> ProjectItem
function CreateWebReferencesFolder() : ProjectItem
Valeur de retour
Type : EnvDTE.ProjectItem
Objet ProjectItem.
Notes
Si le dossier Web References existe déjà, cette propriété retourne le ProjectItem du dossier existant.
Exemples
Cet exemple crée un dossier Web References.Le premier projet de la solution doit être un projet Visual Basic ou Visual C# pour que l'exemple fonctionne correctement.Pour exécuter cet exemple comme un complément, consultez Comment : compiler et exécuter les exemples de code du modèle objet Automation.
[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.");
}
Sécurité .NET Framework
- Confiance totale accordée à l'appelant immédiat. Ce membre ne peut pas être utilisé par du code d'un niveau de confiance partiel. Pour plus d'informations, consultez Utilisation de bibliothèques à partir de code d'un niveau de confiance partiel.