diff --git a/Aviso/My Project/AssemblyInfo.vb b/Aviso/My Project/AssemblyInfo.vb index 3f5c3aa..3473c26 100644 --- a/Aviso/My Project/AssemblyInfo.vb +++ b/Aviso/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + + diff --git a/Aviso/frmHauptfenster.Designer.vb b/Aviso/frmHauptfenster.Designer.vb index 0183d04..4642acc 100644 --- a/Aviso/frmHauptfenster.Designer.vb +++ b/Aviso/frmHauptfenster.Designer.vb @@ -255,7 +255,6 @@ Partial Class frmHauptfenster Me.Button11 = New System.Windows.Forms.Button() Me.btnMAVerzeichnis = New System.Windows.Forms.Button() Me.btnMitarbeiterKonto = New VERAG_PROG_ALLGEMEIN.FlatButton() - Me.Label9 = New System.Windows.Forms.Label() Me.btnKontakt = New System.Windows.Forms.Button() Me.Button2 = New System.Windows.Forms.Button() Me.Button5 = New System.Windows.Forms.Button() @@ -269,6 +268,7 @@ Partial Class frmHauptfenster Me.btnKunden = New System.Windows.Forms.Button() Me.btnSpedBuch = New System.Windows.Forms.Button() Me.UsrCntlTestsystem1 = New VERAG_PROG_ALLGEMEIN.usrCntlTestsystem() + Me.Label9 = New System.Windows.Forms.Label() Me.lblDauer = New System.Windows.Forms.Label() Me.btnDrucken = New System.Windows.Forms.Button() Me.Button6 = New System.Windows.Forms.Button() @@ -420,6 +420,7 @@ Partial Class frmHauptfenster Me.UsrCntlBenachrichtigungen2 = New AVISO.usrCntlBenachrichtigungen() Me.Panel5 = New System.Windows.Forms.Panel() Me.Panel7 = New System.Windows.Forms.Panel() + Me.ServicesToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.conMenuAviso.SuspendLayout() Me.MenuStrip1.SuspendLayout() Me.pnlDetailsRechts.SuspendLayout() @@ -468,7 +469,7 @@ Partial Class frmHauptfenster 'mnuInfo ' Me.mnuInfo.Name = "mnuInfo" - Me.mnuInfo.Size = New System.Drawing.Size(214, 22) + Me.mnuInfo.Size = New System.Drawing.Size(222, 30) Me.mnuInfo.Text = "Info" ' 'conÜbernehmen @@ -1497,7 +1498,7 @@ Partial Class frmHauptfenster ' 'mnuFragezeichen ' - Me.mnuFragezeichen.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.mnuInfo, Me.VerfahrenshandbücherToolStripMenuItem, Me.ChecklistenToolStripMenuItem, Me.HandbuchToolStripMenuItem, Me.VERAGWIKIToolStripMenuItem}) + Me.mnuFragezeichen.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.mnuInfo, Me.VerfahrenshandbücherToolStripMenuItem, Me.ChecklistenToolStripMenuItem, Me.HandbuchToolStripMenuItem, Me.VERAGWIKIToolStripMenuItem, Me.ServicesToolStripMenuItem}) Me.mnuFragezeichen.ForeColor = System.Drawing.Color.Black Me.mnuFragezeichen.ImageTransparentColor = System.Drawing.Color.Brown Me.mnuFragezeichen.Name = "mnuFragezeichen" @@ -1508,7 +1509,7 @@ Partial Class frmHauptfenster ' Me.VerfahrenshandbücherToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.VerfahrenshandbuchVERAGGmbHZollWOToolStripMenuItem}) Me.VerfahrenshandbücherToolStripMenuItem.Name = "VerfahrenshandbücherToolStripMenuItem" - Me.VerfahrenshandbücherToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.VerfahrenshandbücherToolStripMenuItem.Size = New System.Drawing.Size(222, 30) Me.VerfahrenshandbücherToolStripMenuItem.Text = "Verfahrenshandbücher" ' 'VerfahrenshandbuchVERAGGmbHZollWOToolStripMenuItem @@ -1521,7 +1522,7 @@ Partial Class frmHauptfenster ' Me.ChecklistenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ChecklisteWOCHECKLISTEZEallgemein, Me.ZEVerfahrensanleitungGestellungSumAToolStripMenuItem, Me.ZEVerfahrensanleitungGestellungSumAFremdpersonalToolStripMenuItem, Me.ToolStripSeparator22, Me.WOCHECKLISTEZVAllgemeinToolStripMenuItem, Me.ZEVerfahrensanleitungGestellungSumAToolStripMenuItem1, Me.ToolStripSeparator21, Me.WOCECKLISTEAbgangVerwahrungsortZVToolStripMenuItem, Me.WOCECKLISTEZEWDHToolStripMenuItem}) Me.ChecklistenToolStripMenuItem.Name = "ChecklistenToolStripMenuItem" - Me.ChecklistenToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.ChecklistenToolStripMenuItem.Size = New System.Drawing.Size(222, 30) Me.ChecklistenToolStripMenuItem.Text = "DE-Warenorte/Checklisten" ' 'ChecklisteWOCHECKLISTEZEallgemein @@ -1579,7 +1580,7 @@ Partial Class frmHauptfenster 'HandbuchToolStripMenuItem ' Me.HandbuchToolStripMenuItem.Name = "HandbuchToolStripMenuItem" - Me.HandbuchToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.HandbuchToolStripMenuItem.Size = New System.Drawing.Size(222, 30) Me.HandbuchToolStripMenuItem.Text = "Handbuch" ' 'VERAGWIKIToolStripMenuItem @@ -1587,7 +1588,7 @@ Partial Class frmHauptfenster Me.VERAGWIKIToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.WikiToolStripMenuItem, Me.MitarbeiterverzeichnisToolStripMenuItem}) Me.VERAGWIKIToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.wiki Me.VERAGWIKIToolStripMenuItem.Name = "VERAGWIKIToolStripMenuItem" - Me.VERAGWIKIToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.VERAGWIKIToolStripMenuItem.Size = New System.Drawing.Size(222, 30) Me.VERAGWIKIToolStripMenuItem.Text = "VERAG-WIKI" ' 'WikiToolStripMenuItem @@ -1979,22 +1980,6 @@ Partial Class frmHauptfenster Me.btnMitarbeiterKonto.TextAlign = System.Drawing.ContentAlignment.BottomCenter Me.btnMitarbeiterKonto.UseVisualStyleBackColor = False ' - 'Label9 - ' - Me.Label9.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ - Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.Label9.AutoSize = True - Me.Label9.BackColor = System.Drawing.Color.White - Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold) - Me.Label9.ForeColor = System.Drawing.Color.Red - Me.Label9.Location = New System.Drawing.Point(694, 2) - Me.Label9.Name = "Label9" - Me.Label9.Size = New System.Drawing.Size(438, 15) - Me.Label9.TabIndex = 9 - Me.Label9.Text = "Es ist ein Programm-Update verfügbar, bitte das AVISO neu starten." - Me.Label9.TextAlign = System.Drawing.ContentAlignment.MiddleRight - Me.Label9.Visible = False - ' 'btnKontakt ' Me.btnKontakt.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) @@ -2192,6 +2177,22 @@ Partial Class frmHauptfenster Me.UsrCntlTestsystem1.Size = New System.Drawing.Size(152, 28) Me.UsrCntlTestsystem1.TabIndex = 8 ' + 'Label9 + ' + Me.Label9.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.Label9.AutoSize = True + Me.Label9.BackColor = System.Drawing.Color.White + Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold) + Me.Label9.ForeColor = System.Drawing.Color.Red + Me.Label9.Location = New System.Drawing.Point(694, 2) + Me.Label9.Name = "Label9" + Me.Label9.Size = New System.Drawing.Size(438, 15) + Me.Label9.TabIndex = 9 + Me.Label9.Text = "Es ist ein Programm-Update verfügbar, bitte das AVISO neu starten." + Me.Label9.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.Label9.Visible = False + ' 'lblDauer ' Me.lblDauer.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) @@ -4026,6 +4027,12 @@ Partial Class frmHauptfenster Me.Panel7.Size = New System.Drawing.Size(252, 51) Me.Panel7.TabIndex = 4 ' + 'ServicesToolStripMenuItem + ' + Me.ServicesToolStripMenuItem.Name = "ServicesToolStripMenuItem" + Me.ServicesToolStripMenuItem.Size = New System.Drawing.Size(222, 30) + Me.ServicesToolStripMenuItem.Text = "Services" + ' 'frmHauptfenster ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) @@ -4486,4 +4493,5 @@ Partial Class frmHauptfenster Friend WithEvents UNBescheinigungAusTFEinlesenToolStripMenuItem As ToolStripMenuItem Friend WithEvents Button9 As Button Friend WithEvents FIXSQLTIGGERSQLGUIDE01ToolStripMenuItem As ToolStripMenuItem + Friend WithEvents ServicesToolStripMenuItem As ToolStripMenuItem End Class diff --git a/Aviso/frmHauptfenster.vb b/Aviso/frmHauptfenster.vb index 06a5aef..1d48063 100644 --- a/Aviso/frmHauptfenster.vb +++ b/Aviso/frmHauptfenster.vb @@ -5277,11 +5277,12 @@ ELSE_ATILLA: detailForm.Show() End Sub - Private Sub WikiToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles WikiToolStripMenuItem.Click, MitarbeiterverzeichnisToolStripMenuItem.Click + Private Sub WikiToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles WikiToolStripMenuItem.Click, MitarbeiterverzeichnisToolStripMenuItem.Click, ServicesToolStripMenuItem.Click Select Case sender.Name Case "WikiToolStripMenuItem" : Process.Start("https://wiki.verag.ag/") Case "MitarbeiterverzeichnisToolStripMenuItem" : Process.Start("https://wiki.verag.ag/de/mitarbeiter/verzeichnis") + Case "ServicesToolStripMenuItem" : Process.Start("https://wiki.verag.ag/de/software/aviso/externeDienste") End Select