AutoIt Français

Bonjour à tous,

C'est la 1ère fois que je dépose un script j'espère donc ne pas faire d'imper.
J'ai envoyé les sources et les exécutables (pour les plus feignants

).

Comme écrit dans le sujet, ce programme permet à un simple utilisateur domaine (sans droit d'administration), de pouvoir déverrouiller un compte ceci afin de laisser du temps libre à l'informaticien ou pour faciliter le travail à l'informaticien (au choix).

Je compte sur vous pour me faire remonter le plus de critique possible afin d'améliorer ma façon de coder.
Si vous avez des améliorations ou modifications à apporter, je suis preneur !!!

Par exemple est ce que la solution que j'ai utilisé (utilisation des events) et la meilleur méthode pour "réagir" avec l'interface graphique ? ou vaut il mieux tout mettre dans la boucle while principale ?

Voila, en attente de vos retour, je vous souhaite à tous une bonne journée.

Bonne idée j'ai mis en place le même genre d'utilitaire aux RH... mais je n'utilise pas le même include (AD.au3 me concernant)

Remarque en vrac ...

Pourquoi mettre la liste des utilisateurs dans un fichiers ? le traitement serai plus rapide dans un tableau

Le taborder ne passe pas naturellement lors de la configuration pas vraiment génant mais bon

Le fichier ini sans aucun cryptage n'est pas très sécurisant il faudrait le crypter.

La combo box reste vide alors que le fichier texte est bien créé et remplis

je en comprend pas comment j'ai vu le mot de passe en claire il est bel est bien crypté oublier cette remarque

Bonjour et merci Yogui.

Pour le taborder tu as tout à fait raison, j'avoue ne même pas y avoir pensé

.

Tu as raison, je vais rajouter un cryptage au fichier ini (avec aes.au3)

Pourquoi je ne suis pas passé par un tableau ?
Tout simplement parce que je n'ai jamais encore fait cela

D'ailleurs si t'as une explication la dessus je suis preneur. (je suppose que c'est un simple return suivi d'un array)

Franchement j'ai hâte d'avoir ton retour complet sur ce code : je sens que cela va m'être bénéfique.

Par avance un grand merci.

PS : si tu es d'accord, j'aimerais comparer ton code au mien (si tu penses que cela peut mettre profitable bien sur et que ca ne te dérange pas)

le cryptage du fichier complet fera une sécurité supplémentaire non ?
Qu'en penses tu ?
Est ce utile ?

Bon j'ai peut être un bug sur mon poste la liste se remplit correctement mais qu'après avoir afficher l'aide :s

Je testerai sur un autre Pc

en fait il me semble qu'avec l'Include AD les info ressorte déjà dans un array

Je cherche les sources de mon petit soft je le poste ici pas de problème.

peuchere83 a écrit :le cryptage du fichier complet fera une sécurité supplémentaire non ?
Qu'en penses tu ?
Est ce utile ?

Non pas besoin de tout crypter l'important est d'avoir au moins le mot de passe

Yogui a écrit :
La combo box reste vide alors que le fichier texte est bien créé et remplis

J'ai compris pourquoi la combo met du temps à se remplir c'est tout bête mais j'ai plus de 1000 utilisateurs ... il faut plus d'une minute pour afficher la liste...

J'ai retrouvé mon code je vais le relire

le corrigé ....le simplifier ... bref prendre un peu de temps

En effet je vais rajouter un splashtext le temps que la combobox se remplisse ainsi que la desactivation du bouton tant que la liste n'est pas générée.

1000 utilisateurs

j'en suis loin je suis à un peu moins de 100

merci bcp

peuchere83 a écrit :En effet je vais rajouter un splashtext le temps que la combobox se remplisse ainsi que la desactivation du bouton tant que la liste n'est pas générée.

1000 utilisateurs
j'en suis loin je suis à un peu moins de 100

merci bcp

Gérer 100 ou 1000 utilisateurs c'est la même chose l'important c'est de bien tout ranger

J'ai terminé de simplifier mon code, je le met juste en dessou

Mon métier c'est gestionnaire systeme / administrateur domaine en gros je passe mon temps à créer des utilisateurs des groupes des gpo et à ranger les utilisateurs.

Mes domaines ont tous le même arbre

-Machine
|-Pc fixe
|-Service1
|-pc1
|-pc2
|-Service1
|-Service1
|-....
|-Pc portable
|-Service1
|-...
|-...
-utilisateur
|-Service 1
|-fonction
|-utilisateur1
...

Voilà pourquoi je l'ai simplifié mon "script" qui à l'origine permet à n'importe quelle personne ayant des droits de créer de bouger et de désactiver un utilisateur.

L'udf que j'utilise se trouve ICI sachant que j'utilise la version 0.38.1

Je n'ai pas de fichier de configuration je donne les droits directement dans l'AD (je délègue

) et surtout c'est sécurisé (mettre en place une stratègie de mot de passe forte voir mettre en place une identification forte)

bon j'ai refait une GUI et j'ai certainement oublier de supprimer une ou deux variables mais il fonctionne

le code :

► Afficher le texte

Code : Tout sélectionner

#include <AD.au3>
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region déclaration variables global GUI
Global $Comboservice, $ComboNom, $RBACTIV, $RBDESAC
#EndRegion déclaration variables global GUI

#Region déclaration variables global d'echange
Global $listecomboservice, $listecomboserviceuser, $aOUs, $active
#EndRegion déclaration variables global d'echange

_AD_Open()
$listecomboservice = _listOU()

#Region ### START Koda GUI section ### Form=c:\documents and settings\f.guillot\bureau\nouveau dossier (4)\d.kxf
GUICreate("Activation Désactivation des utilisateurs", 436, 265, 192, 124)
$Comboservice = GUICtrlCreateCombo("", 200, 40, 145, 25)
GUICtrlSetData(-1, $listecomboservice, "")
$Label1 = GUICtrlCreateLabel("Choisir le service :", 96, 40, 89, 17)
$Label2 = GUICtrlCreateLabel("Choisir l'agent", 96, 80, 69, 17)
$ComboNom = GUICtrlCreateCombo("", 200, 80, 145, 25)
$Activation = GUICtrlCreateGroup("Activation du compte", 88, 120, 257, 73)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$RBACTIV = GUICtrlCreateRadio("Activé", 120, 152, 73, 17)
$RBDESAC = GUICtrlCreateRadio("Désactivé", 248, 152, 81, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$BTNOK = GUICtrlCreateButton("Changer ETAT", 312, 224, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

        Case $Comboservice
            GUICtrlSetData($ComboNom, "", "")
            $combouser = _objetinouselect(GUICtrlRead($Comboservice))
            GUICtrlSetData($ComboNom, $combouser, "")

        Case $ComboNom
            $utilisateur = GUICtrlRead($ComboNom)
            If _AD_IsObjectDisabled($utilisateur) Then
                GUICtrlSetState($RBDESAC, $GUI_CHECKED)
                $active = "vrai"
            Else
                GUICtrlSetState($RBACTIV, $GUI_CHECKED)
                $active = "faux"
            EndIf

        Case $BTNOK
            $iValue = _AD_DisableObject(GUICtrlRead($ComboNom))
            If $active = "vrai" Then
                If $iValue = 1 Then
                    MsgBox(64, "Information","l'utilisateur " & GUICtrlRead($ComboNom) & " a été désactivé")
                    $active = "faux"
                ElseIf @error = 1 Then
                    MsgBox(64, "Information", "l'utilisateur " & GUICtrlRead($ComboNom) & " n'est pas présent")
                Else
                    MsgBox(64, "Information", "Erreur '" & @error & "' en provenance de AD")
                EndIf
            Else
                If $iValue = 1 Then
                    MsgBox(64, "Information", "l'utilisateur " & GUICtrlRead($ComboNom) & " a été réactivé")
                $active = "vrai"
                ElseIf @error = 1 Then
                    MsgBox(64, "Information", "l'utilisateur " & GUICtrlRead($ComboNom) & " n'est pas présent")
                Else
                    MsgBox(64, "Information", "Erreur '" & @error & "' en provenance de AD")
                EndIf
            EndIf

    EndSwitch
WEnd

Func _listOU()
    Local $listecomboservice
    Global $aOUs = _AD_GetAllOUs()
    If @error > 0 Then
        MsgBox(64, "Erreur", "Impossible de joindre l'AD")
    Else
        For $i = 1 To $aOUs[0][0] Step 1
            $tempo = StringSplit($aOUs[$i][0], "\")
;~          If $tempo[1] = "Hmb" Then
                $listecomboservice = $listecomboservice & "|" & $aOUs[$i][0]
;~          EndIf
        Next
    EndIf
    Return ($listecomboservice)
EndFunc   ;==>_listOU


Func _objetinouselect($ousource)
    Local $listecomboserviceuser
    For $i = 1 To $aOUs[0][0] Step 1
        If $aOUs[$i][0] = $ousource Then
            $sOU = $aOUs[$i][1]
            ExitLoop
        EndIf
    Next
    $aObjects = _AD_GetObjectsInOU($sOU, "(name=*)", 2, "sAMAccountName,distinguishedName,displayname")
    If @error > 0 Then
        MsgBox(64, "Erreur", "l'OU est introuvable")
    Else
        For $i = 1 To $aObjects[0][0] Step 1
            $listecomboserviceuser = $listecomboserviceuser & "|" & $aObjects[$i][0]
        Next
    EndIf
    Return ($listecomboserviceuser)
EndFunc   ;==>_objetinouselect

j'explique ces lignes :

;~ If $tempo[1] = "Hmb" Then
$listecomboservice = $listecomboservice & "|" & $aOUs[$i][0]
;~ EndIf

en fait je cible l'OU HMB ou sont stocké les utilisateurs gérer par les HMB. dans la version complète le nom du centre est en base de registre (pas bô)

Bonjour yogui eet merci pour ton code et tes conseils que je suis entrain d'appliquer sur mon programme.

Par contre j'ai une question : comment faire passer la liste des comptes clients au travers d'un tableau ?
Car dans mon cas, c'est un programme à part qui s'occupe de cela.

Par avance merci.

je ne comprend pas vraiment la question :s

Faire passer la liste des users dans un array ?

Ou

Afficher la liste des users dans un tableau genre ListView ?

Pouvez vous me passer les sources ou le lien de téléchargement de ce programme

désolé si vous avez été claire j'ai eu une journée compliquée

Yogui a écrit :Remarque en vrac ...

Pourquoi mettre la liste des utilisateurs dans un fichiers ? le traitement serai plus rapide dans un tableau

Suite à ta suggestion, je souhaite donc passer en paramètre depuis le programme "ListeCompteUser.exe" vers le programme principal "UnlockUser.exe" la liste des comptes utilisateurs sous forme de tableau.

Est ce possible du fait que j'utilise 2 exécutables ?

SI cela n'est pas possible, il faut juste que je repense le programme pour faire en sorte que tout soit combiné en un seul et même programme (car pour rappel actuellement ce programme est composé de 3 exécutables : le principal (l'ihm), celui qui créé la liste des utilisateurs et celui qui déverrouille le compte sélectionné)

J'espère être plus clair cette fois.

J'ai compris (effectivement vous n'étiez pas claire vous avez trop bien repris mes mots pas claire

)

passer tellement d'information en paramètre j'ai jamais tenté en fait ... mais j'ai un doute je ne suis pas certain que les paramètre ne soient pas limité...

mais bon c'est à tester des exemples de passage de paramètre :

Par ici

Mais franchement je regarderai plutôt pour faire qu'un seul exe avec plusieurs fonctions

Bonjour et merci pour la réponse,

je vais donc le regrouper en 2 exécutables :
- le 1er ne servira qu'à lancer le second mais avec des droits suffisants
- le second intègrera l'ihm ainsi que la génération de la liste et le déverrouillage du compte.

Je posterai le nouveau programme des que j'ai 2 minutes pour appliquer ces modifications.

Pour info Yogui je suis moi même admin domaine, mais du fait que je travaille dans une petite entité (surtout comparée à la tienne : 100 vs 1000 users) je n'ai pas besoin de gérer les comptes utilisateurs ou machine en permanence comme toi qui plus est, tous mes postes à administrer sont dans les locaux.

D'ailleurs si tu as eu des idées de programmes pour faciliter ton travail, je suis preneur (de l'idée bien sur pas du code : je ne vais pas te piquer tous ce que tu as écrit quand même

)
Par exemple, j'ai mis en place plusieurs accès externes (2 adsl et 1 sdsl) j'ai donc fait un petit programme (en barre des tâches) qui permet de changer proprement les routes du postes pour que l'opérateur puisse exploiter l'adsl en download et la sdsl en upload. Je te rassure, à chaque fois que cette application démarre (à chaque démarrage du poste), les routes sont remises par défaut.

