Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
?
Solved

loading external multdimensional array from a .txt file

Posted on 2009-05-03
2
Medium Priority
?
373 Views
Last Modified: 2012-05-06
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
0
Comment
Question by:vbsnoob
1 Comment
 
LVL 10

Accepted Solution

by:
TakedaT earned 1000 total points
ID: 24293062
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

Featured Post

Concerto's Cloud Advisory Services

Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Script to copy or move mouse-selected collection of files plus targets referenced by shortcuts (.lnk) The purpose of this article is to help illuminate the real challenges and options available (where they may exist) for utilizing simple scriptin…
Hello again, all.  For those of you that have been following along, you'll know that this is my third article on this topic (though it is not Part III).  This article is sort of remedial, and probably the topic with which I should have started the s…
When cloud platforms entered the scene, users and companies jumped on board to take advantage of the many benefits, like the ability to work and connect with company information from various locations. What many didn't foresee was the increased risk…
Whether it be Exchange Server Crash Issues, Dirty Shutdown Errors or Failed to mount error, Stellar Phoenix Mailbox Exchange Recovery has always got your back. With the help of its easy to understand user interface and 3 simple steps recovery proced…
Suggested Courses

572 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question