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 Dieser Tipp wurde bereits 6.406 mal aufgerufen.
Anzeige
Diesen und auch alle anderen Tipps & Tricks finden Sie auch auf unserer aktuellen vb@rchiv (einschl. Beispielprojekt!) Ein absolutes Muss - Mehr als 650 MByte geballtes Wissen! - nahezu alle Tipps & Tricks und Workshops mit Beispielprojekten - Symbol-Galerie mit mehr als 3.200 Icons im modernen Look Weitere Infos - Online-Update-Funktion u.v.m. |
Neu! sevISDN 1.0 ![]() Überwachung aller eingehender Anrufe! Die DLL erkennt alle über die CAPI-Schnittstelle eingehenden Anrufe und teilt Ihnen sogar mit, aus welchem Ortsbereich der Anruf stammt. Weitere Highlights: Online-Rufident, Erkennung der Anrufbehandlung u.v.m. Buchempfehlung Tipp des Monats Dieter Otter Doppelte Werte bei Ausgabe eines Arrays unterdrücken Hier stellen wir 3 Möglichkeiten vor, wie man doppelte Werte bei der Ausgabe eines Arrays unterdrücken kann. sevGraph (VB/VBA) ![]() Grafische Auswertungen Präsentieren Sie Ihre Daten mit wenig Aufwand in grafischer Form. sevGraph unterstützt hierbei Balken-, Linien- und Stapel-Diagramme (Stacked Bars), sowie 2D- und 3D-Tortendiagramme und arbeitet vollständig datenbankunabhängig! |
||||||||||||||||
|
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein. |
|||||||||||||||||


Ist der angemeldete User ein Administrator?



