#include <GUIConstants.au3>

$nombre = InputBox("Création Compte", "Combien de compte à créer ? (1 à 10)")


if ($nombre = 1) Then

	Opt("GUIOnEventMode", 1)
    GUICreate("Création Compte",680, 80, -1, -1,-1)
	$valider = GUICtrlCreateButton("Valider",610,50,55)
	GUICtrlCreateLabel("Nom", 110, 10, 75, 17)
	GUICtrlCreateLabel("Prenom", 265, 10, 75, 17)
	GUICtrlCreateLabel("Compte 1", 20, 26, 45, 17)
	GuiCtrlCreateLabel("Service", 425, 10, 75, 17)
	$nom1 = GUICtrlCreateInput("", 70, 25, 120, 21)
	$prenom1 = GUICtrlCreateInput("", 230, 25, 120, 21)
	$service1 = GuiCtrlCreateCombo("",390,25,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
	GUICtrlSetOnEvent($valider,"create1")
    GUICtrlSetState("", $GUI_CHECKED)
    GUISetState(@SW_SHOW)


     While 1
		  sleep(100)
	  Wend

Else
  if ($nombre = 2) Then

	Opt("GUIOnEventMode", 1)
    GUICreate("Création Compte",680, 80, -1, -1,-1)
	$valider = GUICtrlCreateButton("Valider",610,50,55)
	GUICtrlCreateLabel("Nom", 110, 10, 75, 17)
	GUICtrlCreateLabel("Prenom", 265, 10, 75, 17)
	GuiCtrlCreateLabel("Service", 425, 10, 75, 17)

	GUICtrlCreateLabel("Compte 1", 20, 26, 45, 17)
	$nom1 = GUICtrlCreateInput("", 70, 25, 120, 21)
	$prenom1 = GUICtrlCreateInput("", 230, 25, 120, 21)
	$service1 = GuiCtrlCreateCombo("",390,25,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 2", 20, 52, 45, 17)
	$nom2 = GUICtrlCreateInput("", 70, 50, 120, 21)
	$prenom2 = GUICtrlCreateInput("", 230, 50, 120, 21)
	$service2 = GuiCtrlCreateCombo("",390,50,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
	GUICtrlSetOnEvent($valider,"create2")
    GUICtrlSetState("", $GUI_CHECKED)
    GUISetState(@SW_SHOW)


     While 1
		  sleep(100)
	  Wend

Else
    if ($nombre = 3) Then

	Opt("GUIOnEventMode", 1)
    GUICreate("Création Compte",680, 110, -1, -1,-1)
	$valider = GUICtrlCreateButton("Valider",610,75,55)
	GUICtrlCreateLabel("Nom", 110, 10, 75, 17)
	GUICtrlCreateLabel("Prenom", 265, 10, 75, 17)
	GuiCtrlCreateLabel("Service", 425, 10, 75, 17)

	GUICtrlCreateLabel("Compte 1", 20, 26, 45, 17)
	$nom1 = GUICtrlCreateInput("", 70, 25, 120, 21)
	$prenom1 = GUICtrlCreateInput("", 230, 25, 120, 21)
	$service1 = GuiCtrlCreateCombo("",390,25,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 2", 20, 52, 45, 17)
	$nom2 = GUICtrlCreateInput("", 70, 50, 120, 21)
	$prenom2 = GUICtrlCreateInput("", 230, 50, 120, 21)
	$service2 = GuiCtrlCreateCombo("",390,50,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 3", 20, 78, 45, 17)
	$nom3 = GUICtrlCreateInput("", 70, 75, 120, 21)
	$prenom3 = GUICtrlCreateInput("", 230, 75, 120, 21)
	$service3 = GuiCtrlCreateCombo("", 390, 75, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")


	GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
	GUICtrlSetOnEvent($valider,"create3")
    GUICtrlSetState("", $GUI_CHECKED)
    GUISetState(@SW_SHOW)


     While 1
		  sleep(100)
	  Wend

Else
	if ($nombre = 4) Then

	Opt("GUIOnEventMode", 1)
    GUICreate("Création Compte",680, 140, -1, -1,-1)
	$valider = GUICtrlCreateButton("Valider",610,100,55)
	GUICtrlCreateLabel("Nom", 110, 10, 75, 17)
	GUICtrlCreateLabel("Prenom", 265, 10, 75, 17)
	GuiCtrlCreateLabel("Service", 425, 10, 75, 17)

	GUICtrlCreateLabel("Compte 1", 20, 26, 45, 17)
	$nom1 = GUICtrlCreateInput("", 70, 25, 120, 21)
	$prenom1 = GUICtrlCreateInput("", 230, 25, 120, 21)
	$service1 = GuiCtrlCreateCombo("",390,25,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 2", 20, 52, 45, 17)
	$nom2 = GUICtrlCreateInput("", 70, 50, 120, 21)
	$prenom2 = GUICtrlCreateInput("", 230, 50, 120, 21)
	$service2 = GuiCtrlCreateCombo("",390,50,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 3", 20, 78, 45, 17)
	$nom3 = GUICtrlCreateInput("", 70, 75, 120, 21)
	$prenom3 = GUICtrlCreateInput("", 230, 75, 120, 21)
	$service3 = GuiCtrlCreateCombo("", 390, 75, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 4", 20, 104, 45, 17)
	$nom4 = GUICtrlCreateInput("", 70, 100, 120, 21)
	$prenom4 = GUICtrlCreateInput("", 230, 100, 120, 21)
	$service4 = GuiCtrlCreateCombo("", 390, 100, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")


	GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
	GUICtrlSetOnEvent($valider,"create4")
    GUICtrlSetState("", $GUI_CHECKED)
    GUISetState(@SW_SHOW)


     While 1
		  sleep(100)
	  Wend

Else
  	if ($nombre = 5) Then

	Opt("GUIOnEventMode", 1)
    GUICreate("Création Compte",680, 170, -1, -1,-1)
	$valider = GUICtrlCreateButton("Valider",610,125,55)
	GUICtrlCreateLabel("Nom", 110, 10, 75, 17)
	GUICtrlCreateLabel("Prenom", 265, 10, 75, 17)
	GuiCtrlCreateLabel("Service", 425, 10, 75, 17)

	GUICtrlCreateLabel("Compte 1", 20, 26, 45, 17)
	$nom1 = GUICtrlCreateInput("", 70, 25, 120, 21)
	$prenom1 = GUICtrlCreateInput("", 230, 25, 120, 21)
	$service1 = GuiCtrlCreateCombo("",390,25,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 2", 20, 52, 45, 17)
	$nom2 = GUICtrlCreateInput("", 70, 50, 120, 21)
	$prenom2 = GUICtrlCreateInput("", 230, 50, 120, 21)
	$service2 = GuiCtrlCreateCombo("",390,50,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 3", 20, 78, 45, 17)
	$nom3 = GUICtrlCreateInput("", 70, 75, 120, 21)
	$prenom3 = GUICtrlCreateInput("", 230, 75, 120, 21)
	$service3 = GuiCtrlCreateCombo("", 390, 75, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 4", 20, 104, 45, 17)
	$nom4 = GUICtrlCreateInput("", 70, 100, 120, 21)
	$prenom4 = GUICtrlCreateInput("", 230, 100, 120, 21)
	$service4 = GuiCtrlCreateCombo("", 390, 100, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 5", 20, 130, 45, 17)
	$nom5 = GUICtrlCreateInput("", 70, 125, 120, 21)
	$prenom5 = GUICtrlCreateInput("", 230, 125, 120, 21)
	$service5 = GuiCtrlCreateCombo("", 390, 125, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")


	GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
	GUICtrlSetOnEvent($valider,"create5")
    GUICtrlSetState("", $GUI_CHECKED)
    GUISetState(@SW_SHOW)


     While 1
		  sleep(100)
	  Wend

Else
	if ($nombre = 6) Then

	Opt("GUIOnEventMode", 1)
    GUICreate("Création Compte",680, 200, -1, -1,-1)
	$valider = GUICtrlCreateButton("Valider",610,150,55)
	GUICtrlCreateLabel("Nom", 110, 10, 75, 17)
	GUICtrlCreateLabel("Prenom", 265, 10, 75, 17)
	GuiCtrlCreateLabel("Service", 425, 10, 75, 17)

	GUICtrlCreateLabel("Compte 1", 20, 26, 45, 17)
	$nom1 = GUICtrlCreateInput("", 70, 25, 120, 21)
	$prenom1 = GUICtrlCreateInput("", 230, 25, 120, 21)
	$service1 = GuiCtrlCreateCombo("",390,25,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 2", 20, 52, 45, 17)
	$nom2 = GUICtrlCreateInput("", 70, 50, 120, 21)
	$prenom2 = GUICtrlCreateInput("", 230, 50, 120, 21)
	$service2 = GuiCtrlCreateCombo("",390,50,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 3", 20, 78, 45, 17)
	$nom3 = GUICtrlCreateInput("", 70, 75, 120, 21)
	$prenom3 = GUICtrlCreateInput("", 230, 75, 120, 21)
	$service3 = GuiCtrlCreateCombo("", 390, 75, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 4", 20, 104, 45, 17)
	$nom4 = GUICtrlCreateInput("", 70, 100, 120, 21)
	$prenom4 = GUICtrlCreateInput("", 230, 100, 120, 21)
	$service4 = GuiCtrlCreateCombo("", 390, 100, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 5", 20, 130, 45, 17)
	$nom5 = GUICtrlCreateInput("", 70, 125, 120, 21)
	$prenom5 = GUICtrlCreateInput("", 230, 125, 120, 21)
	$service5 = GuiCtrlCreateCombo("", 390, 125, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 6", 20, 156, 45, 17)
	$nom6 = GUICtrlCreateInput("", 70, 150, 120, 21)
	$prenom6 = GUICtrlCreateInput("", 230, 150, 120, 21)
	$service6 = GuiCtrlCreateCombo("", 390, 150, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")


	GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
	GUICtrlSetOnEvent($valider,"create6")
    GUICtrlSetState("", $GUI_CHECKED)
    GUISetState(@SW_SHOW)


     While 1
		  sleep(100)
	  Wend

Else
  	if ($nombre = 7) Then

	Opt("GUIOnEventMode", 1)
    GUICreate("Création Compte",680, 230, -1, -1,-1)
	$valider = GUICtrlCreateButton("Valider",610,175,55)
	GUICtrlCreateLabel("Nom", 110, 10, 75, 17)
	GUICtrlCreateLabel("Prenom", 265, 10, 75, 17)
	GuiCtrlCreateLabel("Service", 425, 10, 75, 17)

	GUICtrlCreateLabel("Compte 1", 20, 26, 45, 17)
	$nom1 = GUICtrlCreateInput("", 70, 25, 120, 21)
	$prenom1 = GUICtrlCreateInput("", 230, 25, 120, 21)
	$service1 = GuiCtrlCreateCombo("",390,25,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 2", 20, 52, 45, 17)
	$nom2 = GUICtrlCreateInput("", 70, 50, 120, 21)
	$prenom2 = GUICtrlCreateInput("", 230, 50, 120, 21)
	$service2 = GuiCtrlCreateCombo("",390,50,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 3", 20, 78, 45, 17)
	$nom3 = GUICtrlCreateInput("", 70, 75, 120, 21)
	$prenom3 = GUICtrlCreateInput("", 230, 75, 120, 21)
	$service3 = GuiCtrlCreateCombo("", 390, 75, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 4", 20, 104, 45, 17)
	$nom4 = GUICtrlCreateInput("", 70, 100, 120, 21)
	$prenom4 = GUICtrlCreateInput("", 230, 100, 120, 21)
	$service4 = GuiCtrlCreateCombo("", 390, 100, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 5", 20, 130, 45, 17)
	$nom5 = GUICtrlCreateInput("", 70, 125, 120, 21)
	$prenom5 = GUICtrlCreateInput("", 230, 125, 120, 21)
	$service5 = GuiCtrlCreateCombo("", 390, 125, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 6", 20, 156, 45, 17)
	$nom6 = GUICtrlCreateInput("", 70, 150, 120, 21)
	$prenom6 = GUICtrlCreateInput("", 230, 150, 120, 21)
	$service6 = GuiCtrlCreateCombo("", 390, 150, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 7", 20, 182, 45, 17)
	$nom7 = GUICtrlCreateInput("", 70, 175, 120, 21)
	$prenom7 = GUICtrlCreateInput("", 230, 175, 120, 21)
	$service7 = GuiCtrlCreateCombo("", 390, 175, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")


	GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
	GUICtrlSetOnEvent($valider,"create7")
    GUICtrlSetState("", $GUI_CHECKED)
    GUISetState(@SW_SHOW)


     While 1
		  sleep(100)
	  Wend

Else
	if ($nombre = 8) Then

	Opt("GUIOnEventMode", 1)
    GUICreate("Création Compte",680, 260, -1, -1,-1)
	$valider = GUICtrlCreateButton("Valider",610,200,55)
	GUICtrlCreateLabel("Nom", 110, 10, 75, 17)
	GUICtrlCreateLabel("Prenom", 265, 10, 75, 17)
	GuiCtrlCreateLabel("Service", 425, 10, 75, 17)

	GUICtrlCreateLabel("Compte 1", 20, 26, 45, 17)
	$nom1 = GUICtrlCreateInput("", 70, 25, 120, 21)
	$prenom1 = GUICtrlCreateInput("", 230, 25, 120, 21)
	$service1 = GuiCtrlCreateCombo("",390,25,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 2", 20, 52, 45, 17)
	$nom2 = GUICtrlCreateInput("", 70, 50, 120, 21)
	$prenom2 = GUICtrlCreateInput("", 230, 50, 120, 21)
	$service2 = GuiCtrlCreateCombo("",390,50,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 3", 20, 78, 45, 17)
	$nom3 = GUICtrlCreateInput("", 70, 75, 120, 21)
	$prenom3 = GUICtrlCreateInput("", 230, 75, 120, 21)
	$service3 = GuiCtrlCreateCombo("", 390, 75, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 4", 20, 104, 45, 17)
	$nom4 = GUICtrlCreateInput("", 70, 100, 120, 21)
	$prenom4 = GUICtrlCreateInput("", 230, 100, 120, 21)
	$service4 = GuiCtrlCreateCombo("", 390, 100, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 5", 20, 130, 45, 17)
	$nom5 = GUICtrlCreateInput("", 70, 125, 120, 21)
	$prenom5 = GUICtrlCreateInput("", 230, 125, 120, 21)
	$service5 = GuiCtrlCreateCombo("", 390, 125, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 6", 20, 156, 45, 17)
	$nom6 = GUICtrlCreateInput("", 70, 150, 120, 21)
	$prenom6 = GUICtrlCreateInput("", 230, 150, 120, 21)
	$service6 = GuiCtrlCreateCombo("", 390, 150, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 7", 20, 182, 45, 17)
	$nom7 = GUICtrlCreateInput("", 70, 175, 120, 21)
	$prenom7 = GUICtrlCreateInput("", 230, 175, 120, 21)
	$service7 = GuiCtrlCreateCombo("", 390, 175, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 8", 20, 208, 45, 17)
	$nom8 = GUICtrlCreateInput("", 70, 200, 120, 21)
	$prenom8 = GUICtrlCreateInput("", 230, 200, 120, 21)
	$service8 = GuiCtrlCreateCombo("", 390, 200, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")


	GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
	GUICtrlSetOnEvent($valider,"create8")
    GUICtrlSetState("", $GUI_CHECKED)
    GUISetState(@SW_SHOW)


     While 1
		  sleep(100)
	  Wend

Else
  	if ($nombre = 9) Then

	Opt("GUIOnEventMode", 1)
    GUICreate("Création Compte",680, 290, -1, -1,-1)
	$valider = GUICtrlCreateButton("Valider",610,225,55)
	GUICtrlCreateLabel("Nom", 110, 10, 75, 17)
	GUICtrlCreateLabel("Prenom", 265, 10, 75, 17)
	GuiCtrlCreateLabel("Service", 425, 10, 75, 17)

	GUICtrlCreateLabel("Compte 1", 20, 26, 45, 17)
	$nom1 = GUICtrlCreateInput("", 70, 25, 120, 21)
	$prenom1 = GUICtrlCreateInput("", 230, 25, 120, 21)
	$service1 = GuiCtrlCreateCombo("",390,25,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 2", 20, 52, 45, 17)
	$nom2 = GUICtrlCreateInput("", 70, 50, 120, 21)
	$prenom2 = GUICtrlCreateInput("", 230, 50, 120, 21)
	$service2 = GuiCtrlCreateCombo("",390,50,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 3", 20, 78, 45, 17)
	$nom3 = GUICtrlCreateInput("", 70, 75, 120, 21)
	$prenom3 = GUICtrlCreateInput("", 230, 75, 120, 21)
	$service3 = GuiCtrlCreateCombo("", 390, 75, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 4", 20, 104, 45, 17)
	$nom4 = GUICtrlCreateInput("", 70, 100, 120, 21)
	$prenom4 = GUICtrlCreateInput("", 230, 100, 120, 21)
	$service4 = GuiCtrlCreateCombo("", 390, 100, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 5", 20, 130, 45, 17)
	$nom5 = GUICtrlCreateInput("", 70, 125, 120, 21)
	$prenom5 = GUICtrlCreateInput("", 230, 125, 120, 21)
	$service5 = GuiCtrlCreateCombo("", 390, 125, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 6", 20, 156, 45, 17)
	$nom6 = GUICtrlCreateInput("", 70, 150, 120, 21)
	$prenom6 = GUICtrlCreateInput("", 230, 150, 120, 21)
	$service6 = GuiCtrlCreateCombo("", 390, 150, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 7", 20, 182, 45, 17)
	$nom7 = GUICtrlCreateInput("", 70, 175, 120, 21)
	$prenom7 = GUICtrlCreateInput("", 230, 175, 120, 21)
	$service7 = GuiCtrlCreateCombo("", 390, 175, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 8", 20, 208, 45, 17)
	$nom8 = GUICtrlCreateInput("", 70, 200, 120, 21)
	$prenom8 = GUICtrlCreateInput("", 230, 200, 120, 21)
	$service8 = GuiCtrlCreateCombo("", 390, 200, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 9", 20, 234, 45, 17)
	$nom9 = GUICtrlCreateInput("", 70, 225, 120, 21)
	$prenom9 = GUICtrlCreateInput("", 230, 225, 120, 21)
	$service9 = GuiCtrlCreateCombo("", 390, 225, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")


	GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
	GUICtrlSetOnEvent($valider,"create9")
    GUICtrlSetState("", $GUI_CHECKED)
    GUISetState(@SW_SHOW)


     While 1
		  sleep(100)
	  Wend

Else
    	if ($nombre = 10) Then

	Opt("GUIOnEventMode", 1)
    GUICreate("Création Compte",680, 320, -1, -1,-1)
	$valider = GUICtrlCreateButton("Valider",610,250,55)
	GUICtrlCreateLabel("Nom", 110, 10, 75, 17)
	GUICtrlCreateLabel("Prenom", 265, 10, 75, 17)
	GuiCtrlCreateLabel("Service", 425, 10, 75, 17)

	GUICtrlCreateLabel("Compte 1", 20, 26, 45, 17)
	$nom1 = GUICtrlCreateInput("", 70, 25, 120, 21)
	$prenom1 = GUICtrlCreateInput("", 230, 25, 120, 21)
	$service1 = GuiCtrlCreateCombo("",390,25,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 2", 20, 52, 45, 17)
	$nom2 = GUICtrlCreateInput("", 70, 50, 120, 21)
	$prenom2 = GUICtrlCreateInput("", 230, 50, 120, 21)
	$service2 = GuiCtrlCreateCombo("",390,50,120,21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 3", 20, 78, 45, 17)
	$nom3 = GUICtrlCreateInput("", 70, 75, 120, 21)
	$prenom3 = GUICtrlCreateInput("", 230, 75, 120, 21)
	$service3 = GuiCtrlCreateCombo("", 390, 75, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 4", 20, 104, 45, 17)
	$nom4 = GUICtrlCreateInput("", 70, 100, 120, 21)
	$prenom4 = GUICtrlCreateInput("", 230, 100, 120, 21)
	$service4 = GuiCtrlCreateCombo("", 390, 100, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 5", 20, 130, 45, 17)
	$nom5 = GUICtrlCreateInput("", 70, 125, 120, 21)
	$prenom5 = GUICtrlCreateInput("", 230, 125, 120, 21)
	$service5 = GuiCtrlCreateCombo("", 390, 125, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 6", 20, 156, 45, 17)
	$nom6 = GUICtrlCreateInput("", 70, 150, 120, 21)
	$prenom6 = GUICtrlCreateInput("", 230, 150, 120, 21)
	$service6 = GuiCtrlCreateCombo("", 390, 150, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 7", 20, 182, 45, 17)
	$nom7 = GUICtrlCreateInput("", 70, 175, 120, 21)
	$prenom7 = GUICtrlCreateInput("", 230, 175, 120, 21)
	$service7 = GuiCtrlCreateCombo("", 390, 175, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 8", 20, 208, 45, 17)
	$nom8 = GUICtrlCreateInput("", 70, 200, 120, 21)
	$prenom8 = GUICtrlCreateInput("", 230, 200, 120, 21)
	$service8 = GuiCtrlCreateCombo("", 390, 200, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 9", 20, 234, 45, 17)
	$nom9 = GUICtrlCreateInput("", 70, 225, 120, 21)
	$prenom9 = GUICtrlCreateInput("", 230, 225, 120, 21)
	$service9 = GuiCtrlCreateCombo("", 390, 225, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")

	GUICtrlCreateLabel("Compte 10", 13, 257, 52, 17)
	$nom10 = GUICtrlCreateInput("", 70, 250, 120, 21)
	$prenom10 = GUICtrlCreateInput("", 230, 250, 120, 21)
	$service10 = GuiCtrlCreateCombo("", 390, 250, 120, 21)
	GUICtrlSetData(-1, "Direction|Administration|Production 1|Production 2|Informatique", "")


	GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
	GUICtrlSetOnEvent($valider,"create10")
    GUICtrlSetState("", $GUI_CHECKED)
    GUISetState(@SW_SHOW)


     While 1
		  sleep(100)
	  Wend
  Else
  MsgBox(4096, "ERREUR","Veuillez saisir un chiffre entre 1 et 10",2)



EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf



func create1()

$cnom1 = GUICtrlRead($nom1)
$cprenom1 = GUICtrlRead($prenom1)
$cservice1 = GUICtrlRead($service1)


	if $cservice1 = "Direction" Then
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Direction")
	exit

Else
	if $cservice1 = "Administration" Then
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Administration")
	exit

Else
	if $cservice1 = "Production 1" Then
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 1")
	exit


Else
	if $cservice1 = "Production 2" Then
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 2")
	exit


Else
	if $cservice1 = "Informatique" Then
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)

	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Informatique")
	exit

Else
	MsgBox(64,"ERREUR","Veuillez selectionner un service")


EndIf
EndIf
EndIf
EndIf
EndIf
EndFunc

func create2 ()

$cnom1 = GUICtrlRead($nom1)
$cprenom1 = GUICtrlRead($prenom1)
$cservice1 = GUICtrlRead($service1)
$cnom2 = GUICtrlRead($nom2)
$cprenom2 = GUICtrlRead($prenom2)
$cservice2 = GUICtrlRead($service2)

Select
Case	$cservice1 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Direction")

Case	 $cservice1 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Administration")

Case	 $cservice1 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 1")

Case	 $cservice1 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 2")

Case	 $cservice1 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	$msg = MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Informatique")

Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice2 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Direction")

Case	 $cservice2 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans l'Administration")

Case	 $cservice2 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 1")

Case	 $cservice2 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 2")

Case	 $cservice2 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect
EndFunc

func create3 ()
$cnom1 = GUICtrlRead($nom1)
$cprenom1 = GUICtrlRead($prenom1)
$cservice1 = GUICtrlRead($service1)
$cnom2 = GUICtrlRead($nom2)
$cprenom2 = GUICtrlRead($prenom2)
$cservice2 = GUICtrlRead($service2)
$cnom3 = GUICtrlRead($nom3)
$cprenom3 = GUICtrlRead($prenom3)
$cservice3 = GUICtrlRead($service3)


Select
Case	$cservice1 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Direction")

Case	 $cservice1 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Administration")

Case	 $cservice1 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 1")

Case	 $cservice1 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 2")

Case	 $cservice1 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	$msg = MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Informatique")

Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice2 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Direction")

Case	 $cservice2 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans l'Administration")

Case	 $cservice2 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 1")

Case	 $cservice2 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 2")

Case	 $cservice2 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice3 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Direction")

Case	 $cservice3 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans l'Administration")

Case	 $cservice3 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Production 1")

Case	 $cservice3 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Production 2")

Case	 $cservice3 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect
EndFunc

func create4 ()
$cnom1 = GUICtrlRead($nom1)
$cprenom1 = GUICtrlRead($prenom1)
$cservice1 = GUICtrlRead($service1)
$cnom2 = GUICtrlRead($nom2)
$cprenom2 = GUICtrlRead($prenom2)
$cservice2 = GUICtrlRead($service2)
$cnom3 = GUICtrlRead($nom3)
$cprenom3 = GUICtrlRead($prenom3)
$cservice3 = GUICtrlRead($service3)
$cnom4 = GUICtrlRead($nom4)
$cprenom4 = GUICtrlRead($prenom4)
$cservice4 = GUICtrlRead($service4)

Select
Case	$cservice1 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Direction")

Case	 $cservice1 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Administration")

Case	 $cservice1 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 1")

Case	 $cservice1 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 2")

Case	 $cservice1 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	$msg = MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Informatique")

Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice2 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Direction")

Case	 $cservice2 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans l'Administration")

Case	 $cservice2 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 1")

Case	 $cservice2 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 2")

Case	 $cservice2 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice3 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Direction")

Case	 $cservice3 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans l'Administration")

Case	 $cservice3 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Production 1")

Case	 $cservice3 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Production 2")

Case	 $cservice3 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice4 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Direction")

Case	 $cservice4 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans l'Administration")

Case	 $cservice4 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Production 1")

Case	 $cservice4 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Production 2")

Case	 $cservice4 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect
EndFunc

func create5 ()
	$cnom1 = GUICtrlRead($nom1)
$cprenom1 = GUICtrlRead($prenom1)
$cservice1 = GUICtrlRead($service1)
$cnom2 = GUICtrlRead($nom2)
$cprenom2 = GUICtrlRead($prenom2)
$cservice2 = GUICtrlRead($service2)
$cnom3 = GUICtrlRead($nom3)
$cprenom3 = GUICtrlRead($prenom3)
$cservice3 = GUICtrlRead($service3)
$cnom4 = GUICtrlRead($nom4)
$cprenom4 = GUICtrlRead($prenom4)
$cservice4 = GUICtrlRead($service4)
$cnom5 = GUICtrlRead($nom5)
$cprenom5 = GUICtrlRead($prenom5)
$cservice5 = GUICtrlRead($service5)

Select
Case	$cservice1 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Direction")

Case	 $cservice1 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Administration")

Case	 $cservice1 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 1")

Case	 $cservice1 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 2")

Case	 $cservice1 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	$msg = MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Informatique")

Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice2 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Direction")

Case	 $cservice2 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans l'Administration")

Case	 $cservice2 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 1")

Case	 $cservice2 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 2")

Case	 $cservice2 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice3 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Direction")

Case	 $cservice3 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans l'Administration")

Case	 $cservice3 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Production 1")

Case	 $cservice3 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Production 2")

Case	 $cservice3 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice4 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Direction")

Case	 $cservice4 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans l'Administration")

Case	 $cservice4 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Production 1")

Case	 $cservice4 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Production 2")

Case	 $cservice4 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice5 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Direction")

Case	 $cservice5 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans l'Administration")

Case	 $cservice5 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Production 1")

Case	 $cservice5 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Production 2")

Case	 $cservice5 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect
EndFunc

func create6 ()
		$cnom1 = GUICtrlRead($nom1)
$cprenom1 = GUICtrlRead($prenom1)
$cservice1 = GUICtrlRead($service1)
$cnom2 = GUICtrlRead($nom2)
$cprenom2 = GUICtrlRead($prenom2)
$cservice2 = GUICtrlRead($service2)
$cnom3 = GUICtrlRead($nom3)
$cprenom3 = GUICtrlRead($prenom3)
$cservice3 = GUICtrlRead($service3)
$cnom4 = GUICtrlRead($nom4)
$cprenom4 = GUICtrlRead($prenom4)
$cservice4 = GUICtrlRead($service4)
$cnom5 = GUICtrlRead($nom5)
$cprenom5 = GUICtrlRead($prenom5)
$cservice5 = GUICtrlRead($service5)
$cnom6 = GUICtrlRead($nom6)
$cprenom6 = GUICtrlRead($prenom6)
$cservice6 = GUICtrlRead($service6)

Select
Case	$cservice1 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Direction")

Case	 $cservice1 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Administration")

Case	 $cservice1 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 1")

Case	 $cservice1 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 2")

Case	 $cservice1 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	$msg = MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Informatique")

Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice2 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Direction")

Case	 $cservice2 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans l'Administration")

Case	 $cservice2 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 1")

Case	 $cservice2 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 2")

Case	 $cservice2 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice3 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Direction")

Case	 $cservice3 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans l'Administration")

Case	 $cservice3 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Production 1")

Case	 $cservice3 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Production 2")

Case	 $cservice3 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice4 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Direction")

Case	 $cservice4 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans l'Administration")

Case	 $cservice4 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Production 1")

Case	 $cservice4 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Production 2")

Case	 $cservice4 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice5 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Direction")

Case	 $cservice5 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans l'Administration")

Case	 $cservice5 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Production 1")

Case	 $cservice5 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Production 2")

Case	 $cservice5 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect


Select
Case	 $cservice6 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la Direction")

Case	 $cservice6 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans l'Administration")

Case	 $cservice6 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la Production 1")

Case	 $cservice6 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la Production 2")

Case	 $cservice6 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect
EndFunc

func create7 ()
$cnom1 = GUICtrlRead($nom1)
$cprenom1 = GUICtrlRead($prenom1)
$cservice1 = GUICtrlRead($service1)
$cnom2 = GUICtrlRead($nom2)
$cprenom2 = GUICtrlRead($prenom2)
$cservice2 = GUICtrlRead($service2)
$cnom3 = GUICtrlRead($nom3)
$cprenom3 = GUICtrlRead($prenom3)
$cservice3 = GUICtrlRead($service3)
$cnom4 = GUICtrlRead($nom4)
$cprenom4 = GUICtrlRead($prenom4)
$cservice4 = GUICtrlRead($service4)
$cnom5 = GUICtrlRead($nom5)
$cprenom5 = GUICtrlRead($prenom5)
$cservice5 = GUICtrlRead($service5)
$cnom6 = GUICtrlRead($nom6)
$cprenom6 = GUICtrlRead($prenom6)
$cservice6 = GUICtrlRead($service6)
$cnom7 = GUICtrlRead($nom7)
$cprenom7 = GUICtrlRead($prenom7)
$cservice7 = GUICtrlRead($service7)

Select
Case	$cservice1 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Direction")

Case	 $cservice1 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Administration")

Case	 $cservice1 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 1")

Case	 $cservice1 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 2")

Case	 $cservice1 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	$msg = MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Informatique")

Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice2 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Direction")

Case	 $cservice2 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans l'Administration")

Case	 $cservice2 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 1")

Case	 $cservice2 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 2")

Case	 $cservice2 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice3 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Direction")

Case	 $cservice3 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans l'Administration")

Case	 $cservice3 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Production 1")

Case	 $cservice3 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Production 2")

Case	 $cservice3 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice4 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Direction")

Case	 $cservice4 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans l'Administration")

Case	 $cservice4 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Production 1")

Case	 $cservice4 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Production 2")

Case	 $cservice4 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice5 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Direction")

Case	 $cservice5 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans l'Administration")

Case	 $cservice5 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Production 1")

Case	 $cservice5 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Production 2")

Case	 $cservice5 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect


Select
Case	 $cservice6 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la Direction")

Case	 $cservice6 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans l'Administration")

Case	 $cservice6 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la Production 1")

Case	 $cservice6 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la Production 2")

Case	 $cservice6 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect

Select
Case	 $cservice7 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans la Direction")

Case	 $cservice7 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans l'Administration")

Case	 $cservice7 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans la Production 1")

Case	 $cservice7 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans la Production 2")

Case	 $cservice7 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect
EndFunc

func create8 ()
$cnom1 = GUICtrlRead($nom1)
$cprenom1 = GUICtrlRead($prenom1)
$cservice1 = GUICtrlRead($service1)
$cnom2 = GUICtrlRead($nom2)
$cprenom2 = GUICtrlRead($prenom2)
$cservice2 = GUICtrlRead($service2)
$cnom3 = GUICtrlRead($nom3)
$cprenom3 = GUICtrlRead($prenom3)
$cservice3 = GUICtrlRead($service3)
$cnom4 = GUICtrlRead($nom4)
$cprenom4 = GUICtrlRead($prenom4)
$cservice4 = GUICtrlRead($service4)
$cnom5 = GUICtrlRead($nom5)
$cprenom5 = GUICtrlRead($prenom5)
$cservice5 = GUICtrlRead($service5)
$cnom6 = GUICtrlRead($nom6)
$cprenom6 = GUICtrlRead($prenom6)
$cservice6 = GUICtrlRead($service6)
$cnom7 = GUICtrlRead($nom7)
$cprenom7 = GUICtrlRead($prenom7)
$cservice7 = GUICtrlRead($service7)
$cnom8 = GUICtrlRead($nom8)
$cprenom8 = GUICtrlRead($prenom8)
$cservice8 = GUICtrlRead($service8)

Select
Case	$cservice1 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Direction")

Case	 $cservice1 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Administration")

Case	 $cservice1 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 1")

Case	 $cservice1 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 2")

Case	 $cservice1 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	$msg = MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Informatique")

Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice2 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Direction")

Case	 $cservice2 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans l'Administration")

Case	 $cservice2 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 1")

Case	 $cservice2 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 2")

Case	 $cservice2 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice3 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Direction")

Case	 $cservice3 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans l'Administration")

Case	 $cservice3 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Production 1")

Case	 $cservice3 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Production 2")

Case	 $cservice3 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice4 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Direction")

Case	 $cservice4 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans l'Administration")

Case	 $cservice4 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Production 1")

Case	 $cservice4 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Production 2")

Case	 $cservice4 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice5 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Direction")

Case	 $cservice5 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans l'Administration")

Case	 $cservice5 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Production 1")

Case	 $cservice5 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Production 2")

Case	 $cservice5 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect


Select
Case	 $cservice6 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la Direction")

Case	 $cservice6 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans l'Administration")

Case	 $cservice6 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la Production 1")

Case	 $cservice6 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la Production 2")

Case	 $cservice6 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect

Select
Case	 $cservice7 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans la Direction")

Case	 $cservice7 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans l'Administration")

Case	 $cservice7 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans la Production 1")

Case	 $cservice7 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans la Production 2")

Case	 $cservice7 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect


Select
Case	 $cservice8 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom8&" "&$cnom8&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom8&"."&$cnom8&'"@drinkevol.lan -ln "'&$cnom8&'" -fn "'&$cprenom8&'" -display "'&$cprenom8&" "&$cnom8&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb8\profils\'&$cprenom8&"."&$cnom8&'" -hmdir \\evodeb8\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom8&" "&$cnom8&" a été créé dans la Direction")

Case	 $cservice8 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom8&" "&$cnom8&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom8&"."&$cnom8&'"@drinkevol.lan -ln "'&$cnom8&'" -fn "'&$cprenom8&'" -display "'&$cprenom8&" "&$cnom8&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb8\profils\'&$cprenom8&"."&$cnom8&'" -hmdir \\evodeb8\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom8&" "&$cnom8&" a été créé dans l'Administration")

Case	 $cservice8 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom8&" "&$cnom8&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom8&"."&$cnom8&'"@drinkevol.lan -ln "'&$cnom8&'" -fn "'&$cprenom8&'" -display "'&$cprenom8&" "&$cnom8&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb8\profils\'&$cprenom8&"."&$cnom8&'" -hmdir \\evodeb8\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom8&" "&$cnom8&" a été créé dans la Production 1")

Case	 $cservice8 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom8&" "&$cnom8&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom8&"."&$cnom8&'"@drinkevol.lan -ln "'&$cnom8&'" -fn "'&$cprenom8&'" -display "'&$cprenom8&" "&$cnom8&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb8\profils\'&$cprenom8&"."&$cnom8&'" -hmdir \\evodeb8\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom8&" "&$cnom8&" a été créé dans la Production 2")

Case	 $cservice8 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom8&" "&$cnom8&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom8&"."&$cnom8&'"@drinkevol.lan -ln "'&$cnom8&'" -fn "'&$cprenom8&'" -display "'&$cprenom8&" "&$cnom8&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb8\profils\'&$cprenom8&"."&$cnom8&'" -hmdir \\evodeb8\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom8&" "&$cnom8&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect
EndFunc

func create9 ()
				$cnom1 = GUICtrlRead($nom1)
$cprenom1 = GUICtrlRead($prenom1)
$cservice1 = GUICtrlRead($service1)
$cnom2 = GUICtrlRead($nom2)
$cprenom2 = GUICtrlRead($prenom2)
$cservice2 = GUICtrlRead($service2)
$cnom3 = GUICtrlRead($nom3)
$cprenom3 = GUICtrlRead($prenom3)
$cservice3 = GUICtrlRead($service3)
$cnom4 = GUICtrlRead($nom4)
$cprenom4 = GUICtrlRead($prenom4)
$cservice4 = GUICtrlRead($service4)
$cnom5 = GUICtrlRead($nom5)
$cprenom5 = GUICtrlRead($prenom5)
$cservice5 = GUICtrlRead($service5)
$cnom6 = GUICtrlRead($nom6)
$cprenom6 = GUICtrlRead($prenom6)
$cservice6 = GUICtrlRead($service6)
$cnom7 = GUICtrlRead($nom7)
$cprenom7 = GUICtrlRead($prenom7)
$cservice7 = GUICtrlRead($service7)
$cnom8 = GUICtrlRead($nom8)
$cprenom8 = GUICtrlRead($prenom8)
$cservice8 = GUICtrlRead($service8)
$cnom9 = GUICtrlRead($nom9)
$cprenom9 = GUICtrlRead($prenom9)
$cservice9 = GUICtrlRead($service9)

Select
Case	$cservice1 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Direction")

Case	 $cservice1 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Administration")

Case	 $cservice1 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 1")

Case	 $cservice1 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 2")

Case	 $cservice1 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	$msg = MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Informatique")

Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice2 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Direction")

Case	 $cservice2 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans l'Administration")

Case	 $cservice2 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 1")

Case	 $cservice2 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 2")

Case	 $cservice2 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice3 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Direction")

Case	 $cservice3 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans l'Administration")

Case	 $cservice3 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Production 1")

Case	 $cservice3 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Production 2")

Case	 $cservice3 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice4 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Direction")

Case	 $cservice4 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans l'Administration")

Case	 $cservice4 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Production 1")

Case	 $cservice4 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Production 2")

Case	 $cservice4 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice5 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Direction")

Case	 $cservice5 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans l'Administration")

Case	 $cservice5 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Production 1")

Case	 $cservice5 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Production 2")

Case	 $cservice5 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect


Select
Case	 $cservice6 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la Direction")

Case	 $cservice6 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans l'Administration")

Case	 $cservice6 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la Production 1")

Case	 $cservice6 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la Production 2")

Case	 $cservice6 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect

Select
Case	 $cservice7 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans la Direction")

Case	 $cservice7 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans l'Administration")

Case	 $cservice7 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans la Production 1")

Case	 $cservice7 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans la Production 2")

Case	 $cservice7 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect


Select
Case	 $cservice8 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom8&" "&$cnom8&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom8&"."&$cnom8&'"@drinkevol.lan -ln "'&$cnom8&'" -fn "'&$cprenom8&'" -display "'&$cprenom8&" "&$cnom8&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb8\profils\'&$cprenom8&"."&$cnom8&'" -hmdir \\evodeb8\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom8&" "&$cnom8&" a été créé dans la Direction")

Case	 $cservice8 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom8&" "&$cnom8&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom8&"."&$cnom8&'"@drinkevol.lan -ln "'&$cnom8&'" -fn "'&$cprenom8&'" -display "'&$cprenom8&" "&$cnom8&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb8\profils\'&$cprenom8&"."&$cnom8&'" -hmdir \\evodeb8\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom8&" "&$cnom8&" a été créé dans l'Administration")

Case	 $cservice8 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom8&" "&$cnom8&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom8&"."&$cnom8&'"@drinkevol.lan -ln "'&$cnom8&'" -fn "'&$cprenom8&'" -display "'&$cprenom8&" "&$cnom8&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb8\profils\'&$cprenom8&"."&$cnom8&'" -hmdir \\evodeb8\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom8&" "&$cnom8&" a été créé dans la Production 1")

Case	 $cservice8 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom8&" "&$cnom8&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom8&"."&$cnom8&'"@drinkevol.lan -ln "'&$cnom8&'" -fn "'&$cprenom8&'" -display "'&$cprenom8&" "&$cnom8&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb8\profils\'&$cprenom8&"."&$cnom8&'" -hmdir \\evodeb8\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom8&" "&$cnom8&" a été créé dans la Production 2")

Case	 $cservice8 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom8&" "&$cnom8&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom8&"."&$cnom8&'"@drinkevol.lan -ln "'&$cnom8&'" -fn "'&$cprenom8&'" -display "'&$cprenom8&" "&$cnom8&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb8\profils\'&$cprenom8&"."&$cnom8&'" -hmdir \\evodeb8\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom8&" "&$cnom8&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect


Select
Case	 $cservice9 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom9&" "&$cnom9&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom9&"."&$cnom9&'"@drinkevol.lan -ln "'&$cnom9&'" -fn "'&$cprenom9&'" -display "'&$cprenom9&" "&$cnom9&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb9\profils\'&$cprenom9&"."&$cnom9&'" -hmdir \\evodeb9\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom9&" "&$cnom9&" a été créé dans la Direction")

Case	 $cservice9 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom9&" "&$cnom9&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom9&"."&$cnom9&'"@drinkevol.lan -ln "'&$cnom9&'" -fn "'&$cprenom9&'" -display "'&$cprenom9&" "&$cnom9&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb9\profils\'&$cprenom9&"."&$cnom9&'" -hmdir \\evodeb9\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom9&" "&$cnom9&" a été créé dans l'Administration")

Case	 $cservice9 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom9&" "&$cnom9&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom9&"."&$cnom9&'"@drinkevol.lan -ln "'&$cnom9&'" -fn "'&$cprenom9&'" -display "'&$cprenom9&" "&$cnom9&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb9\profils\'&$cprenom9&"."&$cnom9&'" -hmdir \\evodeb9\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom9&" "&$cnom9&" a été créé dans la Production 1")

Case	 $cservice9 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom9&" "&$cnom9&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom9&"."&$cnom9&'"@drinkevol.lan -ln "'&$cnom9&'" -fn "'&$cprenom9&'" -display "'&$cprenom9&" "&$cnom9&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb9\profils\'&$cprenom9&"."&$cnom9&'" -hmdir \\evodeb9\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom9&" "&$cnom9&" a été créé dans la Production 2")

Case	 $cservice9 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom9&" "&$cnom9&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom9&"."&$cnom9&'"@drinkevol.lan -ln "'&$cnom9&'" -fn "'&$cprenom9&'" -display "'&$cprenom9&" "&$cnom9&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb9\profils\'&$cprenom9&"."&$cnom9&'" -hmdir \\evodeb9\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom9&" "&$cnom9&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect
EndFunc

func create10 ()
				$cnom1 = GUICtrlRead($nom1)
$cprenom1 = GUICtrlRead($prenom1)
$cservice1 = GUICtrlRead($service1)
$cnom2 = GUICtrlRead($nom2)
$cprenom2 = GUICtrlRead($prenom2)
$cservice2 = GUICtrlRead($service2)
$cnom3 = GUICtrlRead($nom3)
$cprenom3 = GUICtrlRead($prenom3)
$cservice3 = GUICtrlRead($service3)
$cnom4 = GUICtrlRead($nom4)
$cprenom4 = GUICtrlRead($prenom4)
$cservice4 = GUICtrlRead($service4)
$cnom5 = GUICtrlRead($nom5)
$cprenom5 = GUICtrlRead($prenom5)
$cservice5 = GUICtrlRead($service5)
$cnom6 = GUICtrlRead($nom6)
$cprenom6 = GUICtrlRead($prenom6)
$cservice6 = GUICtrlRead($service6)
$cnom7 = GUICtrlRead($nom7)
$cprenom7 = GUICtrlRead($prenom7)
$cservice7 = GUICtrlRead($service7)
$cnom8 = GUICtrlRead($nom8)
$cprenom8 = GUICtrlRead($prenom8)
$cservice8 = GUICtrlRead($service8)
$cnom9 = GUICtrlRead($nom9)
$cprenom9 = GUICtrlRead($prenom9)
$cservice9 = GUICtrlRead($service9)
$cnom10 = GUICtrlRead($nom10)
$cprenom10 = GUICtrlRead($prenom10)
$cservice10 = GUICtrlRead($service10)

Select
Case	$cservice1 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Direction")

Case	 $cservice1 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Administration")

Case	 $cservice1 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 1")

Case	 $cservice1 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans la Production 2")

Case	 $cservice1 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom1&" "&$cnom1&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom1&"."&$cnom1&'"@drinkevol.lan -ln "'&$cnom1&'" -fn "'&$cprenom1&'" -display "'&$cprenom1&" "&$cnom1&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb1\profils\'&$cprenom1&"."&$cnom1&'" -hmdir \\evodeb1\tout\ -hmdrv U:', "", @SW_HIDE)
	$msg = MsgBox(64,"Compte Créé",$cprenom1&" "&$cnom1&" a été créé dans l'Informatique")

Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice2 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Direction")

Case	 $cservice2 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans l'Administration")

Case	 $cservice2 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 1")

Case	 $cservice2 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la Production 2")

Case	 $cservice2 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom2&" "&$cnom2&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom2&"."&$cnom2&'"@drinkevol.lan -ln "'&$cnom2&'" -fn "'&$cprenom2&'" -display "'&$cprenom2&" "&$cnom2&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb2\profils\'&$cprenom2&"."&$cnom2&'" -hmdir \\evodeb2\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom2&" "&$cnom2&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice3 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Direction")

Case	 $cservice3 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans l'Administration")

Case	 $cservice3 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Production 1")

Case	 $cservice3 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la Production 2")

Case	 $cservice3 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom3&" "&$cnom3&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom3&"."&$cnom3&'"@drinkevol.lan -ln "'&$cnom3&'" -fn "'&$cprenom3&'" -display "'&$cprenom3&" "&$cnom3&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb3\profils\'&$cprenom3&"."&$cnom3&'" -hmdir \\evodeb3\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom3&" "&$cnom3&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice4 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Direction")

Case	 $cservice4 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans l'Administration")

Case	 $cservice4 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Production 1")

Case	 $cservice4 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la Production 2")

Case	 $cservice4 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom4&" "&$cnom4&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom4&"."&$cnom4&'"@drinkevol.lan -ln "'&$cnom4&'" -fn "'&$cprenom4&'" -display "'&$cprenom4&" "&$cnom4&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb4\profils\'&$cprenom4&"."&$cnom4&'" -hmdir \\evodeb4\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom4&" "&$cnom4&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect



Select
Case	 $cservice5 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Direction")

Case	 $cservice5 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans l'Administration")

Case	 $cservice5 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Production 1")

Case	 $cservice5 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la Production 2")

Case	 $cservice5 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom5&" "&$cnom5&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom5&"."&$cnom5&'"@drinkevol.lan -ln "'&$cnom5&'" -fn "'&$cprenom5&'" -display "'&$cprenom5&" "&$cnom5&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb5\profils\'&$cprenom5&"."&$cnom5&'" -hmdir \\evodeb5\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom5&" "&$cnom5&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect


Select
Case	 $cservice6 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la Direction")

Case	 $cservice6 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans l'Administration")

Case	 $cservice6 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la Production 1")

Case	 $cservice6 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la Production 2")

Case	 $cservice6 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom6&" "&$cnom6&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom6&"."&$cnom6&'"@drinkevol.lan -ln "'&$cnom6&'" -fn "'&$cprenom6&'" -display "'&$cprenom6&" "&$cnom6&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb6\profils\'&$cprenom6&"."&$cnom6&'" -hmdir \\evodeb6\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom6&" "&$cnom6&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect

Select
Case	 $cservice7 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans la Direction")

Case	 $cservice7 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans l'Administration")

Case	 $cservice7 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans la Production 1")

Case	 $cservice7 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans la Production 2")

Case	 $cservice7 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom7&" "&$cnom7&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom7&"."&$cnom7&'"@drinkevol.lan -ln "'&$cnom7&'" -fn "'&$cprenom7&'" -display "'&$cprenom7&" "&$cnom7&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb7\profils\'&$cprenom7&"."&$cnom7&'" -hmdir \\evodeb7\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom7&" "&$cnom7&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect


Select
Case	 $cservice8 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom8&" "&$cnom8&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom8&"."&$cnom8&'"@drinkevol.lan -ln "'&$cnom8&'" -fn "'&$cprenom8&'" -display "'&$cprenom8&" "&$cnom8&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb8\profils\'&$cprenom8&"."&$cnom8&'" -hmdir \\evodeb8\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom8&" "&$cnom8&" a été créé dans la Direction")

Case	 $cservice8 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom8&" "&$cnom8&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom8&"."&$cnom8&'"@drinkevol.lan -ln "'&$cnom8&'" -fn "'&$cprenom8&'" -display "'&$cprenom8&" "&$cnom8&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb8\profils\'&$cprenom8&"."&$cnom8&'" -hmdir \\evodeb8\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom8&" "&$cnom8&" a été créé dans l'Administration")

Case	 $cservice8 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom8&" "&$cnom8&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom8&"."&$cnom8&'"@drinkevol.lan -ln "'&$cnom8&'" -fn "'&$cprenom8&'" -display "'&$cprenom8&" "&$cnom8&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb8\profils\'&$cprenom8&"."&$cnom8&'" -hmdir \\evodeb8\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom8&" "&$cnom8&" a été créé dans la Production 1")

Case	 $cservice8 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom8&" "&$cnom8&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom8&"."&$cnom8&'"@drinkevol.lan -ln "'&$cnom8&'" -fn "'&$cprenom8&'" -display "'&$cprenom8&" "&$cnom8&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb8\profils\'&$cprenom8&"."&$cnom8&'" -hmdir \\evodeb8\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom8&" "&$cnom8&" a été créé dans la Production 2")

Case	 $cservice8 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom8&" "&$cnom8&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom8&"."&$cnom8&'"@drinkevol.lan -ln "'&$cnom8&'" -fn "'&$cprenom8&'" -display "'&$cprenom8&" "&$cnom8&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb8\profils\'&$cprenom8&"."&$cnom8&'" -hmdir \\evodeb8\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom8&" "&$cnom8&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect


Select
Case	 $cservice9 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom9&" "&$cnom9&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom9&"."&$cnom9&'"@drinkevol.lan -ln "'&$cnom9&'" -fn "'&$cprenom9&'" -display "'&$cprenom9&" "&$cnom9&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb9\profils\'&$cprenom9&"."&$cnom9&'" -hmdir \\evodeb9\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom9&" "&$cnom9&" a été créé dans la Direction")

Case	 $cservice9 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom9&" "&$cnom9&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom9&"."&$cnom9&'"@drinkevol.lan -ln "'&$cnom9&'" -fn "'&$cprenom9&'" -display "'&$cprenom9&" "&$cnom9&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb9\profils\'&$cprenom9&"."&$cnom9&'" -hmdir \\evodeb9\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom9&" "&$cnom9&" a été créé dans l'Administration")

Case	 $cservice9 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom9&" "&$cnom9&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom9&"."&$cnom9&'"@drinkevol.lan -ln "'&$cnom9&'" -fn "'&$cprenom9&'" -display "'&$cprenom9&" "&$cnom9&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb9\profils\'&$cprenom9&"."&$cnom9&'" -hmdir \\evodeb9\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom9&" "&$cnom9&" a été créé dans la Production 1")

Case	 $cservice9 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom9&" "&$cnom9&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom9&"."&$cnom9&'"@drinkevol.lan -ln "'&$cnom9&'" -fn "'&$cprenom9&'" -display "'&$cprenom9&" "&$cnom9&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb9\profils\'&$cprenom9&"."&$cnom9&'" -hmdir \\evodeb9\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom9&" "&$cnom9&" a été créé dans la Production 2")

Case	 $cservice9 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom9&" "&$cnom9&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom9&"."&$cnom9&'"@drinkevol.lan -ln "'&$cnom9&'" -fn "'&$cprenom9&'" -display "'&$cprenom9&" "&$cnom9&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb9\profils\'&$cprenom9&"."&$cnom9&'" -hmdir \\evodeb9\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom9&" "&$cnom9&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect

Select
Case	 $cservice10 = "Direction"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom10&" "&$cnom10&'",ou=Utilisateurs,ou="Service Direction",dc=drinkevol,dc=lan -upn "'&$cprenom10&"."&$cnom10&'"@drinkevol.lan -ln "'&$cnom10&'" -fn "'&$cprenom10&'" -display "'&$cprenom10&" "&$cnom10&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb10\profils\'&$cprenom10&"."&$cnom10&'" -hmdir \\evodeb10\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom10&" "&$cnom10&" a été créé dans la Direction")

Case	 $cservice10 = "Administration"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom10&" "&$cnom10&'",ou=Utilisateurs,ou="Service Administratif",dc=drinkevol,dc=lan -upn "'&$cprenom10&"."&$cnom10&'"@drinkevol.lan -ln "'&$cnom10&'" -fn "'&$cprenom10&'" -display "'&$cprenom10&" "&$cnom10&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb10\profils\'&$cprenom10&"."&$cnom10&'" -hmdir \\evodeb10\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom10&" "&$cnom10&" a été créé dans l'Administration")

Case	 $cservice10 = "Production 1"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom10&" "&$cnom10&'",ou=Utilisateurs,ou="Production 1",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom10&"."&$cnom10&'"@drinkevol.lan -ln "'&$cnom10&'" -fn "'&$cprenom10&'" -display "'&$cprenom10&" "&$cnom10&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb10\profils\'&$cprenom10&"."&$cnom10&'" -hmdir \\evodeb10\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom10&" "&$cnom10&" a été créé dans la Production 1")

Case	 $cservice10 = "Production 2"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom10&" "&$cnom10&'",ou=Utilisateurs,ou="Production 2",ou="Service Production",dc=drinkevol,dc=lan -upn "'&$cprenom10&"."&$cnom10&'"@drinkevol.lan -ln "'&$cnom10&'" -fn "'&$cprenom10&'" -display "'&$cprenom10&" "&$cnom10&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb10\profils\'&$cprenom10&"."&$cnom10&'" -hmdir \\evodeb10\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom10&" "&$cnom10&" a été créé dans la Production 2")

Case	 $cservice10 = "Informatique"
	Run(@ComSpec & " /c " & 'dsadd user cn="'&$cprenom10&" "&$cnom10&'",ou=Utilisateurs,ou="Service Informatique",dc=drinkevol,dc=lan -upn "'&$cprenom10&"."&$cnom10&'"@drinkevol.lan -ln "'&$cnom10&'" -fn "'&$cprenom10&'" -display "'&$cprenom10&" "&$cnom10&'" -pwd P@ssw0rd -mustchpwd yes -profile "\\evodeb10\profils\'&$cprenom10&"."&$cnom10&'" -hmdir \\evodeb10\tout\ -hmdrv U:', "", @SW_HIDE)
	MsgBox(64,"Compte Créé",$cprenom10&" "&$cnom10&" a été créé dans la l'Informatique")
Case Else
        MsgBox(0, "", "Veuillez saisir un service")
EndSelect
EndFunc

Func CLOSEClicked()
      Exit
EndFunc