loading external multdimensional array from a .txt file

how can i display arrays in vbscript from an external txt file (.txt)
assuming the data on the txt file looks like this

houseno streetname surburb
23 James westside
1 street somewhere
vbsnoobAsked:
Who is Participating?

Improve company productivity with a Business Account.Sign Up

x
 
TakedaTConnect With a Mentor Commented:
Something like this?

I always hated working with dynamic multidimensional arrays.  Not being able to redim the first dimension just makes it annoying.  I usually just go with 2 one dimensional arrays.
Const forReading = 1, forWriting = 2, forAppending = 8
Dim objFSO : Set objFSO = CreateObject("Scripting.FileSystemObject")
Dim arrAddresses()
strAddressFile = "address.txt"
 
Set readAddressFile = objFSO.OpenTextFile(strAddressFile,forReading)
 
i=0
Do while not readAddressFile.AtEndOfStream
	strLine = readAddressFile.ReadLine
	arrLine = split(strLine," ")
	ReDim preserve arrAddresses(2,i)
	arrAddresses(0,i) = arrLine(0)
	arrAddresses(1,i) = arrLine(1)
	arrAddresses(2,i) = arrLine(2)
	strAddresses = strAddresses & vbCrLf & arrAddresses(0,i) & vbTab & arrAddresses(1,i) & vbTab & arrAddresses(2,i)
	i=i+1
Loop
 
MsgBox strAddresses

Open in new window

0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.