Using VBScript to query AD for all OU's, and then have them show in a drop down box in an hta page

I am using an .hta page to simplify account creation in AD. As soon as the .hta page loads, i want the drop down box to query and list all OU's in AD so that we can choose which OU to put our users in when we create them. Or it could simply list all the main OU's, then when you click on one of them, it will open another drop down box that lists all the OU's under the one you just selected, and so on and so forth.  Does anybody have a script that can do this that I can use to integrate into my application?Start Free Trial