Active directory: Razlika med redakcijama
m |
|||
| Vrstica 1: | Vrstica 1: | ||
{{Work}} | {{Work}} | ||
| − | Funkcije | + | 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. |
| + | |||
==ADGlobalGroups== | ==ADGlobalGroups== | ||
| Vrstica 15: | Vrstica 16: | ||
Destroy (SL) | Destroy (SL) | ||
</source> | </source> | ||
| + | |||
==ADGlobalGroupMembers== | ==ADGlobalGroupMembers== | ||
| Vrstica 44: | Vrstica 46: | ||
EndSub | EndSub | ||
</source> | </source> | ||
| + | |||
==ADGlobalGroupAddMember== | ==ADGlobalGroupAddMember== | ||
<source>Function ADGlobalGroupAddMember (Server, GroupName, User As String) As Long</source> | <source>Function ADGlobalGroupAddMember (Server, GroupName, User As String) As Long</source> | ||
| − | Funkcija '''ADGlobalGroupAddMember''' | + | Funkcija '''ADGlobalGroupAddMember''' doda uporabnika v domensko skupino v domeni. |
| + | {| | ||
| + | ! Server | ||
| + | | Ime domene v katero želimo dodati uporabnika v skupino. | ||
| + | |- | ||
| + | ! GroupName | ||
| + | | Ime skupine v katero želimo dodati uporabnika. | ||
| + | |- | ||
| + | ! User | ||
| + | | Ime uporabnika, ki ga želimo dodati v skupino. Ime uporabnika mora biti v obliki ''Ime Domene\Ime uporabnika''. | ||
| + | |} | ||
| + | <source>ADGlobalGroupAddMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')</source> | ||
| + | |||
==ADGlobalGroupRemoveMember== | ==ADGlobalGroupRemoveMember== | ||
<source>Function ADGlobalGroupRemoveMember (Server, GroupName, User As String) As Long</source> | <source>Function ADGlobalGroupRemoveMember (Server, GroupName, User As String) As Long</source> | ||
| − | Funkcija '''ADGlobalGroupRemoveMember''' | + | Funkcija '''ADGlobalGroupRemoveMember''' odstrani uporabnika iz domenske skupine v domeni. |
| + | {| | ||
| + | ! Server | ||
| + | | Ime domene v kateri želimo odstraniti uporabnika iz skupine. | ||
| + | |- | ||
| + | ! GroupName | ||
| + | | Ime skupine iz katere želimo odstraniti uporabnika. | ||
| + | |- | ||
| + | ! User | ||
| + | | Ime uporabnika, ki ga želimo odstraniti iz skupine. Ime uporabnika mora biti v obliki ''Ime Domene\Ime uporabnika''. | ||
| + | |} | ||
| + | <source>ADGlobalGroupRemoveMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')</source> | ||
| + | |||
==ADGlobalUserInfo== | ==ADGlobalUserInfo== | ||
| Vrstica 67: | Vrstica 94: | ||
|} | |} | ||
<source>Hint (ADGlobalUserInfo ('Ime domene', 'Ime uporabnika')</source> | <source>Hint (ADGlobalUserInfo ('Ime domene', 'Ime uporabnika')</source> | ||
| + | |||
==ADLocalGroups== | ==ADLocalGroups== | ||
| Vrstica 84: | Vrstica 112: | ||
Destroy (SL) | Destroy (SL) | ||
</source> | </source> | ||
| + | |||
==ADLocalGroupMembers== | ==ADLocalGroupMembers== | ||
| Vrstica 109: | Vrstica 138: | ||
Destroy (SL1) | Destroy (SL1) | ||
Next | Next | ||
| − | + | SL.Save ('c:\temp\ADgroupsUsers.txt') | |
Destroy (SL) | Destroy (SL) | ||
EndSub | EndSub | ||
</source> | </source> | ||
| + | |||
==ADLocalGroupAddMember== | ==ADLocalGroupAddMember== | ||
<source>Function ADLocalGroupAddMember (Server, GroupName, User As String) As Long</source> | <source>Function ADLocalGroupAddMember (Server, GroupName, User As String) As Long</source> | ||
| − | Funkcija '''ADLocalGroupAddMember''' | + | Funkcija '''ADLocalGroupAddMember''' doda uporabnika v lokalno skupino na računalniku. |
| + | {| | ||
| + | ! Server | ||
| + | | Ime računalnika na katerem želimo dodati uporabnika v skupino. Lahko se vnese DNS ime ali pa IP računalnika. | ||
| + | |- | ||
| + | ! GroupName | ||
| + | | Ime skupine v katero želimo dodati uporabnika. | ||
| + | |- | ||
| + | ! User | ||
| + | | Ime uporabnika, ki ga želimo dodati v skupino. Če ni lokalni uporabnik, moramo imenu dodati tudi domeno. | ||
| + | |} | ||
| + | <source>ADLocalGroupAddMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')</source> | ||
| + | |||
| + | |||
==ADLocalGroupRemoveMember== | ==ADLocalGroupRemoveMember== | ||
<source>Function ADLocalGroupRemoveMember (Server, GroupName, User As String) As Long</source> | <source>Function ADLocalGroupRemoveMember (Server, GroupName, User As String) As Long</source> | ||
| − | Funkcija '''ADLocalGroupRemoveMember''' | + | Funkcija '''ADLocalGroupRemoveMember''' odstrani uporabnika iz lokalne skupine na računalniku. |
| + | {| | ||
| + | ! Server | ||
| + | | Ime računalnika na katerem želimo odstraniti uporabnika iz skupine. Lahko se vnese DNS ime ali pa IP računalnika. | ||
| + | |- | ||
| + | ! GroupName | ||
| + | | Ime skupine iz katere želimo odstraniti uporabnika. | ||
| + | |- | ||
| + | ! User | ||
| + | | Ime uporabnika, ki ga želimo odstraniti iz skupine. Če ni lokalni uporabnik, moramo imenu dodati tudi domeno. | ||
| + | |} | ||
| + | <source>ADLocalGroupRemoveMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')</source> | ||
| + | |||
[[Category: Funkcije, Procedure]] | [[Category: Funkcije, Procedure]] | ||
[[Category: SDMS Basic]] | [[Category: SDMS Basic]] | ||
Redakcija: 09:39, 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 (Server As String) As TStringListFunkcija ADGlobalGroups nam vrne seznam vseh uporabniških skupin v dani domeni.
- Server
- Ime domene iz katere želimo spisek skupin.
- Result
- 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 (Server, GroupName As String) As TStringListFunkcija ADGlobalGroupMembers vrne spisek vseh uporabnikov v domenski skupini.
| Server | Ime domene iz katere želimo spisek članov. |
|---|---|
| GroupName | Ime skupine iz katere želimo spisek članov. |
| Result | 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)
EndSub
ADGlobalGroupAddMember
Function ADGlobalGroupAddMember (Server, GroupName, User As String) As LongFunkcija ADGlobalGroupAddMember doda uporabnika v domensko skupino v domeni.
| Server | Ime domene v katero želimo dodati uporabnika v skupino. |
|---|---|
| GroupName | Ime skupine v katero želimo dodati uporabnika. |
| User | Ime uporabnika, ki ga želimo dodati v skupino. Ime uporabnika mora biti v obliki Ime Domene\Ime uporabnika. |
ADGlobalGroupAddMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')
ADGlobalGroupRemoveMember
Function ADGlobalGroupRemoveMember (Server, GroupName, User As String) As LongFunkcija ADGlobalGroupRemoveMember odstrani uporabnika iz domenske skupine v domeni.
| Server | Ime domene v kateri želimo odstraniti uporabnika iz skupine. |
|---|---|
| GroupName | Ime skupine iz katere želimo odstraniti uporabnika. |
| User | Ime uporabnika, ki ga želimo odstraniti iz skupine. Ime uporabnika mora biti v obliki Ime Domene\Ime uporabnika. |
ADGlobalGroupRemoveMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')
ADGlobalUserInfo
Function ADGlobalUserInfo (Server, User As String) As StringFunkcija ADGlobalUserInfo nam vrne ime in priimek domenskega uporabnika, če je ta podatek vnešen.
| Server | Ime domene iz katere želimo podatke o uporabniku. |
|---|---|
| User | Ime uporabnik za katerega želimo ime in priimek. |
| Result | Vrne ime in priimek. |
Hint (ADGlobalUserInfo ('Ime domene', 'Ime uporabnika')
ADLocalGroups
Function ADLocalGroups (Server As String) As TStringListFunkcija ADLocalGroups vrne spisek vseh skupin na lokalnem računalniku.
| Server | 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. |
Dim SL As TStringList
SL = ADLocalGroups ('Ime Računalnika')
SL.Save ('C:\temp\ADLocalGroups.txt')
Destroy (SL)
ADLocalGroupMembers
Function ADLocalGroupMembers (Server, GroupName As String) As TStringListFunkcija ADLocalGroupMembers vrne spisek vseh uporabnikov v lokalni skupini na računalniku.
| Server | 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. |
| Result | 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)
EndSub
ADLocalGroupAddMember
Function ADLocalGroupAddMember (Server, GroupName, User As String) As LongFunkcija ADLocalGroupAddMember doda uporabnika v lokalno skupino na računalniku.
| Server | Ime računalnika na katerem želimo dodati uporabnika v skupino. Lahko se vnese DNS ime ali pa IP računalnika. |
|---|---|
| GroupName | Ime skupine v katero želimo dodati uporabnika. |
| User | Ime uporabnika, ki ga želimo dodati v skupino. Če ni lokalni uporabnik, moramo imenu dodati tudi domeno. |
ADLocalGroupAddMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')
ADLocalGroupRemoveMember
Function ADLocalGroupRemoveMember (Server, GroupName, User As String) As LongFunkcija ADLocalGroupRemoveMember odstrani uporabnika iz lokalne skupine na računalniku.
| Server | Ime računalnika na katerem želimo odstraniti uporabnika iz skupine. Lahko se vnese DNS ime ali pa IP računalnika. |
|---|---|
| GroupName | Ime skupine iz katere želimo odstraniti uporabnika. |
| User | Ime uporabnika, ki ga želimo odstraniti iz skupine. Če ni lokalni uporabnik, moramo imenu dodati tudi domeno. |
ADLocalGroupRemoveMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')