REST-API Timas

UID/Mitarbeiter/usrCntlMitarbeiter.vb

@@ -388,9 +388,11 @@ Public Class usrCntlMitarbeiter
             If dgvVERAG.SelectedRows.Count <> 1 Then Exit Sub
             If sender.Name = "UserKopierenToolStripMenuItem" Then
                 copyUser(dgvVERAG.CurrentRow.Cells(0).Value)
-            Else
+            ElseIf sender.Name = "BerechtigungenSetzenToolStripMenuItem" Then
                 Dim frm As New frmBenutzerBerGruppenKopieren(dgvVERAG.CurrentRow.Cells(0).Value)
                 frm.Show(Me)
+            Else
+
             End If
 
 
@@ -622,6 +624,8 @@ Public Class usrCntlMitarbeiter
 
     End Sub
 
+
+
     Private Function uploadPictureToWiki(authenticationToken As String, folderIDx As Integer, image As String) As String
         Try
 
@@ -693,4 +697,7 @@ Public Class usrCntlMitarbeiter
     End Function
 
 
+
+
+
 End Class