PublishEventsClass.OnPublishBegin 事件

项目
08/12/2011

此 API 支持 .NET Framework 基础结构，不适合在代码中直接使用。

启动发布操作时触发的事件。

命名空间： EnvDTE80
程序集： EnvDTE80（在 EnvDTE80.dll 中）

语法

声明
Public Overridable Event OnPublishBegin As _dispPublishEvents_OnPublishBeginEventHandler

public virtual event _dispPublishEvents_OnPublishBeginEventHandler OnPublishBegin

public:
virtual  event _dispPublishEvents_OnPublishBeginEventHandler^ OnPublishBegin {
    void add (_dispPublishEvents_OnPublishBeginEventHandler^ value);
    void remove (_dispPublishEvents_OnPublishBeginEventHandler^ value);
}

abstract OnPublishBegin : IEvent<_dispPublishEvents_OnPublishBeginEventHandler,
    EventArgs>
override OnPublishBegin : IEvent<_dispPublishEvents_OnPublishBeginEventHandler,
    EventArgs>

JScript 不支持事件。

实现

_dispPublishEvents_Event.OnPublishBegin

备注

Visual Studio 包括一个名为“ClickOnce 部署”的新功能。 ClickOnce 允许您将 Windows 应用程序发布到 Web 服务器或网络文件共享上以简化安装。有关这方面的更多信息，请参见 ClickOnce 安全和部署。

示例

Public Class Connect
    Implements IDTExtensibility2
    Public WithEvents pubEvents As EnvDTE80.PublishEvents

    Dim applicationObject As DTE2
    Dim addInInstance As AddIn

    Public Sub OnConnection(ByVal application As Object, ByVal _
    connectMode As ext_ConnectMode, ByVal addInInst As Object, ByRef _
    custom As Array) 
    Implements IDTExtensibility2.OnConnection
        Try
            applicationObject = CType(application, DTE2)
            addInInstance = CType(addInInst, AddIn)
            Dim events As EnvDTE80.Events2
            events = applicationObject.Events2
            pubEvents = CType(events._PublishEvents(Nothing), _
            EnvDTE80.PublishEvents)
        Catch ex As Exception
            MsgBox(ex.ToString)
        End Try
    End Sub

    Private Sub pubEvents_OnPublishBegin(ByRef [Continue] As Boolean) _
    Handles pubEvents.OnPublishBegin
        MsgBox("A publish event is occuring..")
    End Sub

    Private Sub pubEvents_OnPublishDone(ByVal Success As Boolean) _
    Handles pubEvents.OnPublishDone
        MsgBox("A publish event has completed.")
    End Sub