Anydesk eingebaut
This commit is contained in:
@@ -248,4 +248,11 @@
|
||||
Private Sub TeamVIDKopierenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles TeamVIDKopierenToolStripMenuItem.Click
|
||||
Clipboard.SetText(Class1.DBNull2emptyString(dgvTSSitzungen.CurrentRow.Cells("TeamviewerID").Value))
|
||||
End Sub
|
||||
|
||||
Private Sub VerbindenMitAnydeskToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles VerbindenMitAnydeskToolStripMenuItem.Click
|
||||
Dim Name As String = Class1.DBNull2emptyString(dgvTSSitzungen.CurrentRow.Cells("BenutzerAnmeldeName").Value)
|
||||
Name = Name.Substring(Name.LastIndexOf("\") + 1)
|
||||
Dim sitzung As String = Class1.DBNull2emptyString(dgvTSSitzungen.CurrentRow.Cells("TSServer").Value) & "\" & Name
|
||||
cExtProgramme.RunAnyDeskWithPassword(sitzung)
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
Reference in New Issue
Block a user