Update VeragProgAllgemein; Feature: RDP direkt starten;

Dokumentation/uscntr_ConnectTel.vb

@@ -0,0 +1,16 @@
+Public Class uscntr_ConnectTel
+
+
+    Private Sub FlatButton1_Click(sender As Object, e As EventArgs) Handles FlatButton1.Click
+        If TextBox1.TextLength > 0 And TextBox2.TextLength > 0 Then
+
+            Dim pascom As New cPascom
+            pascom.Username = TextBox1.Text
+            pascom.Arbeitsplatz = TextBox2.Text
+            pascom.Anmelden()
+
+        Else
+        End If
+
+    End Sub
+End Class