106 lines
5.2 KiB
VB.net
106 lines
5.2 KiB
VB.net
Partial Class ContactsVC
|
|
|
|
<System.Diagnostics.DebuggerNonUserCode()> _
|
|
Public Sub New(ByVal Container As System.ComponentModel.IContainer)
|
|
MyClass.New()
|
|
|
|
'Required for Windows.Forms Class Composition Designer support
|
|
Container.Add(Me)
|
|
|
|
End Sub
|
|
|
|
'Component overrides dispose to clean up the component list.
|
|
<System.Diagnostics.DebuggerNonUserCode()> _
|
|
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
|
If disposing AndAlso components IsNot Nothing Then
|
|
components.Dispose()
|
|
End If
|
|
MyBase.Dispose(disposing)
|
|
End Sub
|
|
|
|
'Required by the Component Designer
|
|
Private components As System.ComponentModel.IContainer
|
|
|
|
'NOTE: The following procedure is required by the Component Designer
|
|
'It can be modified using the Component Designer.
|
|
'Do not modify it using the code editor.
|
|
<System.Diagnostics.DebuggerStepThrough()> _
|
|
Private Sub InitializeComponent()
|
|
Me.aCreateActivityContacts = New DevExpress.ExpressApp.Actions.SimpleAction()
|
|
Me.aContacts_ChangeGroup = New DevExpress.ExpressApp.Actions.PopupWindowShowAction()
|
|
Me.aCreateEmailSendQueue = New DevExpress.ExpressApp.Actions.PopupWindowShowAction()
|
|
Me.aContactEmailToClipboard = New DevExpress.ExpressApp.Actions.SimpleAction()
|
|
Me.aClearClipboard = New DevExpress.ExpressApp.Actions.SimpleAction()
|
|
'
|
|
'aCreateActivityContacts
|
|
'
|
|
Me.aCreateActivityContacts.Caption = "Create Activity Contacts"
|
|
Me.aCreateActivityContacts.ConfirmationMessage = Nothing
|
|
Me.aCreateActivityContacts.Id = "aCreateActivityContacts"
|
|
Me.aCreateActivityContacts.TargetViewId = "Contacts_CRM_Leads_Activity_ListView"
|
|
Me.aCreateActivityContacts.ToolTip = Nothing
|
|
'
|
|
'aContacts_ChangeGroup
|
|
'
|
|
Me.aContacts_ChangeGroup.AcceptButtonCaption = Nothing
|
|
Me.aContacts_ChangeGroup.CancelButtonCaption = Nothing
|
|
Me.aContacts_ChangeGroup.Caption = "aContacts_ChangeGroup"
|
|
Me.aContacts_ChangeGroup.Category = ""
|
|
Me.aContacts_ChangeGroup.ConfirmationMessage = Nothing
|
|
Me.aContacts_ChangeGroup.Id = "aContacts_ChangeGroup"
|
|
Me.aContacts_ChangeGroup.SelectionDependencyType = DevExpress.ExpressApp.Actions.SelectionDependencyType.RequireMultipleObjects
|
|
Me.aContacts_ChangeGroup.TargetObjectType = GetType(Nuvolar.[Module].Contacts)
|
|
Me.aContacts_ChangeGroup.ToolTip = Nothing
|
|
'
|
|
'aCreateEmailSendQueue
|
|
'
|
|
Me.aCreateEmailSendQueue.AcceptButtonCaption = Nothing
|
|
Me.aCreateEmailSendQueue.CancelButtonCaption = Nothing
|
|
Me.aCreateEmailSendQueue.Caption = "aCreateEmailSendQueue"
|
|
Me.aCreateEmailSendQueue.ConfirmationMessage = Nothing
|
|
Me.aCreateEmailSendQueue.Id = "aCreateEmailSendQueue"
|
|
Me.aCreateEmailSendQueue.SelectionDependencyType = DevExpress.ExpressApp.Actions.SelectionDependencyType.RequireMultipleObjects
|
|
Me.aCreateEmailSendQueue.TargetObjectType = GetType(Nuvolar.[Module].Contacts)
|
|
Me.aCreateEmailSendQueue.TargetViewType = DevExpress.ExpressApp.ViewType.ListView
|
|
Me.aCreateEmailSendQueue.ToolTip = Nothing
|
|
Me.aCreateEmailSendQueue.TypeOfView = GetType(DevExpress.ExpressApp.ListView)
|
|
'
|
|
'aContactEmailToClipboard
|
|
'
|
|
Me.aContactEmailToClipboard.Caption = "aContact Email To Clipboard"
|
|
Me.aContactEmailToClipboard.ConfirmationMessage = Nothing
|
|
Me.aContactEmailToClipboard.Id = "aContactEmailToClipboard"
|
|
Me.aContactEmailToClipboard.SelectionDependencyType = DevExpress.ExpressApp.Actions.SelectionDependencyType.RequireMultipleObjects
|
|
Me.aContactEmailToClipboard.TargetObjectType = GetType(Nuvolar.[Module].Contacts)
|
|
Me.aContactEmailToClipboard.TargetViewType = DevExpress.ExpressApp.ViewType.ListView
|
|
Me.aContactEmailToClipboard.ToolTip = Nothing
|
|
Me.aContactEmailToClipboard.TypeOfView = GetType(DevExpress.ExpressApp.ListView)
|
|
'
|
|
'aClearClipboard
|
|
'
|
|
Me.aClearClipboard.Caption = "aClear Clipboard"
|
|
Me.aClearClipboard.ConfirmationMessage = Nothing
|
|
Me.aClearClipboard.Id = "aClearClipboard"
|
|
Me.aClearClipboard.SelectionDependencyType = DevExpress.ExpressApp.Actions.SelectionDependencyType.RequireMultipleObjects
|
|
Me.aClearClipboard.TargetObjectType = GetType(Nuvolar.[Module].Contacts)
|
|
Me.aClearClipboard.TargetViewType = DevExpress.ExpressApp.ViewType.ListView
|
|
Me.aClearClipboard.ToolTip = Nothing
|
|
Me.aClearClipboard.TypeOfView = GetType(DevExpress.ExpressApp.ListView)
|
|
'
|
|
'ContactsVC
|
|
'
|
|
Me.Actions.Add(Me.aCreateActivityContacts)
|
|
Me.Actions.Add(Me.aContacts_ChangeGroup)
|
|
Me.Actions.Add(Me.aCreateEmailSendQueue)
|
|
Me.Actions.Add(Me.aContactEmailToClipboard)
|
|
Me.Actions.Add(Me.aClearClipboard)
|
|
|
|
End Sub
|
|
Friend WithEvents aCreateActivityContacts As DevExpress.ExpressApp.Actions.SimpleAction
|
|
Friend WithEvents aContacts_ChangeGroup As DevExpress.ExpressApp.Actions.PopupWindowShowAction
|
|
Friend WithEvents aCreateEmailSendQueue As DevExpress.ExpressApp.Actions.PopupWindowShowAction
|
|
Friend WithEvents aContactEmailToClipboard As DevExpress.ExpressApp.Actions.SimpleAction
|
|
Friend WithEvents aClearClipboard As DevExpress.ExpressApp.Actions.SimpleAction
|
|
|
|
End Class
|