Chilkat, Telefone, Zoll Notruf

Dokumentation/uscntr_TSSitzungen.vb

@@ -200,7 +200,14 @@
 
     Private Sub ProfildatenÖffnenExplorerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ProfildatenÖffnenExplorerToolStripMenuItem.Click
         Dim Username As String = dgvTSSitzungen.CurrentRow.Cells("BenutzerAnmeldeName").Value
-        Dim Server As String = dgvTSSitzungen.CurrentRow.Cells("TSServer").Value & "." & dgvTSSitzungen.CurrentRow.Cells("Domain").Value
+        Dim Server As String
+        Select Case Client
+            Case False
+                Server = dgvTSSitzungen.CurrentRow.Cells("TSServer").Value & "." & dgvTSSitzungen.CurrentRow.Cells("Domain").Value
+            Case True
+                Server = dgvTSSitzungen.CurrentRow.Cells("ClientName").Value & "." & dgvTSSitzungen.CurrentRow.Cells("Domain").Value
+        End Select
+
         Dim temp As String = Username
         Do Until temp.Substring(0, 1) = "\"
             temp = temp.Substring(1, temp.Length - 1)
@@ -237,4 +244,6 @@
         Timer1.Enabled = True
         timDisUpdateTimer.Enabled = False
     End Sub
+
+
 End Class