Legfrissebb anyagok
LOGOUT témák
- Gurulunk, WAZE?!
- gban: Ingyen kellene, de tegnapra
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- sziku69: Szólánc.
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Magga: PLEX: multimédia az egész lakásban
- mefistofeles: A 15 centi nagyon rövid.........
- Geri Bátyó: Agglegénykonyha 1 – rizseshús másképp
- gerner1
PROHARDVER! témák
Mobilarena témák
IT café témák
Új hozzászólás Aktív témák
-
Ezzel le tudod kérdezni a memberhip-et:
Function IsMember(userDomain As String, userName As String, groupDomain As String, groupName As String) As Boolean
Dim grp As Object
Dim grpPath As String, userPath As String
grpPath = "WinNT://" & groupDomain & "/" & groupName
Set grp = GetObject(grpPath & ",group")
userPath = "WinNT://" & userDomain & "/" & userName
IsMember = grp.IsMember(userPath)
End FunctionÍgy hívd meg (angol windows-on - magyaron ugye más az Admin Group neve):
IsMember(Environ("userdomain"), Environ("username"), ".", "Administrators")
Új hozzászólás Aktív témák
Aktív témák
Új fizetett hirdetések
- Gigabyte GA-P35-DS4 LGA 775 alaplap, + Quad Core Xeon E5420 proci
- HP VICTUS 15-FA0054NS i5-12450H / 16GB ram / 512GB / RTX 3050
- Samsung Galaxy S24 Ultra 512 GB 2027.január 22-ig garis
- Dell,14"FullHd IPS,core i5 6440H(fiz.4MAG!),8-16GB DDR4 RAM,Vil.bill,256-512GB SSD,Jó akku,szép
- HP 15.6 ",AMD A10,jó állapotú,magyar billentyűzet
Üzleti előfizetők hirdetései
- GYÖNYÖRŰ iPhone 13 mini 256GB Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS3180
- ÁRGARANCIA!Épített KomPhone Ryzen 5 7500F 32/64GB RAM RX 7800 XT 16GB GAMER PC termékbeszámítással
- BESZÁMÍTÁS! HTC VIVE Pro 2 virtuális valóság szemüveg garanciával hibátlan működéssel
- Tenda RX2 Pro Wifi6 Router
- LG 27MR400 - 27" IPS LED - 1920x1080 FHD - 100hz 5ms - AMD FreeSync - Villódzásmentes
Állásajánlatok
Cég: FOTC
Város: Budapest