Demonstration script that deletes a specific key-item pair from a Script Runtime Dictionary. Script must be run on the local computer.
Set oDictionary = CreateObject("Scripting.Dictionary")
oDictionary.Add "Printer 1", "Printing"
oDictionary.Add "Printer 2", "Offline"
oDictionary.Add "Printer 3", "Printing"
keysCol = oDictionary.Keys
Print "First run: "
For Each keyStr in keysCol
Print keyStr
Next
oDictionary.Remove("Printer 2")
keysCol= oDictionary.Keys
Print "Second run: "
For Each keyStrin keysCol
Print keyStr
Next
Posted in Dictionary Objects

daniva




Recent Comments