Dim Von As Integer = 0
        Dim Bis As Integer = 518
        Dim Gelesen(Bis - Von) As String
 
 
        Dim Pfad As String = "C:\Dokumente und" & _
          "Einstellungen\gangsta\Desktop\handling.cfg"
        Dim Reader As New StreamReader(Pfad)
        Dim Durchläufe As Integer = Bis - Von
 
 
        If Von > 0 Then
            For i As Integer = 0 To Von
                Reader.ReadLine()
            Next
        End If
 
        For i As Integer = 0 To Durchläufe
            Gelesen(i) = Reader.ReadLine()
        Next

-----------------------
Gru? BigBobbie
-----------------------