Hiya, having huge troubles opening a movie file .avi or .mov into a textbox and then sort the movie file names into alphabetical order.
Here is the code that i have so far
CODE
Dim i As Integer = 0
Dim AllText As String = ""
OpenFileDialog1.Filter = "Movie File (*.avi)|*.avi"
OpenFileDialog1.ShowDialog() 'display Open dialog box
If OpenFileDialog1.FileName <> "" Then
Try
FileOpen(1, "Movies,Txt", OpenMode.Input)
Do Until EOF(1)
AllText = My.Computer.FileSystem.GetName(OpenFileDialog1.FileName)
Loop
lblNote.Text = OpenFileDialog1.FileName 'update label
txtNote.Text = AllText 'display file
txtNote.Enabled = True 'allow text cursor
CloseToolStripMenuItem.Enabled = True 'enable Close command
Catch
MsgBox("Error opening file.")
Finally
FileClose(1) 'close file
End Try
End If
I'm sort of ok for the sorting code as i know it will be something like array.sort and using UBound of some sort and ascii codes
To anyone who helps, thanks in advance
| 