Support Link wird aus der DB geholt und ist nicht mehr hardcoded - frmConfigBasic

This commit is contained in:
OlgunR 2025-05-15 11:35:09 +02:00
parent 95b4fd6bd3
commit 1b24e778ae
3 changed files with 59 additions and 48 deletions

View File

@ -39,10 +39,10 @@ Partial Class frmConfig_Basic
Me.txtPasswort = New System.Windows.Forms.TextBox()
Me.BtnConnect = New System.Windows.Forms.Button()
Me.TabPage2 = New System.Windows.Forms.TabPage()
Me.LinkLabel_SupportPortal = New System.Windows.Forms.LinkLabel()
Me.Label10 = New System.Windows.Forms.Label()
Me.Button5 = New System.Windows.Forms.Button()
Me.cmbDesign = New System.Windows.Forms.ComboBox()
Me.LinkLabel1 = New System.Windows.Forms.LinkLabel()
Me.Button3 = New System.Windows.Forms.Button()
Me.cmbLanguage = New System.Windows.Forms.ComboBox()
Me.Label9 = New System.Windows.Forms.Label()
@ -172,10 +172,10 @@ Partial Class frmConfig_Basic
'
'TabPage2
'
Me.TabPage2.Controls.Add(Me.LinkLabel_SupportPortal)
Me.TabPage2.Controls.Add(Me.Label10)
Me.TabPage2.Controls.Add(Me.Button5)
Me.TabPage2.Controls.Add(Me.cmbDesign)
Me.TabPage2.Controls.Add(Me.LinkLabel1)
Me.TabPage2.Controls.Add(Me.Button3)
Me.TabPage2.Controls.Add(Me.cmbLanguage)
Me.TabPage2.Controls.Add(Me.Label9)
@ -188,6 +188,12 @@ Partial Class frmConfig_Basic
Me.TabPage2.Name = "TabPage2"
Me.TabPage2.UseVisualStyleBackColor = True
'
'LinkLabel_SupportPortal
'
resources.ApplyResources(Me.LinkLabel_SupportPortal, "LinkLabel_SupportPortal")
Me.LinkLabel_SupportPortal.Name = "LinkLabel_SupportPortal"
Me.LinkLabel_SupportPortal.TabStop = True
'
'Label10
'
resources.ApplyResources(Me.Label10, "Label10")
@ -206,12 +212,6 @@ Partial Class frmConfig_Basic
Me.cmbDesign.Items.AddRange(New Object() {resources.GetString("cmbDesign.Items"), resources.GetString("cmbDesign.Items1"), resources.GetString("cmbDesign.Items2"), resources.GetString("cmbDesign.Items3"), resources.GetString("cmbDesign.Items4"), resources.GetString("cmbDesign.Items5"), resources.GetString("cmbDesign.Items6")})
Me.cmbDesign.Name = "cmbDesign"
'
'LinkLabel1
'
resources.ApplyResources(Me.LinkLabel1, "LinkLabel1")
Me.LinkLabel1.Name = "LinkLabel1"
Me.LinkLabel1.TabStop = True
'
'Button3
'
resources.ApplyResources(Me.Button3, "Button3")
@ -424,8 +424,8 @@ Partial Class frmConfig_Basic
Friend WithEvents cmbLanguage As System.Windows.Forms.ComboBox
Friend WithEvents Label9 As System.Windows.Forms.Label
Friend WithEvents Button3 As System.Windows.Forms.Button
Friend WithEvents LinkLabel1 As System.Windows.Forms.LinkLabel
Friend WithEvents Label10 As Label
Friend WithEvents Button5 As Button
Friend WithEvents cmbDesign As ComboBox
Friend WithEvents LinkLabel_SupportPortal As LinkLabel
End Class

View File

