Creating a ComboBox for AD Users

[jazzyjeff]

Hello,

I am trying to create a combo box for a list of AD users that are in my domain. I am having some problems getting the code to work though, and I wondered if someone could help me out.

Here is what I have:

#include <AD.au3>
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
; Open Connection to the Active Directory
_AD_Open()
$fUsers = _AD_GetObjectsInOU("OU=Students,OU=Users,DC=domain,DC=com","(objectclass=user)")
Global $fUsers, $tUsers
$Form1 = GUICreate("Form1", 202, 59, 192, 124)
$Combo1 = GUICtrlCreateCombo("Please wait...", 16, 16, 145, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
For $i = 1 To $fUsers[0]
$Combo1 = GUICtrlCreateCombo($fUsers[$i], 16, 16, 145, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
Next

#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
EndSwitch
WEnd
; Close Connection to the Active Directory
_AD_Close()

I guess the problem is is my For To Loop.

If anyone can offer advise, it would be much appreciated.

Thanks,

Jeff

[water]

How about this one?

#include <AD.au3>
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
 
Global $fUsers, $tUsers
$Form1 = GUICreate("Form1", 202, 59, 192, 124)
$Combo1 = GUICtrlCreateCombo("Please wait ...", 16, 16, 145, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
; Open Connection to the Active Directory
_AD_Open()
$fUsers = _AD_GetObjectsInOU("OU=Students,OU=Users,DC=domain,DC=com","(objectclass=user)")
$sTemp = _ArrayToString($fUsers)
GUICtrlSetData($Combo1, "|" & $sTemp, $fUsers[0])
 
While 1
  $nMsg = GUIGetMsg()
  Switch $nMsg
    Case $GUI_EVENT_CLOSE
     Exit
  EndSwitch
WEnd
; Close Connection to the Active Directory
_AD_Close()

Edited October 28, 2011 by water

[jazzyjeff]

_ArrayToString!

Thank you, thank you!

That worked great.

[water]