multidim associativ array r/o?!

[Leif Neland]

Jeg laver et associativt multidimensionalt array, men kan ikke senere ændre
de enkelte elementer.
Arrayet har et varenr som nøgle, og værien er et array med to elementer.
F.ex.
best("kattemad")=array(12,3)
best("hundemad")=array(2,5)
Jeg kan hente de enkelte værdier ud:
response.write best("kattemad")(0) 'resultat 12
Men jeg kan ikke ændre en "celle" best("kattemad")(0)=10 ændrer ikke noget.
Jeg skal ændre hele arrayet, for der sker noget.
-----
SET best = CreateObject("Scripting.Dictionary")
'for hver linie, del den efter mellemrum
varenr=alin(0) 'første felt
antal=alin(uBound(alin)-6) '6.sidste felt

best.add varenr,array ( antal ,-1) ' her tilføjes en række
'Disse ændringer skal egentlig foretages senere, men jeg tester at ændre dem
nu for eksemplets skyld
best(varenr)=array(2,6) 'Dette ændrer
best(varenr)(1)=3 'Dette ændrer ikke
best.item(varenr)(1)=7 'Dette ændrer ikke
response.write best(varenr)(1) ' resultat 6
next
-----
Jeg er kommet udenom problemet ved at lave
best(varenr)=array(best(varenr)(0),best_antal), men det er da lidt rodet.

Leif

ps:
Det, der skal ske er, at jeg først parser en tekst (en ordrebekræftelse) i
varenr og leveret antal,
derefter looper over en sql-tabel med det, vi ønskede at bestille, for hver
record slår varenummer op i det associative array, skriver det ønskede antal
i best(varenr)(1)

Til sidst skal loopes over det associative array, og udskrives de varer,
hvor der er forskel imellem ønsket og leveret antal, hvor
best(varenr)(0)<>best(varenr)(1)