Tag!
Ich habe wieder ein kleines prob mit vb.net. Beim Start meines Programmes wird ein externes Programm gewählt und dessen Pfad in einer Textdatei gespeichert. Nun soll eigentlich mit der Readline Funktion der Pfad ausgelesen werden, sodass man dann über einen Button das externe Programm starten kann. Das funzt aber nicht so richtig, weil ich wohl irgendwas falsch mache.

Hier ist mal der Code :
Code:
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        Process.Start(ReadLine("C:\Dokumente und Einstellungen\gehgeh\Eigene Dateien\Visual Studio 2008\Projects\hhhheh\thht\bin\Debug\hhrhh.txt", 1))

    End Sub

Das ist ein Code Snippet welches ich irgendwo gefunden habe:
    Public Function ReadLine(ByVal sFile As String, _
  Optional ByVal nLine As Long = 1) As String

        Dim sLines() As String
        Dim oFSO As Object
        Dim oFile As Object

        ' Fehlerbehandlung aktivieren
        On Error GoTo ErrHandler

        ' Verweis auf das FileSystemObject erstellen
        oFSO = CreateObject("Scripting.FileSystemObject")

        ' Existiert die Datei überhaupt?
        If oFSO.FileExists(sFile) Then
            ' Datei öffnen
            oFile = oFSO.OpenTextFile(sFile)

            ' Alles lesen und in Array zerlegen
            sLines = Split(oFile.ReadAll, vbCrLf)

            ' Datei schließen
            oFile.Close()

            Select Case Math.Sign(nLine)
                ' (nLine > 0)
                Case 1
                    ' n-te Zeile von vorne beginnend
                    ReadLine = sLines(nLine - 1)

                    ' (nLine < 0)
                Case -1
                    ' n-te Zeile von hinten beginnend
                    ReadLine = sLines(UBound(sLines) + nLine + 1)
            End Select
        End If

ErrHandler:
        ' Objekte zerstören
        oFile = Nothing
        oFSO = Nothing
    End Function