Ich steh zur Zeit voll auf dem Schlauch. Hänge zur Zeit am Favos hinzufügen bei meinem Browser.

Kennt sich einer bisschen in VB aus? Ich weiß nicht, was ich falsch mache. Hab mich da heute wohl total verrannt.

Ist das Fenster, 2 Textfehlder 1 Button.
Code:
Public Class Form6

    Private Sub Form6_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim inhalt As String
        If My.Computer.FileSystem.FileExists("Favorites.dat") = True Then
            inhalt = My.Computer.FileSystem.ReadAllText("Favorites.dat")
            inhalt = inhalt & vbNewLine & TextBox1.Text & "<>" & TextBox2.Text
        Else
            inhalt = TextBox1.Text & "<>" & TextBox2.Text
        End If
        My.Computer.FileSystem.WriteAllText("Favorites.dat", inhalt, False)
        ' Ggf neu einlesen, damit neuer Favorit direkt sichtbar
    End Sub
Aber irgendwie passiert nichts (die favorites.dat liegt unter documents).

Vieleicht, beim Button könnte was fehlen ^^

Code:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    End Sub
Hilfe !? ^^