ActiveMISC --- TextMap Interface

Methods

• Set([in] BSTR key, [in] BSTR value);
• KeyExist([in] BSTR key, [out,retval] VARIANT_BOOL *yes);
• Lookup([in] BSTR key, [out,retval] BSTR * value);
• RemoveKey([in] BSTR key);
• GetSize([out,retval] long * n);
• CreateGUID([out,retval] BSTR * guid);
• LoadMap([in] BSTR path, [out,retval] long * nItems);
• SaveMap([in] BSTR path, [out,retval] VARIANT_BOOL * ok);
• Clear();
• CreateTextArray([in,defaultvalue("=")] BSTR keyValueSeparator, [out,retval] IDispatch ** array);

Sample Usage: Create 100 Unique 5-digits Random Numbers

Screenshot

var ac=new ActiveXObject("ActiveMISC.Console");
var map=new ActiveXObject("ActiveMISC.TextMap");
ac.Print("Create 100 Unique Random Numbers.\n");
while(map.GetSize()<100)
    {
    var r=parseInt(Math.random() * 100000);
    var rs=r.toString();
    if(rs.length!=5)
        continue;
    if(!map.KeyExist(rs))
        map.Set(rs, "");
    }
var ary=map.CreateTextArray("");
var n=ary.GetSize();
ac.Print("Here is the " + n.toString() + " random numbers:\n");
for(var i=0; i<; i++)
    {
    var s=ary.GetAt(i);
    ac.Print(s);
    ac.Print("\n");
    }