diff --git a/app/TaskFlow/frmKonfig.vb b/app/TaskFlow/frmKonfig.vb
index 4196678..a9c3e37 100644
--- a/app/TaskFlow/frmKonfig.vb
+++ b/app/TaskFlow/frmKonfig.vb
@@ -170,8 +170,25 @@ Public Class frmKonfig
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.
- System.Diagnostics.Process.Start("http://www.didalog.de/Support")
+ Try
+ Using connection As New SqlClient.SqlConnection(CONNECTION_STRING_ECM)
+ connection.Open()
+
+ Dim oSql As String = "SELECT CAT_STRING FROM TBDD_CATALOG WHERE CAT_TITLE = 'DDSUPPORT_PORTAL'"
+ Dim oCmd As New SqlClient.SqlCommand(oSql, connection)
+ Dim oSupportLinkObj As Object = oCmd.ExecuteScalar
+ Dim oSupportLink As String = If(oSupportLinkObj IsNot Nothing, oSupportLinkObj.ToString, "")
+
+ If Not String.IsNullOrEmpty(oSupportLink) Then
+ Process.Start(oSupportLink)
+ Else
+ MsgBox("Support-Link nicht gefunden.", MsgBoxStyle.Information)
+ End If
+
+ End Using
+ Catch ex As Exception
+ MsgBox("Fehler beim Öffnen des Support-Links: " & ex.Message, MsgBoxStyle.Critical)
+ End Try
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles btnOpenAppDataFolder.Click
diff --git a/app/TaskFlow/frmMain.resx b/app/TaskFlow/frmMain.resx
index ae96ace..bc6638b 100644
--- a/app/TaskFlow/frmMain.resx
+++ b/app/TaskFlow/frmMain.resx
@@ -125,7 +125,7 @@
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAADw
- CAAAAk1TRnQBSQFMAgEBAgEAAVABCwFQAQsBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
+ CAAAAk1TRnQBSQFMAgEBAgEAAVgBCwFYAQsBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
@@ -1492,9 +1492,36 @@
0, 0
+
+ Allgemein
+
+
+ Auswertungen
+
+
+ Verwaltung
+
+
+ Grundeinstellungen
+
+
+ Workflow
+
+
+ Funktionen/App Start
+
+
+ Ad Hoc Workflows
+
Start
+
+ Funktionen
+
+
+ Workflow Tabelle
+
Tabelle
@@ -1552,6 +1579,24 @@
0
+
+ True
+
+
+ Tahoma, 9.75pt, style=Bold
+
+
+ 3, 3
+
+
+ 127, 16
+
+
+ 0
+
+
+ Choose a profile ...
+
lblCaptionMainGrid
@@ -1643,6 +1688,12 @@
863, 17
+
+ 219, 26
+
+
+ Starte Validierung für Profil
+
220, 30
@@ -1823,69 +1874,6 @@
2
-
- Allgemein
-
-
- Auswertungen
-
-
- Verwaltung
-
-
- Grundeinstellungen
-
-
- Workflow
-
-
- Funktionen/App Start
-
-
- Ad Hoc Workflows
-
-
- Funktionen
-
-
- Workflow Tabelle
-
-
- True
-
-
- Tahoma, 9.75pt, style=Bold
-
-
- 3, 3
-
-
- 127, 16
-
-
- 0
-
-
- Choose a profile ...
-
-
- lblCaptionMainGrid
-
-
- System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- Panel2
-
-
- 0
-
-
- 219, 26
-
-
- Starte Validierung für Profil
-
17, 56
@@ -1895,6 +1883,27 @@
250, 56
+
+ 290, 30
+
+
+ Popup Erinnerung deaktivieren
+
+
+ 287, 6
+
+
+ 290, 30
+
+
+ In den Vordergrund
+
+
+ 290, 30
+
+
+ Out of Range - Fenster wiederherstellen
+
291, 100
@@ -1990,27 +1999,6 @@
True
-
- 290, 30
-
-
- Popup Erinnerung deaktivieren
-
-
- 287, 6
-
-
- 290, 30
-
-
- In den Vordergrund
-
-
- 290, 30
-
-
- Out of Range - Fenster wiederherstellen
-
605, 17
@@ -3432,9 +3420,6 @@
&Ansicht
-
- &Hintergrund
-
&Seiten Layout
@@ -3447,6 +3432,9 @@
Bars
+
+ &Hintergrund
+
PDF Dokument
diff --git a/app/TaskFlow/frmMain.vb b/app/TaskFlow/frmMain.vb
index dafd9db..c5e2650 100644
--- a/app/TaskFlow/frmMain.vb
+++ b/app/TaskFlow/frmMain.vb
@@ -2155,6 +2155,8 @@ Public Class frmMain
End Try
End If
RestoreLayout()
+
+
oStopWatch.Done()
Catch ex As Exception
LOGGER.Error(ex)