Hana

Hello c'est encore moi et mes scripts fous :-P

En ps1 je suis entrain d'essayer de lister l'ensemble des objets d'un domaine (j'en ai 8 dans ma forêt).
Pour l'instant je fais une méthode moche... Je l'améliorerai au fils du temps (première fois que j'utilise powershell en entreprise!)

J'ai un bug sur ce script. Quand je ne mets pas de filtre, j'ai 1000résultats mais les DN sont vides (par contre j'ai des résultats pour mail). Quand je mets un filter ObjectClass=Users je n'ai aucun résultat...




$objDomaine4=[ADSI]'LDAP://DC=yyy,DC=yyy'
$objSearch4 = [System.DirectoryServices.DirectorySearcher] ($objDomaine4)
$objSearch4.Filter = '(ObjectClass=Users)'

$result4 = $objSearch4.findAll()
$result4Count = $objSearch4.findAll().count

$cnUsers4 = $result4

$ADUser4 = $null
[Array] $ADUser4 += foreach($user4 in $cnUsers4){
$properties4 = $user4.properties
$getItem4 = New-Object PSObject -Property @{
UserDN = [string] $properties4.DN
UserEmail = [string] $properties4.mail
};
$getItem4
}
$ADUser4
$result4Count



Ouii c'est moche :-D
Y aurait-il un pro de Powershell dans le coin ? Le seul qui pouvait m'aider dans mon entreprise est en congé pour 2semaines haha.

Puisque mon but est de lister l'ensemble des utilisateurs de la forêt (donc des 8 domaines), pour l'instant dans mon script j'ai copier-coller 8 fois cette partie de script en me connectant (en dur) à chaque fois à un nouveau domaine... Si vous avez des idées ou une solution permettant de faire ça + propre et + facilement ce serait chouette :-)

Merci !

Hello,
J'étais entrain d'essayer de configurer «your freedom», j'ai lancé plusieurs fois la recherche de serveurs.
Et puis tout à coup je n'ai plus d'accès internet (je suis toujours connectée au réseau SUPINFO).

Des idées ?

J' ai relancé mon pc, etc merci d'avance

Wouhou Luck m'a aidee c'est bon.

Il a fait un ipconfig /flushdns et hop ;-)

Bonjour,

On me dit aujourd'hui que certains logiciels se basent sur le nombre de comptes utilisateurs dans Active Directory pour faire payer le même nombre de licences logicielles.

Déjà est-ce que c'est bien vrai ? :-p

Secundo : Est-ce qu'un compte désactivé sera compté pour une licence ? Et un compte expiré ?


Merci si ya des pro d'AD pour cette réponse :-D

Bonjour à tous,

Je suis entrain de galérer depuis plusieurs jours à mon stage. J'essaie de créer un script en .vbs qui permette de créer des comptes depuis une feuille Excel.
Ca marche quand je mets l'OU de destination en "dure", mais quand j'essaie de définir l'OU de création de l'utilisateur en fonction de l'OU de destination inscrite dans Excel, ça ne marche plus.

Je suis dans un environnement de test et j'ai le droit de créer des users seulement dans une seule OU :-D



Voici mon script (j'ai utilisé les sources d'un certain Guy Thomas que j'ai trouvé en ligne car je n'ai jamais fait de script vbs auparavant).


CODE :


Option Explicit
Dim objRootLDAP, objContainer, objUser, objShell, objOU
Dim objExcel, objSpread, intRow
Dim strUser, strOU, strSheet
Dim strCN, strSam, strFirst, strLast, strPWD, strDisplayName, strUserUPN, strDescription, strOUser


strOU = "DC=branch,DC=lab,DC=ar*,DC=fr"
strSheet = "C:\Documents and Settings\Marion\Desktop\ScriptCreation\UserVersion2.xlsx"


'Lier vers AD le conteneur
Set objRootLDAP = GetObject("LDAP://rootDSE")
Set objContainer = GetObject("LDAP://" & strOU)

'Ouvre la feuille de calcul Excel
Set objExcel = CreateObject("Excel.Application")
Set objSpread = objExcel.Workbooks.Open(strSheet)
intRow = 3 'Car row 1 est souvent les titres



' Boucle création des comptes
Do Until objExcel.Cells(intRow,1).Value = ""
strOUser = (Trim(objExcel.Cells(intRow, 12).Value) & strOU)
strSam = Trim(objExcel.Cells(intRow, 1).Value)
strCN = Trim(objExcel.Cells(intRow, 3).Value)
strLast = Trim(objExcel.Cells(intRow, 5).Value)
strFirst = Trim(objExcel.Cells(intRow, 6).Value)
strPWD = Trim(objExcel.Cells(intRow, 11).Value)
strDisplayName = Trim(objExcel.cells(intRow, 4).value)
strUserUPN = Trim(objExcel.cells(intRow, 2).value)
strDescription = Trim(objExcel.cells(intRow, 7).value)

MsgBox strOUser 'pour vérifier que j'ai le bon chemin et c'est OK, la bulle s'affiche

' Build the actual User from data in strSheet.
Set objOU = GetObject("LDAP://" & strOUser) < ne fonctionne pas
Set objUser = objContainer.Create("User", "cn=" & strCN)
objUser.sAMAccountName = strSam
objUser.givenName = strFirst
objUser.sn = strLast
objUser.Description = strDescription
objUser.DisplayName = strDisplayName
objUser.UserPrincipalName = strUserUPN
objUser.SetInfo < bug à cette ligne là. Il me dit que je n'ai pas les droits alors que je pointe la création des users sur l'OU surlaquelle j'ai les droits de créations.

' Separate section to enable account with its password
objUser.userAccountControl = 512
objUser.pwdLastSet = 0
objUser.SetPassword strPWD
objUser.SetInfo
MsgBox strSam & "created"
intRow = intRow + 1
Loop
objExcel.Quit

WScript.Quit



Voilà... si vous avez des idées pour m'aider... J'ai plus ou moins compris tout le code que j'ai écrit (malgré quelque copié coller je l'avoue).

Est-ce que les droits me sont refusés parce que je chemine OU par OU et que du coup ya un endroit où il me refuse l'accès ?
Pour info l'erreur obtenu au lancement du script :

General access denied error
code : 80070005
Source : Active Directory

Merci :-)

P.S : On ne se moque pas si la réponse était toute simple ! J'ai pas mal cherché pour en arriver là déjà haha

Bonjour,

Pour mon premier sujet, j'espère ne pas écrire dans une mauvaise section...

Je vais intégrer SUPINFO Paris en octobre pour une arrivée en B3. J'aurai voulu savoir si vous me conseilleriez plutôt Windows 7 32bits ou 64bits ? (sachant que j'ai les 2 clefs avec mon msdnaa)

Mon PC est un Asus X5AVN qui a maintenant 1an. Il a 4Go de RAM, mais je craignais que certain logiciels de SUPINFO ait des soucis de compatibilité avec l'OS 64bits et ne me complique la vie x).


Caractéristique du PC :
Processeur : Intel Core 2 Duo P8400
GPU : Nvidia GeForce 9650M GT
Ram : 4Go
DD: 320 Go
(D'ailleurs si vous voulez bien me dire si ça suffira pour une année en B3 ? ou je reposte dans partie hardware ou pré-inscrit ?)

Merci beaucoup !
Si vous avez des conseils, n'hésitez pas ! (en mp ? )