Always use compare mode so that you won't run into these issues Sent from my iPhone
On Jul 3, 2011, at 3:36 AM, Shalabh Dixit <[email protected]> wrote: > Thanks all for your help..!! > I found the mistake yesterday itself and yes the mistake was simple, keys > were not unique.... :) > > > Regards > Shalabh Dixit > > > > On Sun, Jul 3, 2011 at 1:58 AM, Parke Kuntz <[email protected]> wrote: > Set objDict = CreateObject("Scripting.Dictionary") > For tb = 0 To UBound(ARR1) > if objDict.exists(arr1(tb)) then > objDict(arr1(tb)) = objDict(arr1(tb)) + 1 > else > objDict(arr1(tb)) = 1 > end if > Next > You can print out all keys were the value is greater than one and easily see > your duplicate keys. > > > On Sat, Jul 2, 2011 at 3:17 PM, Roman Zilber <[email protected]> wrote: > maybe the the values in ARR1 are not not unique? > > > On Sat, Jul 2, 2011 at 6:20 AM, Shalabh Dixit <[email protected]> wrote: > Hi All, > > I'm facing one strange problem. > > I'm storing the two arrays ARR1 and ARR2 into the DICTIONARY as keys > and values respectively. i.e.I'm storing ARR1 as KEYS and ARR2 as > ITEMS > > both arrays contains same number of items i.e. 75 > > Set objDict = CreateObject("Scripting.Dictionary") > For tb = 0 To UBound(ARR1) > objDict.Add ARR1(tb),ARR2(tb) > Next > > Now the dictionary is just storing 45 elements only of both the arrays > instead of complete 75. > > Thanks in anticipation. > > -- > You received this message because you are subscribed to the Google > "QTP - HP Quick Test Professional - Automated Software Testing" > group. > To post to this group, send email to [email protected] > To unsubscribe from this group, send email to > [email protected] > For more options, visit this group at > http://groups.google.com/group/MercuryQTP?hl=en > > -- > You received this message because you are subscribed to the Google > "QTP - HP Quick Test Professional - Automated Software Testing" > group. > To post to this group, send email to [email protected] > To unsubscribe from this group, send email to > [email protected] > For more options, visit this group at > http://groups.google.com/group/MercuryQTP?hl=en > > > > -- > Parke > Cell: 770-842-0121 > > -- > You received this message because you are subscribed to the Google > "QTP - HP Quick Test Professional - Automated Software Testing" > group. > To post to this group, send email to [email protected] > To unsubscribe from this group, send email to > [email protected] > For more options, visit this group at > http://groups.google.com/group/MercuryQTP?hl=en > > -- > You received this message because you are subscribed to the Google > "QTP - HP Quick Test Professional - Automated Software Testing" > group. > To post to this group, send email to [email protected] > To unsubscribe from this group, send email to > [email protected] > For more options, visit this group at > http://groups.google.com/group/MercuryQTP?hl=en -- You received this message because you are subscribed to the Google "QTP - HP Quick Test Professional - Automated Software Testing" group. To post to this group, send email to [email protected] To unsubscribe from this group, send email to [email protected] For more options, visit this group at http://groups.google.com/group/MercuryQTP?hl=en
