Metoda VSProject2.CreateWebReferencesFolder —

Tworzy folder odwołań sieć Web dla projekt.

Przestrzeń nazw:  VSLangProj80
Zestaw:  VSLangProj80 (w VSLangProj80.dll)

Składnia

'Deklaracja
Function CreateWebReferencesFolder As ProjectItem

ProjectItem CreateWebReferencesFolder()

ProjectItem^ CreateWebReferencesFolder()

abstract CreateWebReferencesFolder : unit -> ProjectItem 

function CreateWebReferencesFolder() : ProjectItem

Wartość zwracana

Typ: EnvDTE.ProjectItem
A ProjectItem obiekt.

Uwagi

Jeśli istnieje już folder sieć Web odwołania, a następnie zwraca tę właściwość ProjectItem dla istniejącego folderu.

Przykłady

To przykładowe polecenie tworzy folder odwołań sieć Web .Pierwszy projekt w rozwiązanie musi być Visual Basic lub Visual C# projekt , na przykład działać poprawnie. Aby uruchomić ten przykład, jako dodatek, zobacz Jak: skompilować i uruchomić przykłady kodu modelu obiektu automatyzacji.

[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.");
}

Zabezpieczenia programu .NET Framework

• Pełne zaufanie do bezpośredniego wywołującego. Tego elementu członkowskiego nie można używać w kodzie częściowo zaufanym. Aby uzyskać więcej informacji, zobacz Przy użyciu bibliotek z częściowo zaufanego kodu..

Zobacz też

Informacje

VSProject2 Interfejs

Przeciążenie CreateWebReferencesFolder

Przestrzeń nazw VSLangProj80