For loop problem

[recneps]

Im not quite understanding why this keeps crashing.
Just run it and click options>add files........... (it goes on, only thing under options)
oh, and put it in a folder with a couple music files. (i could put "On error resume next" but then the last file wouldnt go in, right?")
The error will be highlighted and you'll see what im trying to do.
List1 is the playlist, File1 is the list of all files in App directory that are music files.

Edit: VB help really needs some upload things
http://www.compsci.ca/v2/download.php?id=1203

[Tony]

well I think I fixed the upload problem I'll take a look at the code monday in school

[recneps]

I figured it out... well sorta, i just did

code:

File1.ListIndex = 0 For a = 0 To File1.ListCount - 1 File1.ListIndex = a MainForm.List1.AddItem File1.FileName Label2.Caption = "Adding Files..." Next a

(its on a separate form now )
and it works.