VSWebSiteEvents-Schnittstelle

Artikel
05/16/2015

Bietet Zugriff auf Ereignis-Auflistungen im Websiteprojekt.

Namespace: VsWebSite
Assembly: VsWebSite.Interop (in VsWebSite.Interop.dll)

Syntax

'Declaration
<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

Der VSWebSiteEvents-Typ macht die folgenden Member verfügbar.

Eigenschaften

	Name	Beschreibung
	AssemblyReferencesEvents	Ruft einen Verweis auf Ereignisse für die References-Auflistungseigenschaft in einem Websiteprojekt ab.
	WebReferencesEvents	Ruft einen Verweis auf Ereignisse für die WebReferences-Auflistungseigenschaft in einem Websiteprojekt ab.
	WebServicesEvents	Ruft einen Verweis auf Ereignisse für die WebServices-Auflistungseigenschaft in einem Websiteprojekt ab.
	WebSiteMiscEvents	Ruft einen Verweis auf verschiedene Ereignisse in einem Websiteprojekt ab.

Zum Seitenanfang

Hinweise

Auf diese Schnittstelle kann mit der VSWebSiteEvents-Eigenschaft eines VSWebSite-Objekts zugegriffen werden, welches, wie im folgenden Beispiel gezeigt, nur durch einen Verweis auf das aktuelle Visual Studio-Projekt abgerufen werden kann:

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

Hinweis

Die von dieser Klasse bereitgestellten Funktionen sind in den Visual Studio-Versionen ab Visual Studio 2005 verfügbar.Es steht in Visual Web Developer Express Edition nicht zur Verfügung.

Beispiele

Das folgendes Beispielmakromodul zeigt, wie VSWebSite-Ereignisse abonniert werden. Um das Modul zu verwenden, öffnen Sie ein Websiteprojekt in Visual Studio, und öffnen Sie im Menü Extras das Makro IDE. Erstellen Sie ein neues Modul, und fügen Sie den Beispielcode in das Modul ein.

Sie müssen dem Modul auch einen Verweis auf die VsWebSite.Interop-Assembly hinzufügen. Initialisieren Sie das Ereignisabonnement, indem Sie den Cursor in die InitEvents()-Methode setzen und F5 drücken. Um jedes Ereignis zu testen, führen Sie die angegebene Aktion im Websiteprojekt aus. Weitere Informationen finden Sie unter Gewusst wie: Behandeln von Ereignissen in einem Makro

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