VSWebSiteEvents – rozhraní

Článek
08/11/2011

Poskytuje přístup k události kolekce webu projektu.

Obor názvů: VsWebSite
Sestavení: VsWebSite.Interop (v VsWebSite.Interop.dll)

Syntaxe

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

Typ VSWebSiteEvents zveřejňuje následující členy.

Vlastnosti

	Název	Popis
	AssemblyReferencesEvents	Získá referenci na události References Vlastnosti kolekce webu projektu.
	WebReferencesEvents	Získá referenci na události WebReferences Vlastnosti kolekce webu projektu.
	WebServicesEvents	Získá referenci na události WebServices Vlastnosti kolekce webu projektu.
	WebSiteMiscEvents	V projektu webu získá referenci na různé události.

Na začátek

Poznámky

Toto rozhraní pracuje s VSWebSiteEvents Vlastnosti VSWebSite objekt, který lze získat pouze prostřednictvím odkazu na aktuální projekt Visual Studio, jako v následujícím příkladu:

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

Poznámka

Je k dispozici verze aplikace Visual Studio, Visual Studio 2005 počínaje funkce poskytované touto třídou. Není k dispozici v aplikaci Visual Web Developer Express Edition.

Příklady

Následující ukázkové makro modul ukazuje, jak se přihlásit k odběru VSWebSite události. Použití modulu otevřete webový projekt v aplikaci Visual Studio a z Nástroje nabídce otevřete makro IDE. Vytvořte nový modul a vložte ukázkový kód do modulu.

Musíte také přidat odkaz na sestavení VsWebSite.Interop v modulu. Inicializovat událost odběru vložením kurzor InitEvents() Metoda a stisknutím klávesy F5. Při testování každé události provede zadanou akci v projektu webu. Další informace získáte v tématu Postupy: Zpracování Události v 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