@ -427,7 +427,7 @@
<value>3, 3, 3, 3</value>
</data>
<data name="TabPage1.Size" type="System.Drawing.Size, System.Drawing">
<value>582, 280</value>
<value>526, 275</value>
</data>
<data name="TabPage1.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
@ -447,6 +447,33 @@
<data name="&gt;&gt;TabPage1.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="LinkLabel_SupportPortal.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
</data>
<data name="LinkLabel_SupportPortal.Location" type="System.Drawing.Point, System.Drawing">
<value>8, 235</value>
</data>
<data name="LinkLabel_SupportPortal.Size" type="System.Drawing.Size, System.Drawing">
<value>153, 13</value>
</data>
<data name="LinkLabel_SupportPortal.TabIndex" type="System.Int32, mscorlib">
<value>49</value>
</data>
<data name="LinkLabel_SupportPortal.Text" xml:space="preserve">
<value>Support Portal - Digital Data</value>
</data>
<data name="&gt;&gt;LinkLabel_SupportPortal.Name" xml:space="preserve">
<value>LinkLabel_SupportPortal</value>
</data>
<data name="&gt;&gt;LinkLabel_SupportPortal.Type" xml:space="preserve">
<value>System.Windows.Forms.LinkLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;LinkLabel_SupportPortal.Parent" xml:space="preserve">
<value>TabPage2</value>
</data>
<data name="&gt;&gt;LinkLabel_SupportPortal.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="Label10.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
</data>
@ -475,7 +502,7 @@
<value>TabPage2</value>
</data>
<data name="&gt;&gt;Label10.ZOrder" xml:space="preserve">
<value>0</value>
<value>1</value>
</data>
<data name="Button5.Font" type="System.Drawing.Font, System.Drawing">
<value>Segoe UI, 8.25pt</value>
@ -505,7 +532,7 @@
<value>TabPage2</value>
</data>
<data name="&gt;&gt;Button5.ZOrder" xml:space="preserve">
<value>1</value>
<value>2</value>
</data>
<data name="cmbDesign.Font" type="System.Drawing.Font, System.Drawing">
<value>Segoe UI, 8.25pt</value>
@ -550,33 +577,6 @@
<value>TabPage2</value>
</data>
<data name="&gt;&gt;cmbDesign.ZOrder" xml:space="preserve">
<value>2</value>
</data>
<data name="LinkLabel1.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
</data>
<data name="LinkLabel1.Location" type="System.Drawing.Point, System.Drawing">
<value>8, 226</value>
</data>
<data name="LinkLabel1.Size" type="System.Drawing.Size, System.Drawing">
<value>153, 13</value>
</data>
<data name="LinkLabel1.TabIndex" type="System.Int32, mscorlib">
<value>45</value>
</data>
<data name="LinkLabel1.Text" xml:space="preserve">
<value>Support Portal - Digital Data</value>
</data>
<data name="&gt;&gt;LinkLabel1.Name" xml:space="preserve">
<value>LinkLabel1</value>
</data>
<data name="&gt;&gt;LinkLabel1.Type" xml:space="preserve">
<value>System.Windows.Forms.LinkLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;LinkLabel1.Parent" xml:space="preserve">
<value>TabPage2</value>
</data>
<data name="&gt;&gt;LinkLabel1.ZOrder" xml:space="preserve">
<value>3</value>
</data>
<data name="Button3.Location" type="System.Drawing.Point, System.Drawing">
@ -809,7 +809,7 @@
<value>3, 3, 3, 3</value>
</data>
<data name="TabPage2.Size" type="System.Drawing.Size, System.Drawing">
<value>526, 244</value>
<value>526, 275</value>
</data>
<data name="TabPage2.TabIndex" type="System.Int32, mscorlib">
<value>1</value>
@ -1176,7 +1176,7 @@ ausgenommen werden sollen:</value>
<value>3, 3, 3, 3</value>
</data>
<data name="TabPage3.Size" type="System.Drawing.Size, System.Drawing">
<value>582, 280</value>
<value>526, 275</value>
</data>
<data name="TabPage3.TabIndex" type="System.Int32, mscorlib">
<value>2</value>
@ -1203,7 +1203,7 @@ ausgenommen werden sollen:</value>
<value>0, 0</value>
</data>
<data name="TabControl1.Size" type="System.Drawing.Size, System.Drawing">
<value>534, 270</value>
<value>534, 301</value>
</data>
<data name="TabControl1.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
@ -1230,7 +1230,7 @@ ausgenommen werden sollen:</value>
<value>6, 13</value>
</data>
<data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
<value>534, 270</value>
<value>534, 301</value>
</data>
<data name="$this.Font" type="System.Drawing.Font, System.Drawing">
<value>Segoe UI, 8.25pt</value>

View File

@ -518,11 +518,22 @@ Public Class frmConfig_Basic
End If
End Sub
Private Sub LinkLabel1_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
' Specify that the link was visited.
Me.LinkLabel1.LinkVisited = True
' Navigate to a URL.
Process.Start("https://www.digitaldata.works/Support")
Private Sub LinkLabel_SupportPortal_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel_SupportPortal.LinkClicked
Try
Me.LinkLabel_SupportPortal.LinkVisited = True
Dim oSql As String = "SELECT CAT_STRING FROM TBDD_CATALOG WHERE CAT_TITLE = 'DDSUPPORT_PORTAL'"
Dim oSupportLink As String = DATABASE_ECM.GetScalarValue(oSql)?.ToString()
If Not String.IsNullOrEmpty(oSupportLink) Then
Process.Start(oSupportLink)
Else
MsgBox("Support-Link nicht gefunden.", MsgBoxStyle.Information)
End If
Catch ex As Exception
MsgBox("Fehler beim Öffnen des Support-Links: " & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Private Sub Label10_Click(sender As Object, e As EventArgs) Handles Label10.Click