| Rubrik: System/Windows · Computer/Benutzer/Ländereinstellungen | VB-Versionen: VB4, VB5, VB6 | 17.04.03 |
 Ist der angemeldete User ein Administrator?Mit nur einer einzigen Deklaration können Sie unter NT/2000/XP überprüfen, ob der angemeldete User ein Administrator ist. | ||
Autor:  Michael Schäffner | Bewertung:   | Views: 16.193 |
| ohne Homepage | System: WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11 |  Beispielprojekt auf CD |
Mit nur einer einzigen Deklaration können Sie unter NT/2000/XP überprüfen, ob der angemeldete User ein Administrator ist.
' benötigte API-Deklaration Private Declare Function IsNTAdmin Lib "advpack.dll" ( _ ByVal dwReserved As Long, _ ByRef lpdwReserved As Long) As Long
' Ist der Benutzer als Admin angemeldet? Public Function IsAdmin() As Boolean IsAdmin = CBool(IsNTAdmin(ByVal 0&, ByVal 0&)) End Function
