VSProject2.CreateWebReferencesFolder (Método)
Crea la carpeta Referencias web para el proyecto.
Espacio de nombres: VSLangProj80
Ensamblado: VSLangProj80 (en VSLangProj80.dll)
Sintaxis
'Declaración
Function CreateWebReferencesFolder As ProjectItem
ProjectItem CreateWebReferencesFolder()
ProjectItem^ CreateWebReferencesFolder()
abstract CreateWebReferencesFolder : unit -> ProjectItem
function CreateWebReferencesFolder() : ProjectItem
Valor devuelto
Tipo: EnvDTE.ProjectItem
Un objeto ProjectItem.
Implementaciones
VSProject.CreateWebReferencesFolder()
Comentarios
Si la carpeta Web References ya existe, esta propiedad devuelve el objeto ProjectItem correspondiente a la carpeta existente.
Ejemplos
En este ejemplo se crea una carpeta Referencias Web. El primer proyecto de la solución debe ser un proyecto de Visual Basic o Visual C# para que el ejemplo funcione correctamente. Para ejecutar este ejemplo como complemento, vea Cómo: Compilar y ejecutar los ejemplos de código del modelo de objetos de automatización.
[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.");
}
Seguridad de .NET Framework
- Plena confianza para el llamador inmediato. Un código de confianza parcial no puede utilizar este miembro. Para obtener más información, vea Utilizar bibliotecas de código que no es de plena confianza.