Active directory: Razlika med redakcijama

Iz SDMS
Jump to navigationJump to search
m
Vrstica 1: Vrstica 1:
 
{{Work}}
 
{{Work}}
Funkcije '''Active Direcrory''' se ločijo na dve skupini. Skupina funkcij ADLocal* se uporablja za upravljanje uporabnikov/skupin lokalnega računalnika, skupina funkcij ADGlobal* pa se uporablja za upravljanje uporabnikov/skupin same domene.
+
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')
+
   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

Ta stran je trenutno še v izdelavi.

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

Function ADGlobalGroups (Server As String) As TStringList

Funkcija 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 TStringList

Funkcija 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 Long

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.
ADGlobalGroupAddMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')


ADGlobalGroupRemoveMember

Function ADGlobalGroupRemoveMember (Server, GroupName, User As String) As Long

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.
ADGlobalGroupRemoveMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')


ADGlobalUserInfo

Function ADGlobalUserInfo (Server, User As String) As String

Funkcija 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 TStringList

Funkcija 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 TStringList

Funkcija 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 Long

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.
ADLocalGroupAddMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')


ADLocalGroupRemoveMember

Function ADLocalGroupRemoveMember (Server, GroupName, User As String) As Long

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.
ADLocalGroupRemoveMember ('Ime računalnika', 'Ime skupine', 'Ime Domene\Ime uporabnika')