Eine sehr gut Alternative zu einem VBScript Array ist das VBScript Object Dictionary.

Das Dictionary Object ist wesentlich komfortabler als Arrays, der Komfort geht allerdings ein wenig auf die Performance der Skripts, d.h. die Durchlaufzeit bei Verwendung des Dictionary Objects ist meist länger als beim Einsatz von Arrays, dies ist aber natürlich davon abhängig wie das Array implementiert wird.

Für jedes Dictionary müssen wir ein Objekt laden:

Set dictionary = CreateObject("Scripting.Dictionary")

schreiben

in das erzeugte Objekt können wir jetzt jederzeit neue Einträge schreiben, ohne uns um die Grösse zu kümmern:

dictionary.Item(1) = "eintrag ID 1"

auslesen

wscript.echo dictionary.Item(1)

suchen - existiert

if dictionary.Exists(1) then

wscript.echo "exists"

else

wscript.echo "do not exits"

end if

suchen und falls der Eintrag existiert ändern

if dictionary.Exists(1) then  

if dictionary.Item(1) > 2 then

else  'wscript.echo dictionary.Item(mid(lk,3,5) & mid(lk,12,5)) & "ist kleiner" & mid(lk,17,14)  

dictionary.Item(mid(lk,3,5) & mid(lk,12,5)) = mid(lk,17,14)  

end if

else dictionary.Add mid(lk,3,5) & mid(lk,12,5), mid(lk,17,14)

end if

alle Einträge auslesen

items=dictionary.items 

for i = 0 to dictionary.count    

 wscript.echo items(i)

next