En tout cas merci.

D'ailleurs j'étais en train de penser à quelque chose :

serait il possible de classer les divers programmes déposés sur ce forum, par thème ?
Cela serait vachement plus intéressant pour les exploiter et pour les retrouver.

Bon après il est possible que la structure du forum ne le permette pas (ca c'est une autre histoire)

C'est une solution qui me semble bonne mais je ne comprend pas pourquoi vous ne déléguez pas des droits AD à vos utilisateurs ?

Plus besoins de lanceur plus besoin de "coder" le mot de passe administrateur ou de le mettre en dure dans un exe ; votre contrôleur de domaine se chargera de la sécurité et surtout, en cas de changement de mot de passe administrateur pas besoin de passer sur les postes pour un re paramétrage ...

Un petit lien expliquant

http://technet.microsoft.com/fr-fr/libr ... 07882.aspx

Bien sûr ce n'est qu'un conseil

peuchere83 a écrit : Pour info Yogui je suis moi même admin domaine, mais du fait que je travaille dans une petite entité (surtout comparée à la tienne : 100 vs 1000 users) je n'ai pas besoin de gérer les comptes utilisateurs ou machine en permanence comme toi qui plus est, tous mes postes à administrer sont dans les locaux.

Gérer 1000 postes ou 100 c'est le même boulot de rigueur

peuchere83 a écrit : D'ailleurs si tu as eu des idées de programmes pour faciliter ton travail, je suis preneur (de l'idée bien sur pas du code : je ne vais pas te piquer tous ce que tu as écrit quand même )
Par exemple, j'ai mis en place plusieurs accès externes (2 adsl et 1 sdsl) j'ai donc fait un petit programme (en barre des tâches) qui permet de changer proprement les routes du postes pour que l'opérateur puisse exploiter l'adsl en download et la sdsl en upload. Je te rassure, à chaque fois que cette application démarre (à chaque démarrage du poste), les routes sont remises par défaut.
En tout cas merci.

Des idées y'en a plein le forum

Après il faut les adapter à l'infra j'ai beaucoup de petit code pour attaquer des bases de données et ressortir des infos précises, beaucoup de scripts de surveillances des serveurs espace-disque ram service ... et d'autre pour mes serveurs TSE et encore pour gérer mon AD des idées c'est pas ce qui manque après il faut voir si elles sont réalisable et utilisable sur d'autre site.

Yogui a écrit :C'est une solution qui me semble bonne mais je ne comprend pas pourquoi vous ne déléguez pas des droits AD à vos utilisateurs ?

C'est juste pour l'exercice de "style". Je voulais l'intégrer dans mon application pour essayer cela.
Mais je suis tout à fait d'accord, la meilleure solution c'est la délégation des droits.

Encore merci.

AutoIt Français

[..] Déverrouillage de compte domaine (Windows2003)

[..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)

Re: [..] Déverrouillage de compte domaine (Windows2003)