If you want quick easy access to bits of info.. stuff them in an Object… it works like a Map… and can store strings, ints, functions and more.

var data = {};
data.user = ‘David’;
data.pass = ’secret’;
data.age = 37;
data.spillTheBeans = function(){return ‘User:’ + this.user + ‘ Pass:’ + this.pass + ‘ Age:’ + this.age};

If you just want to simplify the “Map” to have get/set methods you can wrap it up into a simple class…

function MapThing(){
this.data = {};
this.get = function(key){
return this.data[key];
};
this.set = function(key, value){
this.data[key] = value;
};
this.length = function(){
var count = 0;
for(var x in this.data){
count++;
}
return count;
};
}

a=(FormatDateTime(Date(),1))
length=len(a)

pos=instr (a, “,”)
l=pos+4

one=left(a,l)

pos1=instrrev(a, “,”)
l1=(length-pos1)+3
two=right(a,l1)

msgbox one & ” ” & two

Another version:

dim d(0), arr(40), farr(26), fa(26)

a=(FormatDateTime(Date(),1))

length=len(a)
p=length

‘PUTTING STRING a INTO ARRAY arr
for i=1 to length
t=left(a,1)
a=right(a,length-i)
arr(i)=t
next

‘EXTRACTING UPTILL 4 CHARACTERS AFTER FIRST COMA FOR EXAMPLE Thursday, Jan
for i=1 to length
if arr(i) = “,” then
length = i+4
exit for
end if
next

for i=1 to length
fa(i)=arr(i)
next

‘NOW f1 CONTAINS FOR EXAMPLE Thursday, Jan
f1=join(fa)

‘EXTRACTING LAST 8 CHARACTERS FROM ARRAY arr FOR EXAMPLE 08, 2009
for e=1 to 8
farr(e)=arr(p)
p=p-1
next

xx=join (farr)
final_str=trim(f1) & “, ” & trim(strreverse(xx))
msgbox final_str