Visual Basic :: Loading Data From A Text File Into An Array

Loading Array From Text File
Hi,

I've written this code to load an array from a text file. It all goes through OK until I check the array contents and it's empty. Can anyone help?

Code:
Sub readCustFiles()
'************************************************************************
' Read the Customer File
'************************************************************************

'On Error GoTo ErrorHandler
Dim intColumn As Integer 'default 0
Dim fileName As String
Dim intRowIndex As Integer 'how many customers in array

ReDim arrCustomers(0, 4) 'at least one entry

fileName = "" & App.Path & "Cust.txt"
Open fileName For Input As #1

'Read the values from the text file into the array
'arrCustomer(Index, Name)
'arrCustomer(Index, Address)
'arrCustomer(Index, Phone)
'arrCustomer(Index, Fax)
'arrCustomer(Index, BoatName)

Do While Not EOF(1) 'loop until end of file
intRowIndex = UBound(arrCustomers, 1)

For intColumn = LBound(arrCustomers, 2) To UBound(arrCustomers, 2)
'return the Lower and Upper Bound of the SECOND dimension of the array
Input #1, arrCustomers(intRowIndex, intColumn)
'Load value into the array by referencing the row and the column
MsgBox intRowIndex & ", " & intColumn

Next intColumn

're-declare the array variables
'intRowIndex = UBound(arrCustomers, 1)
ReDim arrCustomers(intRowIndex + 1, 4) 'at least one entry
Loop
Close #1 'Close file

MsgBox "Check" & vbCrLf & arrCustomers(0, 0)
Exit Sub

ErrorHandler:
Select Case Err.Number
Case 53 'File Not Found
MsgBox "A File Required By The Safe Haven Marina Program" & vbCrLf & _
"Is Missing. Please Ensure That All Text Files Are In The " & vbCrLf & _
"Marina Directory On the Computers Hard Drive", vbCritical, "Safe Haven Marina"
'Unload frmMain
Exit Sub
Case Else
MsgBox "An Unexpected Rrror Has Occurred" & vbCrLf & "Please Contact JOANNE WATKINS", _
vbCritical, "Safe Haven Marina"
'Unload frmMain
Exit Sub
End Select
End Sub

Loading Lines Of A Text File Into An Array
ok, what i need to do is load each line of a text file, into an array. for example, the first line of text in the text file would be loaded into def(1) and the second into def(2) and so on. also for every line loaded, i need defsloaded = defsloaded + 1. can someone show me how to do this? thanks!

Loading Data From Random Access File Into An Array
Hi there, I'm working on a Client Address book, but I'm having trouble loading the data from the file back into the array. Below is a cut down version of the program. Any assistance on this problem would be greatly appreciated.

Also is it possible to make the array dynamic? If so how would I go about it?

Many thanks in advance, Scott.

Loading Listbox With Text File Data
I have this code:

Code:
Private Sub Form_Load()
If Left(Trim(Text1.Text), 1) = "[" Then
Text2.Text = vbNullString
Dim ln As String
Dim ff As Integer: ff = FreeFile
Open App.Path & "data.txt" For Input As #ff
Do Until EOF(ff)
Line Input #ff, ln

Do Until EOF(ff)
Line Input #ff, ln
If Left(Trim(ln), 1) = "[" Then
LookupList.Data = ln
Else

Exit Sub
End If
Loop

Loop
Close #ff
End If
End Sub

The idea is to load the lines of data marked with [] and list it alphabetically in Listbox1. The idea is that I can then click a row in Listbox1 and it will display all the entries under its category (defined by []) in Listbox2.

Text file has data like this:

[xxx]
yyy
zzz
aaa
bbb
[yyy]
ccc
ddd
eee
fff
[zzz]
ggg
hhh
iii

Any ideas how I can alter my code to achieve this? And also to display the selected item's data in Listbox1 in Listbox2?

Thanks,

Jon

Loading Data From Text File To Combo Box
I have text box, where the user enters data that is written to
a text file and I need to display that data in a combo box.
How do I get the data from the text file to the combo box.

