VSWebSiteEvents, interface

Article
08/10/2011

Fournit l'accès aux collections d'événements dans le projet de site Web.

Espace de noms : VsWebSite
Assembly : VsWebSite.Interop (dans VsWebSite.Interop.dll)

Syntaxe

'Déclaration
<GuidAttribute("9F1B1C2C-FA11-44AB-A7DA-926FF1927C70")> _
Public Interface VSWebSiteEvents

[GuidAttribute("9F1B1C2C-FA11-44AB-A7DA-926FF1927C70")]
public interface VSWebSiteEvents

[GuidAttribute(L"9F1B1C2C-FA11-44AB-A7DA-926FF1927C70")]
public interface class VSWebSiteEvents

[<GuidAttribute("9F1B1C2C-FA11-44AB-A7DA-926FF1927C70")>]
type VSWebSiteEvents =  interface end

public interface VSWebSiteEvents

Le type VSWebSiteEvents expose les membres suivants.

Propriétés

	Nom	Description
	AssemblyReferencesEvents	Obtient une référence aux événements pour la propriété de collection References dans un projet de site Web.
	WebReferencesEvents	Obtient une référence aux événements pour la propriété de collection WebReferences dans un projet de site Web.
	WebServicesEvents	Obtient une référence aux événements pour la propriété de collection WebServices dans un projet de site Web.
	WebSiteMiscEvents	Obtient une référence aux divers événements d'un projet de site Web.

Début

Notes

L'accès à cette interface s'effectue via la propriété VSWebSiteEvents d'un objet VSWebSite qui peut être obtenu uniquement par le biais d'une référence au projet Visual Studio actuel, comme dans l'exemple suivant :

Dim ws As VsWebSite.VSWebSite = DTE.Solution.Projects.Item(1).Object

Notes

Les fonctionnalités fournies par cette classe sont disponibles dans les versions de Visual Studio à partir de Visual Studio 2005. Cette fonctionnalité n'est pas disponible dans Visual Web Developer Express.

Exemples

Le module d'exemple de macro suivant indique comment s'abonner à des événements VSWebSite. Pour utiliser le module, ouvrez un projet de site Web dans Visual Studio, puis ouvrez l'éditeur de macros à partir du menu Outils. Créez un nouveau module et collez l'exemple de code dans le module.

Vous devez également ajouter au module une référence à l'assembly VsWebSite.Interop. Initialisez l'abonnement aux événements en plaçant le curseur dans la méthode InitEvents() et en appuyant sur F5. Pour tester chaque événement, exécutez l'action spécifiée dans votre projet de site Web. Pour plus d'informations, consultez Comment : gérer les événements dans une macro.

Imports System
Imports EnvDTE
Imports EnvDTE80
Imports VsWebSite
Imports System.Diagnostics

Public Module VsWS_Events
    ' Initialize the VsWebSite and the Events
    Sub InitAssemblyRefsEvents()
        ' Get a reference to the first Web site 
        ' in the current solution
        Dim ws As VsWebSite.VSWebSite = _
            DTE.Solution.Projects.Item(1).Object

        ' Attach the Web site events to module events
        AssemblyRefsEvents = _
            ws.VSWebSiteEvents.AssemblyReferencesEvents
    End Sub

    ' Declare the event
    ' The macro IDE requires the attribute 
    ' in order to trap the events
    <System.ContextStaticAttribute()> _
    Public WithEvents AssemblyRefsEvents As _
        VsWebSite.AssemblyReferencesEvents

    <System.ContextStaticAttribute()> _
    Public WithEvents MiscEvents As _
        VsWebSite.WebSiteMiscEvents

    <System.ContextStaticAttribute()> _
    Public WithEvents WebRefsEvents As _
        VsWebSite.WebReferencesEvents

    <System.ContextStaticAttribute()> _
    Public WithEvents WebSvcsEvents As _
        VsWebSite.WebServicesEvents

    ' Handler for the AssemblyReferenceAdded event
    ' Test: Add an Assembly Reference to your Web site project
    Private Sub AssemblyRefAdded _
        (ByVal ref As VsWebSite.AssemblyReference) _
            Handles AssemblyRefsEvents.AssemblyReferenceAdded

        ' Display the name of the added reference
        MsgBox("Assembly Added: " & ref.Name)
    End Sub

    ' Handler for the After Refresh Folder event
    ' Test: Refresh a folder in your Web site project
    Private Sub AfterRefresh _
        (ByVal ref As Object) _
            Handles MiscEvents.OnAfterFolderRefresh

        ' Display the folder as text
        MsgBox("Folder Refreshed: " & ref.ToString())
    End Sub

    ' Handler for the Web Reference Added event
    ' Test: Add a Web Reference to your Web site project
    Private Sub WebRefAdded _
        (ByVal ref As VsWebSite.WebReference) _
            Handles WebRefsEvents.WebReferenceAdded

        ' Display the name of the added reference
        MsgBox("Web Reference Added: " & ref.Name)
    End Sub

    ' Handler for the Web Service Added event
    ' Test: Add a Web service to your Web site project
    Private Sub WebSvcAdded _
        (ByVal ref As VsWebSite.WebService) _
            Handles WebSvcsEvents.WebServiceAdded

        ' Display the name of the added item
        MsgBox("Web Service Added: " & ref.Name)
    End Sub
End Module