Docmost Schnellscheisstaste

This commit is contained in:
ms
2025-10-06 16:39:29 +02:00
parent 754a83e559
commit e1f30cdb68
3 changed files with 45 additions and 30 deletions

View File

@@ -24,9 +24,9 @@ Partial Class Main
Private Sub InitializeComponent() Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container() Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Main)) Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Main))
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Me.Panel2 = New System.Windows.Forms.Panel() Me.Panel2 = New System.Windows.Forms.Panel()
Me.Panel4 = New System.Windows.Forms.Panel() Me.Panel4 = New System.Windows.Forms.Panel()
Me.lblRufbereitschaft = New System.Windows.Forms.Label() Me.lblRufbereitschaft = New System.Windows.Forms.Label()
@@ -140,6 +140,7 @@ Partial Class Main
Me.Timer1 = New System.Windows.Forms.Timer(Me.components) Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
Me.Timer_Temperatur = New System.Windows.Forms.Timer(Me.components) Me.Timer_Temperatur = New System.Windows.Forms.Timer(Me.components)
Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.DocmostToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.Panel2.SuspendLayout() Me.Panel2.SuspendLayout()
Me.Panel4.SuspendLayout() Me.Panel4.SuspendLayout()
CType(Me.picAVISOMessenger, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.picAVISOMessenger, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -538,7 +539,7 @@ Partial Class Main
'MenuStrip1 'MenuStrip1
' '
Me.MenuStrip1.BackColor = System.Drawing.SystemColors.GradientActiveCaption Me.MenuStrip1.BackColor = System.Drawing.SystemColors.GradientActiveCaption
Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem1, Me.ToolStripMenuItem2, Me.ToolStripMenuItemINFO, Me.TicketsystemToolStripMenuItem, Me.SnipeITToolStripMenuItem, Me.PascomToolStripMenuItem, Me.UnifiToolStripMenuItem, Me.VCenterToolStripMenuItem, Me.ProxMoxToolStripMenuItem, Me.PortainerToolStripMenuItem, Me.FirewallToolStripMenuItem}) Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem1, Me.ToolStripMenuItem2, Me.ToolStripMenuItemINFO, Me.TicketsystemToolStripMenuItem, Me.SnipeITToolStripMenuItem, Me.PascomToolStripMenuItem, Me.UnifiToolStripMenuItem, Me.VCenterToolStripMenuItem, Me.ProxMoxToolStripMenuItem, Me.PortainerToolStripMenuItem, Me.FirewallToolStripMenuItem, Me.DocmostToolStripMenuItem})
Me.MenuStrip1.Location = New System.Drawing.Point(0, 0) Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
Me.MenuStrip1.Name = "MenuStrip1" Me.MenuStrip1.Name = "MenuStrip1"
Me.MenuStrip1.Size = New System.Drawing.Size(1510, 24) Me.MenuStrip1.Size = New System.Drawing.Size(1510, 24)
@@ -924,38 +925,38 @@ Partial Class Main
Me.DgVMain.AllowUserToDeleteRows = False Me.DgVMain.AllowUserToDeleteRows = False
Me.DgVMain.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.DgVMain.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
Me.DgVMain.BorderStyle = System.Windows.Forms.BorderStyle.None Me.DgVMain.BorderStyle = System.Windows.Forms.BorderStyle.None
DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle1.BackColor = System.Drawing.SystemColors.Control DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle1.ForeColor = System.Drawing.SystemColors.WindowText DataGridViewCellStyle4.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle1.SelectionBackColor = System.Drawing.SystemColors.Control DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle1.SelectionForeColor = System.Drawing.SystemColors.Control DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.DgVMain.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle1 Me.DgVMain.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle4
Me.DgVMain.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.DgVMain.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.DgVMain.ContextMenuStrip = Me.DGVMainContext Me.DgVMain.ContextMenuStrip = Me.DGVMainContext
DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft DataGridViewCellStyle5.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle2.BackColor = System.Drawing.SystemColors.Window DataGridViewCellStyle5.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) DataGridViewCellStyle5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.ControlText DataGridViewCellStyle5.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight DataGridViewCellStyle5.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText DataGridViewCellStyle5.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.DgVMain.DefaultCellStyle = DataGridViewCellStyle2 Me.DgVMain.DefaultCellStyle = DataGridViewCellStyle5
Me.DgVMain.Dock = System.Windows.Forms.DockStyle.Fill Me.DgVMain.Dock = System.Windows.Forms.DockStyle.Fill
Me.DgVMain.Location = New System.Drawing.Point(200, 130) Me.DgVMain.Location = New System.Drawing.Point(200, 130)
Me.DgVMain.MultiSelect = False Me.DgVMain.MultiSelect = False
Me.DgVMain.Name = "DgVMain" Me.DgVMain.Name = "DgVMain"
Me.DgVMain.ReadOnly = True Me.DgVMain.ReadOnly = True
Me.DgVMain.RowHeadersBorderStyle = System.Windows.Forms.DataGridViewHeaderBorderStyle.[Single] Me.DgVMain.RowHeadersBorderStyle = System.Windows.Forms.DataGridViewHeaderBorderStyle.[Single]
DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft DataGridViewCellStyle6.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Control DataGridViewCellStyle6.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) DataGridViewCellStyle6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.WindowText DataGridViewCellStyle6.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight DataGridViewCellStyle6.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText DataGridViewCellStyle6.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.DgVMain.RowHeadersDefaultCellStyle = DataGridViewCellStyle3 Me.DgVMain.RowHeadersDefaultCellStyle = DataGridViewCellStyle6
Me.DgVMain.RowHeadersVisible = False Me.DgVMain.RowHeadersVisible = False
Me.DgVMain.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.DgVMain.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
Me.DgVMain.Size = New System.Drawing.Size(876, 708) Me.DgVMain.Size = New System.Drawing.Size(876, 708)
@@ -1203,6 +1204,12 @@ Partial Class Main
Me.ContextMenuStrip2.Name = "ContextMenuStrip2" Me.ContextMenuStrip2.Name = "ContextMenuStrip2"
Me.ContextMenuStrip2.Size = New System.Drawing.Size(61, 4) Me.ContextMenuStrip2.Size = New System.Drawing.Size(61, 4)
' '
'DocmostToolStripMenuItem
'
Me.DocmostToolStripMenuItem.Name = "DocmostToolStripMenuItem"
Me.DocmostToolStripMenuItem.Size = New System.Drawing.Size(67, 20)
Me.DocmostToolStripMenuItem.Text = "Docmost"
'
'Main 'Main
' '
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -1357,4 +1364,5 @@ Partial Class Main
Friend WithEvents ContextMenuStrip2 As ContextMenuStrip Friend WithEvents ContextMenuStrip2 As ContextMenuStrip
Friend WithEvents lblRufbereitschaft As Label Friend WithEvents lblRufbereitschaft As Label
Friend WithEvents SnipeITToolStripMenuItem As ToolStripMenuItem Friend WithEvents SnipeITToolStripMenuItem As ToolStripMenuItem
Friend WithEvents DocmostToolStripMenuItem As ToolStripMenuItem
End Class End Class

