edv/VERAGAddin
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

testsystem = false

Browse Source
This commit is contained in:
d.breimaier
2023-09-28 09:16:23 +02:00
parent f8cf06a444
commit 106a4e2e35
2 changed files with 8 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
VERAGAddIn/rbnMailItem.Designer.vb generated
View File

@@ -44,7 +44,6 @@
Me.components = New System.ComponentModel.Container() Me.components = New System.ComponentModel.Container()
Me.Tab1 = Me.Factory.CreateRibbonTab Me.Tab1 = Me.Factory.CreateRibbonTab
Me.Group1 = Me.Factory.CreateRibbonGroup Me.Group1 = Me.Factory.CreateRibbonGroup
Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon(Me.components)
Me.Button1 = Me.Factory.CreateRibbonButton Me.Button1 = Me.Factory.CreateRibbonButton
Me.btnAvisoMail2 = Me.Factory.CreateRibbonButton Me.btnAvisoMail2 = Me.Factory.CreateRibbonButton
Me.SplitButton1 = Me.Factory.CreateRibbonSplitButton Me.SplitButton1 = Me.Factory.CreateRibbonSplitButton
@@ -53,6 +52,7 @@
Me.btnGestellungsgarantien = Me.Factory.CreateRibbonButton Me.btnGestellungsgarantien = Me.Factory.CreateRibbonButton
Me.btnInfo = Me.Factory.CreateRibbonButton Me.btnInfo = Me.Factory.CreateRibbonButton
Me.btnUnsichtbar = Me.Factory.CreateRibbonButton Me.btnUnsichtbar = Me.Factory.CreateRibbonButton
Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon(Me.components)
Me.Tab1.SuspendLayout() Me.Tab1.SuspendLayout()
Me.Group1.SuspendLayout() Me.Group1.SuspendLayout()
Me.SuspendLayout() Me.SuspendLayout()
@@ -74,11 +74,6 @@
Me.Group1.Label = "AVISO" Me.Group1.Label = "AVISO"
Me.Group1.Name = "Group1" Me.Group1.Name = "Group1"
' '
'NotifyIcon1
'
Me.NotifyIcon1.Text = "NotifyIcon1"
Me.NotifyIcon1.Visible = True
'
'Button1 'Button1
' '
Me.Button1.ControlSize = Microsoft.Office.Core.RibbonControlSize.RibbonControlSizeLarge Me.Button1.ControlSize = Microsoft.Office.Core.RibbonControlSize.RibbonControlSizeLarge
@@ -134,6 +129,11 @@
Me.btnUnsichtbar.Name = "btnUnsichtbar" Me.btnUnsichtbar.Name = "btnUnsichtbar"
Me.btnUnsichtbar.Visible = False Me.btnUnsichtbar.Visible = False
' '
'NotifyIcon1
'
Me.NotifyIcon1.Text = "NotifyIcon1"
Me.NotifyIcon1.Visible = True
'
'rbnMailItem 'rbnMailItem
' '
Me.Name = "rbnMailItem" Me.Name = "rbnMailItem"

4
VERAGAddIn/rbnMailItem.vb
View File

@@ -13,8 +13,8 @@ Public Class rbnMailItem
Dim currentexplorer As Outlook.Explorer Dim currentexplorer As Outlook.Explorer
Private Sub rbnMailItem_Load(ByVal sender As System.Object, ByVal e As RibbonUIEventArgs) Handles MyBase.Load Private Sub rbnMailItem_Load(ByVal sender As System.Object, ByVal e As RibbonUIEventArgs) Handles MyBase.Load
' VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = True 'VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = True
LOGIN_OK = AVISO_Mail_Functions.initFirmaUser() LOGIN_OK = AVISO_Mail_Functions.initFirmaUser()
currentexplorer = ThisAddIn.SharedExplorer currentexplorer = ThisAddIn.SharedExplorer