Scriptbox - Find your Script, VBScript VBScripts VB-Script VB-Scripts Scripting

Loading

:: { Category } ::

0-9


	Search Options: Delete Duplicate Items From an Array Content of Delete Duplicate Items From an Array.vbs MD5 Hash: CDDA2659D962D781266AA853279969BB
	Set objDictionary = CreateObject("Scripting.Dictionary") arrItems = Array("a","b","b","c","c","c","d","e","e","e") For Each strItem in arrItems If Not objDictionary.Exists(strItem) Then objDictionary.Add strItem, strItem End If Next intItems = objDictionary.Count - 1 ReDim arrItems(intItems) i = 0 For Each strKey in objDictionary.Keys arrItems(i) = strKey i = i + 1 Next For Each strItem in arrItems Wscript.Echo strItem Next

© 2008 - 2013 Boris Toll :: Scripts available: 6.481 :: :: scriptbox.toll.at :: :: powered by www.toll.at ::