Ich habe einen Webbrowser erstellt. Nun habe ich ein Problem mit der Chronik.
Ich habe das ganze per ini-Datei gespeichert. Dann habe ich aus Versehen die Form gelöscht. Jedoch schon wieder neu eingerichtet. Nun bekomme ich den Fehler, dass der Zugriff verweigert wurde. Davor gab es den Bug, dass alles mehrmals angezeigt wurde, obwohl ich eigentlich die Seite nur einmal aufgerufen habe. Weiß jemand weiter? Das ganze ist in einer Listbox eingetragen.
Hier der Code für die Form:
Schließlich noch das DocumentCompleted Event um einen Eintrag vorzunehmen.
Dort habe ich einfach eingefügt, dass es prüfen soll, ob die Datei vorhanden ist. Wenn nicht, soll er sie erstellen.
Danke im Vorraus. Wäre nett!
PS: Könntet Ihr mir hier evtl. auch noch helfen, denn ich weiß nicht weiter...
[VB 2010] Toolstrip Objekte einzeln selektieren und löschen
Ich habe das ganze per ini-Datei gespeichert. Dann habe ich aus Versehen die Form gelöscht. Jedoch schon wieder neu eingerichtet. Nun bekomme ich den Fehler, dass der Zugriff verweigert wurde. Davor gab es den Bug, dass alles mehrmals angezeigt wurde, obwohl ich eigentlich die Seite nur einmal aufgerufen habe. Weiß jemand weiter? Das ganze ist in einer Listbox eingetragen.
Hier der Code für die Form:
VB.NET-Quellcode
- Private Sub Chronik_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- Dim chronikpfad As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\Internet Browser\"
- Dim chronikarray() As String = Split(My.Computer.FileSystem.ReadAllText(chronikpfad & "chronik.ini"), vbNewLine)
- For i = chronikarray.Length - 1 To 0 Step -1
- If Not chronikarray(i) = "" Then
- Me.ListBox1.Items.Add(chronikarray(i))
- End If
- Next
- End Sub
- Private Sub ListBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBox1.DoubleClick
- If Not Me.ListBox1.SelectedIndex = -1 Then
- Dim splitarray() As String = Split(Me.ListBox1.SelectedItem - 1, " - ")
- Form1.addTab("NeuerTab", My.Settings.Startseite)
- Form1.RichTextBox1.Text = splitarray(splitarray.Length - 1)
- Form1.Button3.PerformClick()
- Me.Close()
- End If
- End Sub
Schließlich noch das DocumentCompleted Event um einen Eintrag vorzunehmen.
Dort habe ich einfach eingefügt, dass es prüfen soll, ob die Datei vorhanden ist. Wenn nicht, soll er sie erstellen.
Danke im Vorraus. Wäre nett!
PS: Könntet Ihr mir hier evtl. auch noch helfen, denn ich weiß nicht weiter...
[VB 2010] Toolstrip Objekte einzeln selektieren und löschen
Dieser Beitrag wurde bereits 4 mal editiert, zuletzt von „programmer71“ ()