26-02-10, 20:43
|
 | Διαχειριστής Όνομα: Τάσος Φιλοξενιδης Έκδοση λογισμικού Office: Ms-Office 365 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική, Γερμανική | | Εγγραφή: 21-10-2009
Μηνύματα: 2.011
| |
Δημήτρη Καλησπέρα!
Γράφε με πεζά για να μπορούμε να σε διαβάζουμε πιο άνετα. 
Η Public UserHasAdminRights As Boolean βρίσκεται στο Module BasCustFunctions
και παίρνει τιμή όταν πατηθεί το κουμπί OK της φόρμας frmLogin
Κατά την εκκίνηση της κεντρικής σου φόρμας τρέχει αυτό:
Κώδικας: Private Sub Form_Load()
Me.cmdOpenUsers.Enabled = UserHasAdminRights
End Sub
όπου cmdOpenUsers = το κουμπί που ανοίγει τη φόρμα με τους χρήστες.
Φιλικά
Τάσος
__________________
Ms-Office Development Team
Ανάπτυξη επαγγελματικών εφαρμογών |