2 simple code that save items to a file and the other that load items to the listbox from the file visit my homepage at http://www.cyberway.com.sg/~dyrws 4 more app
Original Author: Dua Yong Rew
Code
*** The Save Function ***
Open App.Path & "" & "playlist.dyr" For Output As 1
For x = 0 To List1.ListCount - 1
List1.ListIndex = x
Print #1, List1.Text
Next
Close 1
*** The Load Function ***
Open App.Path & "" & "playlist.dyr" For Input As 1
Do Until EOF(1)
Line Input #1, st
List1.AddItem st
Loop
Close 1