Active directory: Razlika med redakcijama
(→ADGlobalGroups) |
|||
| Vrstica 21: | Vrstica 21: | ||
Funkcija '''ADGlobalGroupMembers''' vrne spisek vseh uporabnikov v domenski skupini. | Funkcija '''ADGlobalGroupMembers''' vrne spisek vseh uporabnikov v domenski skupini. | ||
{| class="param" | {| class="param" | ||
| − | | '''DomainName''' || Ime domene iz katere želimo spisek članov. | + | | '''DomainName''' || ''String'' || Ime domene iz katere želimo spisek članov. |
|- | |- | ||
| − | | '''GroupName''' ||| Ime skupine iz katere želimo spisek članov. | + | | '''GroupName''' || ''String'' || Ime skupine iz katere želimo spisek članov. |
|- | |- | ||
| − | | '''Result''' || Skreira in vrne stringlisto vseh uporabnikov. To stringlisto je potrebno dealocirati. | + | | '''Result''' || ''TStringList'' || Skreira in vrne stringlisto vseh uporabnikov. To stringlisto je potrebno dealocirati. |
|} | |} | ||
<source> | <source> | ||
| Vrstica 47: | Vrstica 47: | ||
Funkcija '''ADGlobalGroupAddMember''' doda uporabnika v domensko skupino v domeni. | Funkcija '''ADGlobalGroupAddMember''' doda uporabnika v domensko skupino v domeni. | ||
{| class="param" | {| class="param" | ||
| − | | '''DomainName''' || Ime domene v katero želimo dodati uporabnika v skupino. | + | | '''DomainName''' || ''String'' || Ime domene v katero želimo dodati uporabnika v skupino. |
|- | |- | ||
| − | | '''GroupName''' || Ime skupine v katero želimo dodati uporabnika. | + | | '''GroupName''' || ''String'' || Ime skupine v katero želimo dodati uporabnika. |
|- | |- | ||
| − | | '''UserName''' || Ime uporabnika, ki ga želimo dodati v skupino. Ime uporabnika mora biti v obliki ''Ime Domene\Ime uporabnika''. | + | | '''UserName''' || ''String'' || Ime uporabnika, ki ga želimo dodati v skupino. Ime uporabnika mora biti v obliki ''Ime Domene\Ime uporabnika''. |
| + | |- | ||
| + | | '''Result''' || ''Long'' || Vrne 0, če je bila funkcija uspešna, sicer kodo napake. | ||
|} | |} | ||
<source>ADGlobalGroupAddMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')</source> | <source>ADGlobalGroupAddMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')</source> | ||
| Vrstica 59: | Vrstica 61: | ||
Funkcija '''ADGlobalGroupRemoveMember''' odstrani uporabnika iz domenske skupine v domeni. | Funkcija '''ADGlobalGroupRemoveMember''' odstrani uporabnika iz domenske skupine v domeni. | ||
{| class="param" | {| class="param" | ||
| − | | '''DomainName''' || Ime domene v kateri želimo odstraniti uporabnika iz skupine. | + | | '''DomainName''' || ''String'' || Ime domene v kateri želimo odstraniti uporabnika iz skupine. |
| + | |- | ||
| + | | '''GroupName''' || ''String'' || Ime skupine iz katere želimo odstraniti uporabnika. | ||
|- | |- | ||
| − | | ''' | + | | '''UserName''' || ''String'' || Ime uporabnika, ki ga želimo odstraniti iz skupine. Ime uporabnika mora biti v obliki ''Ime Domene\Ime uporabnika''. |
|- | |- | ||
| − | | ''' | + | | '''Result''' || ''Long'' || Vrne 0, če je bila funkcija uspešna, sicer kodo napake. |
|} | |} | ||
<source>ADGlobalGroupRemoveMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')</source> | <source>ADGlobalGroupRemoveMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')</source> | ||
| Vrstica 71: | Vrstica 75: | ||
Funkcija '''ADGlobalUserInfo''' nam vrne ime in priimek domenskega uporabnika, če je ta podatek vnešen. | Funkcija '''ADGlobalUserInfo''' nam vrne ime in priimek domenskega uporabnika, če je ta podatek vnešen. | ||
{| class="param" | {| class="param" | ||
| − | | '''DomainName''' || Ime domene iz katere želimo podatke o uporabniku. | + | | '''DomainName''' || ''String'' || Ime domene iz katere želimo podatke o uporabniku. |
|- | |- | ||
| − | | '''UserName''' || Ime uporabnik za katerega želimo ime in priimek. | + | | '''UserName''' || ''String'' || Ime uporabnik za katerega želimo ime in priimek. |
|- | |- | ||
| − | | '''Result''' || Vrne ime in priimek. | + | | '''Result''' || ''String'' || Vrne ime in priimek. |
|} | |} | ||
<source>Hint (ADGlobalUserInfo ('Ime domene', 'Ime uporabnika')</source> | <source>Hint (ADGlobalUserInfo ('Ime domene', 'Ime uporabnika')</source> | ||
| Vrstica 83: | Vrstica 87: | ||
Funkcija '''ADLocalGroups''' vrne spisek vseh skupin na lokalnem računalniku. | Funkcija '''ADLocalGroups''' vrne spisek vseh skupin na lokalnem računalniku. | ||
{| class="param" | {| class="param" | ||
| − | | '''DomainName''' || Ime računalnika iz katerega želimo spisek lokalnih skupin. Lahko se vnese DNS ime ali pa IP računalnika. | + | | '''DomainName''' || ''String'' || Ime računalnika iz katerega želimo spisek lokalnih skupin. Lahko se vnese DNS ime ali pa IP računalnika. |
|- | |- | ||
| − | | '''Result''' || Skreira in vrne stringlisto vseh skupin. To stringlisto je potrebno dealocirati. | + | | '''Result''' || ''TStringList'' || Skreira in vrne stringlisto vseh skupin. To stringlisto je potrebno dealocirati. |
|} | |} | ||
<source> | <source> | ||
| Vrstica 98: | Vrstica 102: | ||
Funkcija '''ADLocalGroupMembers''' vrne spisek vseh uporabnikov v lokalni skupini na računalniku. | Funkcija '''ADLocalGroupMembers''' vrne spisek vseh uporabnikov v lokalni skupini na računalniku. | ||
{| class="param" | {| class="param" | ||
| − | | '''DomainName''' || Ime računalnika iz katerega želimo spisek uporabnikov. Lahko se vnese DNS ime ali pa IP računalnika. | + | | '''DomainName''' || ''String'' || Ime računalnika iz katerega želimo spisek uporabnikov. Lahko se vnese DNS ime ali pa IP računalnika. |
|- | |- | ||
| − | | '''GroupName''' || Ime skupine iz katere želimo spisek uporabnikov. | + | | '''GroupName''' || ''String'' || Ime skupine iz katere želimo spisek uporabnikov. |
|- | |- | ||
| − | | '''Result''' || Skreira in vrne stringlisto vseh uporabnikov. To stringlisto je potrebno dealocirati. | + | | '''Result''' || ''TStringList'' || Skreira in vrne stringlisto vseh uporabnikov. To stringlisto je potrebno dealocirati. |
|} | |} | ||
<source> | <source> | ||
| Vrstica 124: | Vrstica 128: | ||
Funkcija '''ADLocalGroupAddMember''' doda uporabnika v lokalno skupino na računalniku. | Funkcija '''ADLocalGroupAddMember''' doda uporabnika v lokalno skupino na računalniku. | ||
{| class="param" | {| class="param" | ||
| − | | '''DomainName''' || Ime računalnika na katerem želimo dodati uporabnika v skupino. Lahko se vnese DNS ime ali pa IP računalnika. | + | | '''DomainName''' || ''String'' || Ime računalnika na katerem želimo dodati uporabnika v skupino. Lahko se vnese DNS ime ali pa IP računalnika. |
| + | |- | ||
| + | | '''GroupName''' || ''String'' || Ime skupine v katero želimo dodati uporabnika. | ||
|- | |- | ||
| − | | ''' | + | | '''UserName''' || ''String'' || Ime uporabnika, ki ga želimo dodati v skupino. Če ni lokalni uporabnik, moramo imenu dodati tudi domeno. |
|- | |- | ||
| − | | ''' | + | | '''Result''' || ''Long'' || Vrne 0, če je bila funkcija uspešna, sicer kodo napake. |
|} | |} | ||
<source>ADLocalGroupAddMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')</source> | <source>ADLocalGroupAddMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')</source> | ||
| Vrstica 136: | Vrstica 142: | ||
Funkcija '''ADLocalGroupRemoveMember''' odstrani uporabnika iz lokalne skupine na računalniku. | Funkcija '''ADLocalGroupRemoveMember''' odstrani uporabnika iz lokalne skupine na računalniku. | ||
{| class="param" | {| class="param" | ||
| − | | '''DomainName''' || Ime računalnika na katerem želimo odstraniti uporabnika iz skupine. Lahko se vnese DNS ime ali pa IP računalnika. | + | | '''DomainName''' || ''String'' || Ime računalnika na katerem želimo odstraniti uporabnika iz skupine. Lahko se vnese DNS ime ali pa IP računalnika. |
| + | |- | ||
| + | | '''GroupName''' || ''String'' || Ime skupine iz katere želimo odstraniti uporabnika. | ||
|- | |- | ||
| − | | ''' | + | | '''UserName''' || ''String'' || Ime uporabnika, ki ga želimo odstraniti iz skupine. Če ni lokalni uporabnik, moramo imenu dodati tudi domeno. |
|- | |- | ||
| − | | ''' | + | | '''Result''' || ''Long'' || Vrne 0, če je bila funkcija uspešna, sicer kodo napake. |
|} | |} | ||
<source>ADLocalGroupRemoveMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')</source> | <source>ADLocalGroupRemoveMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')</source> | ||
Redakcija: 10:29, 19. marec 2010
Funkcije se ločijo na dve skupini. Ena skupina je ADLocal*, ki se uporablja za upravljanje lokalnih skupin, ADGlobal* pa se uporabljajo za upravljanje active directory (domenskih) skupin in uporabnikov.
Vsebina
ADGlobalGroups
Function ADGlobalGroups (DomainName As String) As TStringListFunkcija ADGlobalGroups nam vrne seznam vseh uporabniških skupin v dani domeni.
| DomainName | String | Ime domene iz katere želimo spisek skupin. |
| Result | TStringList | Ustvari string-listo vseh uporabniških skupin v dani domeni. To string-listo je potrebno po uporabi dealocirati. |
Dim SL As TStringList
SL = ADGlobalGroups ('ime domene')
// koda
Destroy (SL)ADGlobalGroupMembers
Function ADGlobalGroupMembers (DomainName, GroupName As String) As TStringListFunkcija ADGlobalGroupMembers vrne spisek vseh uporabnikov v domenski skupini.
| DomainName | String | Ime domene iz katere želimo spisek članov. |
| GroupName | String | Ime skupine iz katere želimo spisek članov. |
| Result | TStringList | Skreira in vrne stringlisto vseh uporabnikov. To stringlisto je potrebno dealocirati. |
Sub GetUserGroup (Domain As String)
Dim SL, SL1 As TStringList, I as Long
SL = ADGlobalGroups (Domain)
For I = 0 To SL.Count - 1
SL1 = ADGlobalGroupMembers (Domain, Replace (SL.Strings (I), Domain + '\', ''))
SL1.Replace (Domain + '\', '')
SL1.Sorted = True
SL.Strings (I) = SL.Strings (I) + ' - ' + SL1.CommaText
Destroy (SL1)
Next
sl.Save ('c:\temp\ADgroupsUsers.txt')
Destroy (SL)
EndSubADGlobalGroupAddMember
Function ADGlobalGroupAddMember (DomainName, GroupName, UserName As String) As LongFunkcija ADGlobalGroupAddMember doda uporabnika v domensko skupino v domeni.
| DomainName | String | Ime domene v katero želimo dodati uporabnika v skupino. |
| GroupName | String | Ime skupine v katero želimo dodati uporabnika. |
| UserName | String | Ime uporabnika, ki ga želimo dodati v skupino. Ime uporabnika mora biti v obliki Ime Domene\Ime uporabnika. |
| Result | Long | Vrne 0, če je bila funkcija uspešna, sicer kodo napake. |
ADGlobalGroupAddMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')ADGlobalGroupRemoveMember
Function ADGlobalGroupRemoveMember (DomainName, GroupName, UserName As String) As LongFunkcija ADGlobalGroupRemoveMember odstrani uporabnika iz domenske skupine v domeni.
| DomainName | String | Ime domene v kateri želimo odstraniti uporabnika iz skupine. |
| GroupName | String | Ime skupine iz katere želimo odstraniti uporabnika. |
| UserName | String | Ime uporabnika, ki ga želimo odstraniti iz skupine. Ime uporabnika mora biti v obliki Ime Domene\Ime uporabnika. |
| Result | Long | Vrne 0, če je bila funkcija uspešna, sicer kodo napake. |
ADGlobalGroupRemoveMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')ADGlobalUserInfo
Function ADGlobalUserInfo (DomainName, UserName As String) As StringFunkcija ADGlobalUserInfo nam vrne ime in priimek domenskega uporabnika, če je ta podatek vnešen.
| DomainName | String | Ime domene iz katere želimo podatke o uporabniku. |
| UserName | String | Ime uporabnik za katerega želimo ime in priimek. |
| Result | String | Vrne ime in priimek. |
Hint (ADGlobalUserInfo ('Ime domene', 'Ime uporabnika')ADLocalGroups
Function ADLocalGroups (DomainName As String) As TStringListFunkcija ADLocalGroups vrne spisek vseh skupin na lokalnem računalniku.
| DomainName | String | Ime računalnika iz katerega želimo spisek lokalnih skupin. Lahko se vnese DNS ime ali pa IP računalnika. |
| Result | TStringList | Skreira in vrne stringlisto vseh skupin. To stringlisto je potrebno dealocirati. |
Dim SL As TStringList
SL = ADLocalGroups ('Ime Računalnika')
SL.Save ('C:\temp\ADLocalGroups.txt')
Destroy (SL)ADLocalGroupMembers
Function ADLocalGroupMembers (DomainName, GroupName As String) As TStringListFunkcija ADLocalGroupMembers vrne spisek vseh uporabnikov v lokalni skupini na računalniku.
| DomainName | String | Ime računalnika iz katerega želimo spisek uporabnikov. Lahko se vnese DNS ime ali pa IP računalnika. |
| GroupName | String | Ime skupine iz katere želimo spisek uporabnikov. |
| Result | TStringList | Skreira in vrne stringlisto vseh uporabnikov. To stringlisto je potrebno dealocirati. |
Sub GetLocalUserGroup (Computer As String)
Dim SL, SL1 As TStringList, I as Long
SL = ADLocalGroups (Computer)
For I = 0 To SL.Count - 1
SL1 = ADLocalGroupMembers (Computer, Replace (SL.Strings (I), Computer + '\', ''))
SL1.Replace (Computer + '\', '')
SL1.Sorted = True
SL.Strings (I) = SL.Strings (I) + ' - ' + SL1.CommaText
Destroy (SL1)
Next
SL.Save ('c:\temp\ADgroupsUsers.txt')
Destroy (SL)
EndSubADLocalGroupAddMember
Function ADLocalGroupAddMember (DomainName, GroupName, UserName As String) As LongFunkcija ADLocalGroupAddMember doda uporabnika v lokalno skupino na računalniku.
| DomainName | String | Ime računalnika na katerem želimo dodati uporabnika v skupino. Lahko se vnese DNS ime ali pa IP računalnika. |
| GroupName | String | Ime skupine v katero želimo dodati uporabnika. |
| UserName | String | Ime uporabnika, ki ga želimo dodati v skupino. Če ni lokalni uporabnik, moramo imenu dodati tudi domeno. |
| Result | Long | Vrne 0, če je bila funkcija uspešna, sicer kodo napake. |
ADLocalGroupAddMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')ADLocalGroupRemoveMember
Function ADLocalGroupRemoveMember (DomainName, GroupName, UserName As String) As LongFunkcija ADLocalGroupRemoveMember odstrani uporabnika iz lokalne skupine na računalniku.
| DomainName | String | Ime računalnika na katerem želimo odstraniti uporabnika iz skupine. Lahko se vnese DNS ime ali pa IP računalnika. |
| GroupName | String | Ime skupine iz katere želimo odstraniti uporabnika. |
| UserName | String | Ime uporabnika, ki ga želimo odstraniti iz skupine. Če ni lokalni uporabnik, moramo imenu dodati tudi domeno. |
| Result | Long | Vrne 0, če je bila funkcija uspešna, sicer kodo napake. |
ADLocalGroupRemoveMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')