Lists in VBScript

Question

I'm trying to create a simple list in a VBscript, but I'm unable to find something similar. Basically, I'm working on Active directory, and I need to get all the groups a user is a member of for all the users within a domain. Now, every user might be a member of a different number of groups, so I plan to use a dictionary, with the key being the SAMID for the user, and the value being a list of all the groups he/she is a member of. I can do this with a static array, but then I have to declare a random large size for the array which is not nice. What I would ideally like to do is have a python-like list, where I can simple do something like myList.Add and don't have to worry about sizing. I tried using System.Collection.ArrayList, but I get an error when I run it: ``` PS C:	mp> cscript.exe .\foo.vbs Microsoft (R) Windows Script Host Version 5.8 Copyright (C) Microsoft Corporation. All rights reserved. C:	mp\foo.vbs(1, 1) (null): 0x80131700 ``` how can I accomplish this?

Accepted Answer

```
Set dic = CreateObject("Scripting.Dictionary")

dic.Add "Item1", ""
dic.Add "Item2", ""
dic.Add "Item3", ""
```

Lists in VBScript

Solution

Problem