View File

@@ -117,6 +117,9 @@
<resheader name="writer"> <resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader> </resheader>
<metadata name="MenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>33, 15</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" /> <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="PictureBox1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="PictureBox1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
@@ -277,8 +280,8 @@
<metadata name="ContextMenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="ContextMenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1156, 17</value> <value>1156, 17</value>
</metadata> </metadata>
<metadata name="MenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="ChkDHCPClients.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>33, 15</value> <value>True</value>
</metadata> </metadata>
<metadata name="ChkDHCPClients.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089"> <metadata name="ChkDHCPClients.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value> <value>True</value>

View File

@@ -1905,6 +1905,10 @@ exit"
cExtProgramme.startlink("https://snipeit.verag.ag/") cExtProgramme.startlink("https://snipeit.verag.ag/")
End Sub End Sub
Private Sub DocmostToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DocmostToolStripMenuItem.Click
cExtProgramme.startlink("https://docmost.it.verag.ag")
End Sub
Private Sub Main_Closed(sender As Object, e As EventArgs) Handles Me.Closed Private Sub Main_Closed(sender As Object, e As EventArgs) Handles Me.Closed
Class1.ini.prop_Kompansicht = ChkKompAnsicht.Checked Class1.ini.prop_Kompansicht = ChkKompAnsicht.Checked