Loading Names Of Files Into A Data Base Or Text File
I need to put to gether a program for mangeing data at work. I need to know how to look in a directory and load the names of the files in it to either text file or preferbly a data base file. I need the code and explicet instructions on how to use the code(I'm still trying to get used to VB)

How Do I Input Data From A Text File Into Array?
Hi I'm stuck on a project using VB 2005 express edition. I'm having trouble reading in data into my code from a Text File.
I'm using an openFileDialog so the user can select a file to open. The opened file will contain 3 columns and an unknown number of rows. I want to read the data from the file calling the first colum x, second y, and third z. I then want to plot a graph of the raw data (x,y). Before performing simple mathematical equations on each row of x,y and z and sum the answers.
Unfortunately so far I can't get past inputing the data into the program, so I'd be very grateful for any help you can give me.

Code:
Public Class Form1
Dim data(i, 2) As String
Dim g, filename As String
Dim i, numlines, lines, As Integer
Dim x(i), y(i), s(i) As Double

Private Sub OpenFileBtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _
Handles OpenFileBtn.Click
If OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
'opens file of users choice if cancel not pressed
FileOpen(1, OpenFileDialog1.FileName, OpenMode.Input)
lines = getNumLines(1)
FileClose(1)

FileOpen(1, OpenFileDialog1.FileName, OpenMode.Input)
ReDim data(lines, 2)
For i = 0 To i = lines - 1

Input(1, data(i, 0))
Input(1, data(i, 1))
Input(1, data(i, 2))
x(i) = Val(data(i, 0))
y(i) = Val(data(i, 1))
s(i) = Val(data(i, 2))
Graph1.Plotxy(x(i), y(i))
Next i
FileClose(1)
End If
End Sub

Public Function getNumLines(ByVal fileName As Integer) As Integer

Dim numLines As Integer

numLines = 0

While Not (EOF(1))
numLines = numLines + 1 'counts number of rows in the file
Input(1, g)
End While

Return numLines 'return the number of lines found

End Function
End Class

Extracting Data From Text File To Array
Hey everyone,

I have a text file which my program will load which is pipe deliminated on each line and i need some way of extracting this data whether it be a 3d array or otherwise. The text file is formatted like this (ElementName,FormID,ElementID,Type)...

Address1|0|1|AddressType1
Address2|0|2|AddressType2

I would like the data from each line to be inputted into the program so it can be used within the code. A 3D array may work for this e.g. arrayName(0)(4) would produce "AddressType1" and arrayName(1)(2) would produce "0". In PHP "Explode" can be used to achieve this but i don't know how in VB. :/

Thanks a lot,
Matthew

Writing Text File Data To An Array
I have a tab-delimited text file with each row having 20 "fields" (seperated by the aforementioned tab). The number of rows in the file varies. I want every data element to be written to an array that is dimensioned
UploadArray(20, j) where j represents the row in the text file. How can I do this?

Thanks~

Reading Data From A Text File - How Do I Add It To An Array?
I have a text file containing a maximum of 200 elements, ending with ZZZ as a sentinel.
A sample is:
Dog
Cat
Man
Bill
...
Bird
ZZZ

So How do I add this to an array declared as
Dim TextArray (1 to 200) As String
Thanks for your assistance

Words of Wisdom:
"The Internet is on Computers now!"
- Homer Simpson

Edited by - Keoccy on 11/7/2004 10:56:11 PM

Putting Data From An Array Into A Text File
hi
thanks to metallisoft for the previous question

i have an array filled with data (strings and numbers). i would like to get the information from my array and store (i.e. create) a text file on my pocket pc with the data from the array. Im not to worried about the state at which data is stored (spacing and positioning etc.) initially, just more concerned with creating the txt file and inserting the data from the array. My array is called dataArray() and has 20 elements and i would like to store the data in a file called "library.txt"

Any help would be appreciated

Trouble With Inputting Array Data From Text File
VB Code:
For cnt0 = 1 To numofscores ' numofscores is the total number of scores Open App.Path & "scores.txt" For Input As #1 Input #1, score(cnt0) 'score is setup like this in the file " 1234 & vbtab & Name" List1.AddItem score(cnt0) Close #1Next cnt0

when i run this segment of code only the number ( in this case 1234 is returned and displayed in the listbox. also when there is more than one line of data in the text file, the list box displays the first score(only the number), twice on two different lines in the list box.

what i want it to do is display the entire score(1) on one line and the entire score(2) on another(in the list box) and so on.

Could someone please tell me what i am doing wrong

Save Array Data As A Text File Of 65 Characters Lines
Um Ubound(M) 'where M() is an array of bytes.
To save content of M as a text file where lines are 34 characters each(the last one will be 34 chrs or less), I can write the following code:

Open MyFile For Binary As #1
rew = StrConv(M, vbUnicode)
For i = 0 To (Um + 1) 34 - 1
Put #1, , Mid(rew, i * 34 + 1, 34) & _ vbCrLf
Next i
Put #1, , Right(rew, Len(rew) Mod 34)
Close #1

AY mentionned the CopyMemory function but I can't make it work if original data is contained in an array

thank you

Loading Data Into A 2d Array
I have a 2d array and I want to load different data values into each dimension of the array but not sure how??e.g.

Dim i as integer
i = 0
redim array (integer, integer)

for i = integer to integer

array(i,?) = 'date or integer'

I only want to fill the dimension where the 'i' is, how would I do this?!!!

thank you

Alex

*help*Loading Text In An Array
I have a code to load a textfile into an array but i dont know what im doing wrong. studied some examples on the board, but because of the fact that im using vb just for me second day i dont know what they mean =]
here is my code:

---------------------------------------------------------------------
Dim a As String
Dim s() As String
Dim i As Integer
i = 1

Open "e: est.txt" For Input As #1
Do Until EOF(1)
Input #1, a
s(i) = a
i = i + 1
Loop
Close #1
MsgBox s(2)
---------------------------------------------------------------------
the error it gives me is:
run time error "9"
"subscript out of range"
---------------------------------------------------------------------

already thanks, d-deamon

Loading Data From A Access Into An Array
I have the database, importing into Visual Basic 6.0, and can search through all the fields, but i have to use the data bar, when i want the data bar invisible

Loading Data From Access Into An Array In Excel
I was wondering if there is a way to load data into an array from access like a record.

I have found after lookign for ages, the following code, which i have changed to suit what i want

[vb]
Code:
Sub ADOImportFromAccessTable(DBFullName As String, TableName As String, TargetRange As Range)
Dim cn As ADODB.Connection, rs As ADODB.Recordset, intColIndex As Integer
Set TargetRange = TargetRange.Cells(1, 1)
' open the database
Set cn = New ADODB.Connection
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & DBFullName & ";"
Set rs = New ADODB.Recordset
With rs

.Open "SELECT * FROM " & TableName & " WHERE [Insurance Provider] = True", cn, , , adCmdText
'filter for insurance check

'loop to display field names, not really needed
For intColIndex = 0 To rs.Fields.Count - 1 ' the field names
TargetRange.Offset(0, intColIndex).Value = rs.Fields(intColIndex).Name
Next

'shows the record in in one go
TargetRange.Offset(1, 0).CopyFromRecordset rs ' the recordset data

End With
rs.Close
Set rs = Nothing
cn.Close
Set cn = Nothing
End Sub

I figured out from the example of this i found somewhere, not sure where, how to filter out the records, thats the first step, although i don't want the data to be on the sheet, just into a array, variable whatever, also i don't want all the fields, only selected fields

I'm rarther confused about this as i've tried the pivot table thing, which to be honest confused me, the query method, which does return only the data i want, but can you use that in code? plus can you use that to load hte data into array?

I'd prefer to use the query as i'm assuming i don't need to reference external files, i'm pretty sure the ADO libaries will be on a computer if access and excel are on them, but still i'd prefer not to do that.

And if your wondering, the reason i'm looking for this, is that i have a combo box that selects from a list of possible names, when the user selects a name it will load the address into the spreadsheet into the right cells, of course none of this works yet. i'm hoping there is a way to do this without having to load hte data onto a sheet

Although if it has to be done i guess it has to be done

sorry if this is unclear, if anyone is willing to help me i'll try to explain myself better

Array / Private Type / Loading And Saving/ And Working With The Data
This is my First post. I have searched for the answers to my probs and i find losts of small parts but not the big picture.

I have a college project wich is a video library.
One part of this is entering a customers data and saving this also working with it for hires and returns that comes later i first need an array i can work with.

I have been trying to get a private type array to work , im not sure if this is best way to do it

i will say what im attempting and hopefully some smart cookie out there can point me in the right direction,
this has been typed here not into my visual basic prog so its not cuted and paisted

I feel very frustrated any offers of help or a simple way to do this would be appreciated.

in my general declerations i put

Private Type DetailsType
name As String
address As String
phonenumber As Integer
membType As String
rentalsactive As String
balance As Currency
totalrentals As String
End Type
Dim clients(99999) As DetailsType
Dim element As Integer

then i have txt boxes with txtName , TxtAddress etc for getting my text into the array

on my add button
ie cmdadd_click()

some code to load the file ? any sugestions

txtname.text="" ' to clear all my text boxes
txtAddress.text=""
txtPhonenumber.text=""
txtType.text=""

txtName.setfocus ' to put curser here
Element =0 'goes to my first entry althogh this is wrong it should goto my last entry ie element =element plus total elements so far

clients(element).name=cName
clients(element).address=caddress
clients(element).phonenumber=cNumber
clients(element).membType=ctype

cname = txtname.text
cAddress=txtAddress.text
cNumber=txtPhonenumber.text
Ctype=txtType.text

element=element + 1

some code here to save ? any sugestions
End sub

If anyone has a clue what im talking about and can help even a bit please post or email me.

Loading File Array
hi all,
just wandering how i could load each part of a file made by the following code and place each part into its specified text box

Code:
Open App.Path & "Your FileName" For Output As FileNum1
Print #FileNum1, lblMoney.Text; ","; lblmilkstock.Text; ","; lblmeatstock.Text; ","; lblbreadstock.Text; ","; lblsugarstock.Text; ","; lbljuicestock.Text; ","; lblTotalStock.Text
Close #FileNum1

End Sub
thanks

Loading File Into An Array
Ok well im new to here but I was wondering if you guys could help me with the code of loading a file into an array. When the user presses "Command1" it brings up the open dialog box where they select their file they want to open then it stores it in an array for later use. So any code or help on this problem im having would be very much appreciated

Loading PictureBox From Memory (binary Data, Byte Array, String)
I have a graphics question, related to loading a PictureBox from data held in memory (rather than from a HD image file such as c: est.jpg). Here's a bit more info of what I am doing....

My code successfully allows the user to pick an MP3 file from their HD and then examines the ID3 tags inside the MP3, and picks out Artist, Song, Album etc. If the ID3 tags are version 2, my code then successfully looks for an embedded Album Cover Picture inside the MP3. If it finds one, I would like to display that image inside a PictureBox control on my form.

The image data is held in my code in a Byte array and I also have it as a String. I have successfully written that data to disk (e.g. to C: est.jpg) and then loaded the PictureBox e.g. pic1.Picture = LoadPicture("C: est.jpg") and the image appears fine. However, I would like to achieve the same result (i.e. the image appears in the PictureBox), without have to save the data to a disk file and then load it back from disk into the PictureBox.

Therefore, to summarise, I would like to take the Byte Array or String of Binary data, and load it directly to the PictureBox to show the image. I can't see any built-in method of the PictureBox to do this, so I'm guessing some sort of API call is needed, using the hDC of the PictureBox.

Forgot to say that the image format will mostly be JPEG but may also be PNG. I'd be happy to just get JPEG working first and worry about PNG later.

Any help or direction much appreciated

Loading Array To Ran Access File
I'm working on a program/game that picks random cards and displays them in the correct picture box.

one approach that i have done was create separate functions for each of the card colors. There are 5 colors and 10 cards in each color. Right now I'm just testing with 3 cards each.

What I have done is have a card chosen at random then I have used the StartsWith to see which card to display. What I'm trying to do is read the entire string of that array and then display it in the correct picturebox. Below is what I'm working on so far

Code:
Dim cards(15) As String
Dim i As Integer
Dim fn As String
Randomize()

cards(0) = "red0.jpg"
cards(1) = "red1.jpg"
cards(2) = "red2.jpg"
cards(3) = "orange0.jpg"
cards(4) = "orange1.jpg"
cards(5) = "orange2.jpg"
cards(6) = "yellow0.jpg"
cards(7) = "yellow1.jpg"
cards(8) = "yellow2.jpg"
cards(9) = "white0.jpg"
cards(10) = "white1.jgp"
cards(11) = "white2.jpg"
cards(12) = "blue0.jpg"
cards(13) = "blue1.jpg"
cards(14) = "blue2.jpg"

i = Int(Rnd() * 14) 'randomly picks number between 0 and 14 inclusive

If cards(i).StartsWith("blue") Then
fn = cards(i).Length ' this is where i'm having problems. I want to read the name given to the array then assign it to fn.
picBlueCard.Image = Image.FromFile(fn)
ElseIf cards(i).StartsWith("white") Then
fn = cards(i).Length
picWhiteCard.Image = Image.FromFile(fn)
ElseIf cards(i).StartsWith("yellow") Then
fn = cards(i).Length
picYellowCard.Image = Image.FromFile(fn)
ElseIf cards(i).StartsWith("orange") Then
fn = cards(i).Length
picOrangeCard.Image = Image.FromFile(fn)
ElseIf cards(i).StartsWith("red") Then
fn = cards(i).Length
picRedCard.Image = Image.FromFile(fn)
End If

Loading A .txt File Into A Control Array
hello,
I have another problem with my game. i need to load a txt file into a control array when the user clicks resign.
for some reason, when its compiled it states that method or data member not found. I have declered the variable sLetter, and this is the one that it cant find......help its driving me mad.
thanks to anyone who sends a reply.

Code:
Private Sub cmdResign_Click()
Dim sLetter As String
Dim iAcross, iDown As Integer

Open App.Path & "puzzle1.txt" For Output As #1
Input #1, sLetter
For i = 1 To sLetter
Input #1, txtLetter(i).sLetter, txtLetter(i).iAcross, txtLetter(i).iDown
txtLetter.AddItem txtLetter(i).sLetter
Next i
Close #1
End Sub

Loading A Byte Array Into A File
I am writing a spell checking ocx for my Excite chat Client. I have placed the dictionary (a .txt file) in a resource file so it will be embedded in my control. I use the LoadResData function to retrieve the resource into a byte array, no problem there.....

Dim ID() As Byte
ID = LoadResData(101, "CUSTOM")

Now I want to save the byte array to a temporary file, read the file into an array, and then delete the temporary file. Ive tried reading it into a .txt file using the old "Open for.....Write #1" way and all it writes out are numbers, not words. I know its possible to do but I can't figure out how to do it. Anyone?

Need Help Loading An CSV Array File < Resolved >
Hello All,

I'm about as square as your monitor when it comes to learning VB. I'm new and I mean new.
Okay, I need to load my data from my CSV file into an array of a user-defined type in the
Form_Load event.

I'm sure someone knows how to do this and if you do please post some of your thoughts on this.

Thanks

G

Edited by - tom77757 on 3/21/2004 3:20:26 PM

Loading A 2 Dim. Array From A Sequential File
I know how to load an single dimensional array from a file using the Input# Statement.
What I am trying to do now is load a 2 dimensional array the same way using a
do while not eof(#) loop
I have done something like this with a flexgrid, loading it from a sequential file with nested for next loops. In need of little help Thanks.

Opening And Loading Ascii File Into An Array
I am wanting to open an ascii deliminated text file directly into an array - can anyone show how to do this ?

regards

adam

Loading Text Data
Hi

How do I load every second line from a textfile into eg. a listbox?

Problem Loading Input File Into Two-dimensional Array
I cannot seem to load an input file into my array. I have a two-dimensional array (8,4) which is supposed to represent a flight seating chart.
the input contains passenger name, row, seat, flight fee, and destination.
The input file reads like so:
,,,,
Clark G.,A,2,123.45,California
,,,,
Winters F.,A,4,123.45,California

I am trying to get each line of input to go into each section of the array using a For Next Loop. My problem is when I load the input into the array, everywhere there is a comma it splits and puts what is after the comma into the next section of the array. What can I do to get each entire line into one section?

Here is a sample of the code i am using:

Open "a: Passlist_Old.txt" For Input As #1
For X = 1 to 8
For Y = 1 to 4
Input #1, strFlight(X, Y)
Next Y
Next X

Any help would be greatly appreciated.

Help On Loading Data From File
Ok I want to load data that was written to a file on to my program. and im using this code to do so.........

Dim file As String
'Replace 'c:autoexec.bat' with the file you want to load to the TextBox
file = "c:Windowssystem32Info.txt"
Open file For Input As #1
Text2.Text = Input(LOF(1), #1)

And Everytime it loads, it adds these 2 little black things to the end. Does anybody know how to get this not to happen.

Below u can download a little program i put together real fast that will show u what its doing because i cant explain it.

Loading Data From File
Hi, I am making a file for a game I play. I want to make a file that displays information I put in a different file. Ex. I make a monsterlist.txt. When a person boots up the program, everything is listed in a table in a certain order.
Name
Level:
HP:
etc.
Also a picture of the creature on the left hand side.
Then on the right, have a list that lists where the creature is located. Next to that, what the creature drops. When you click on an item in the list, a picture is brought up.

Loading Text Into A List Box From A Text File
Hey Ppl,
i have a file that contains different number of text lines everytime...in this for

muzamil
sumra
myanme
etc

but this text can change everytime...some more names might be added to the text file or deleted....

how can i load the text into a listbox?

i have done in this way but this loads only 1 line

Dim first As String

Open "C:migpro Expert Publiclistsetlistset.txt" For Input As #1

Do While Not EOF(1)

Input #1, first
If List1.ListCount = 0 And first <> "" Then
With List1
.Clear
.AddItem first
End With
End If
loop
close #1

Loading Text File Into Various Text Boxes
Hope someone can help. I've been trying to get a text file and look like..

input=c: estinput
output=c: estoutput

i've been trying to read the first line and find the "=" then anything after this use in text1.text

Anyone have any ideas? I'm newish and at the moment my head just wont work..

Thanks

Loading A Text File Into Text Box *** RESOLVED ***
I'm using the code below to load a text file into a text box, but the problem is only the first line of the file gets loaded. The textbox is set to multilines.

What should 'Text' in the line 'Input #1, Text
' be defined as???

VB Code:
Private Sub FileOpen_Click() cmdDialog.Filter = "Text Documents (*.txt)|*.txt|All files (*.*)|*.*" cmdDialog.ShowOpen txtFile = cmdDialog.FileName If txtFile > "" Then Open txtFile For Input As #1 Input #1, Text RichTextBox1.Text = Text Close #1 End IfEnd Sub

Loading Text File Help Please
I want to open a text file from my computer and then send it to a text box in my program on the form load.
I ve been trying for like 4 hours to figure out how to do this. So any help would be awesome

Loading Text File
Hello People,

Does anyone know how to load a text file (.txt) in to a text box or a rich text box – of which the name of the text file is in the database?

Basically I have the name of the text file in the database and the text file on my pc.
When I click a button I what that file to open.

With Regards,
Sally

Text File Loading
Is there a way to load a text file line by line and for each line test the variable to see if it equals a value. I don't know how to do this because I will not be able to determine how many lines are in the file because that determines on what the user types and how much is added to the file. Anyone know how I can search an entire file line by line for a certain value?

Loading A Text File
Is it possible to detect from a program if a text file is empty or not? On one of my forms I populate the form from a text file, but I only want to load the file if it has text in it.

Loading From A Text File
ho would i load the first line frm a text file into text1.text and the second line from the same text file into text2.text and so on, i have searched but cannot find this

Loading Txt File Into Text Box
For practise I am trying to make my own word processor.

I have the following code but I cannot get the file to open in the txtbox.

Private Sub FileOpen_Click()

' CancelError is True.
On Error GoTo ErrHandler
' Set filters.
cdl1.Filter = "All Files (*.*)|*.*|Text Files (*.txt)|*.txt"
' Specify default filter.
cdl1.FilterIndex = 2

' Display the Open dialog box.
cdl1.ShowOpen

Dim sLine As String

Open cdl1.FileName For Input As #1
Do Until EOF(1)
Line Input #1, sLine
Print Input$(LOF(1), 1)
Loop
Close #1

Exit Sub

ErrHandler:
' User pressed Cancel button.
Exit Sub

End Sub

Is this correct?

Thanks

Loading Text File
What code can I use to load all the text from a text file into a variable?

Loading Text From A Txt.file
hi guys
is there any code for bringing all the text in a txt(notepad) file into a textbox in vb?

thank you for you help in advance

Loading A Text File...
Hi people...

This is a hard one to explain..Here it goes!!

In my "c:Program Files" directory, I have a folder called "People". This folder
will contain, as of yet, unknown named subfolders. The "unknown named subfolders"
will contain two sub-subfolders called "Description" and "Education". So for example, it
might look something like this:

c:Program FilesPeopleJohn DoeDescription and John DoeEducation

When the unknown named subfolder is created, it will contain a text file, relative to
John Doe.

Right now, my code can load the text file when it reached the John Doe folder, and unload
it when it goes back one or more directories. The problem is that, if I go forward to the
sub-subfolders of either "Description" or "Eduaction", my unload code executes too. So i guess
it's a directional issue. I only want to unload the text file, if I go back from John Doe's
directory, not forward.

I'm using "DriveListBox", "DirListBox", and "FileListBox" to navigate to the directories in my program.

Any ideas is appreciated...

D-Race

Edited by - D-Race on 10/13/2004 9:42:08 PM