Hallo.
Ich arbeite gerade an einem Programm, womit ich "mp3-Dateien" abspielen kann,
die auf meinem WebServer liegen.
So schaut es aus:
Die 2 Spalten werden automatisch ausgefüllt im Format Songname|Station
mit einem .getfile-Script was eigentlich ganz simpel aufgebaut ist:
Ich habe ein paar Lieder auf meinen WebServer geladen, und es lief alles einwandfrei.
Nun habe ich auch nichts mehr im Code bzw. an der Form geändert, ich habe nur
ein paar mehr .mp3-Dateien auf meinem WebServer geladen.
Nun verstehe ich also nicht, wieso ich plötzlich folgende Fehlermeldung bekomme:
"Der Index war außerhalb des Arraybereichs". Es lief alles ganz normal, nach
dem hochladen von ein paar mehr Dateien kann ich das Programm garnicht mehr
öffnen, es erscheint direkt die Fehlermeldung.
Der Fehler trifft auf folgenden Codeabschnitt zu:
Der gesammte Code lautet:
Ich hoffe mir kann jemand helfen, und mir sagen was geändert werden muss.
Ich arbeite gerade an einem Programm, womit ich "mp3-Dateien" abspielen kann,
die auf meinem WebServer liegen.
So schaut es aus:
Die 2 Spalten werden automatisch ausgefüllt im Format Songname|Station
mit einem .getfile-Script was eigentlich ganz simpel aufgebaut ist:
Ich habe ein paar Lieder auf meinen WebServer geladen, und es lief alles einwandfrei.
Nun habe ich auch nichts mehr im Code bzw. an der Form geändert, ich habe nur
ein paar mehr .mp3-Dateien auf meinem WebServer geladen.
Nun verstehe ich also nicht, wieso ich plötzlich folgende Fehlermeldung bekomme:
"Der Index war außerhalb des Arraybereichs". Es lief alles ganz normal, nach
dem hochladen von ein paar mehr Dateien kann ich das Programm garnicht mehr
öffnen, es erscheint direkt die Fehlermeldung.
Der Fehler trifft auf folgenden Codeabschnitt zu:
Der gesammte Code lautet:
VB.NET-Quellcode
- Public Class Form1
- Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- Dim files() As String = New WebClient().DownloadString("http://******/getfiles.php").Split(vbLf)
- For Each file In files
- If Not file.Trim() = String.Empty Then
- ListView1.Items.Add(file.Split("|")(0)).SubItems.Add(file.Split("|")(1))
- End If
- Next
- End Sub
- Private Sub ListView1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListView1.Click
- Dim realname As String = ListView1.SelectedItems(0).Text + "|" + ListView1.SelectedItems(0).SubItems(1).Text + ".mp3"
- realname = "http://*****/" + realname
- AxWindowsMediaPlayer1.URL = realname
- End Sub
- Private Sub ListView1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListView1.SelectedIndexChanged
- End Sub
- End Class
Ich hoffe mir kann jemand helfen, und mir sagen was geändert werden muss.