|
|
Post by hartnell on Feb 4, 2007 20:58:28 GMT -5
Since VBScript has no DATA or READ, it would be nice to have an easy to use replacement for filling arrays.
-hartnell
|
|
|
|
Post by Guilect on Feb 5, 2007 7:16:02 GMT -5
I have used this:
2 dimensional array example
Dim Map(10, 10)
Dim s(10)
Dim x , y
s(1) = "1111111111"
s(2) = "1000000001"
s(3) = "1034000001"
s(4) = "1043000001"
s(5) = "1000004101"
s(6) = "1000001401"
s(7) = "1003100001"
s(8) = "1001300001"
s(9) = "1000002001"
s(10) = "1111111111"
For y = 1 To 10
For x = 1 To 10
Map(x, y) = CInt(Mid(s(y), x, 1))
Next
Next
|
|
|
|
Post by Guilect on Feb 5, 2007 8:19:20 GMT -5
For single array
option explicit
dim a
a = Array ("item1","item2","3rd item",323)
system.debugprint a(2)
|
|
