Metodo VSProject2.CreateWebReferencesFolder
Crea la cartella dei riferimenti Web per il progetto.
Spazio dei nomi: VSLangProj80
Assembly: VSLangProj80 (in VSLangProj80.dll)
Sintassi
'Dichiarazione
Function CreateWebReferencesFolder As ProjectItem
ProjectItem CreateWebReferencesFolder()
ProjectItem^ CreateWebReferencesFolder()
abstract CreateWebReferencesFolder : unit -> ProjectItem
function CreateWebReferencesFolder() : ProjectItem
Valore restituito
Tipo: EnvDTE.ProjectItem
Oggetto ProjectItem.
Implementa
VSProject.CreateWebReferencesFolder()
Note
Se la cartella dei riferimenti Web esiste già, questa proprietà restituisce l'oggetto ProjectItem per la cartella esistente.
Esempi
Nell'esempio riportato di seguito viene creata una cartella dei riferimenti Web. Per la corretta esecuzione dell'esempio, il primo progetto della soluzione deve essere un progetto di Visual Basic o Visual C#. Per eseguire questo esempio come componente aggiuntivo, vedere Procedura: compilare ed eseguire gli esempi di codice del modello a oggetti di automazione.
[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.");
}
Sicurezza di .NET Framework
- Attendibilità totale per il chiamante immediato. Impossibile utilizzare questo membro in codice parzialmente attendibile. Per ulteriori informazioni, vedere Utilizzo di librerie da codice parzialmente attendibile.