Hallo liebe Comm
Ich brauche mal eure Hilfe undzwar gibt es ein Problem mit meinem Browser.
Ich update den gerade und habe beschlossen, statt vielen einzelnen Dateien eine gesammte Datei zu erstellen (Wie voher auch mit OpenFile).
Aber wenn ich den Browser im Debug starte, kommt das >hier <.
Hier ist der Code:
Hoffe jemand findet den Fehler...
Liebe Grüße
Ich brauche mal eure Hilfe undzwar gibt es ein Problem mit meinem Browser.
Ich update den gerade und habe beschlossen, statt vielen einzelnen Dateien eine gesammte Datei zu erstellen (Wie voher auch mit OpenFile).
Aber wenn ich den Browser im Debug starte, kommt das >hier <.
Hier ist der Code:
VB.NET-Quellcode
- If Not IO.File.Exists(Application.StartupPath + "\data\ubt.ini") Then
- IO.File.Exists(Application.StartupPath + "\data\ubt.ini")
- End If
- FreeFile()
- FileOpen(1, Application.StartupPath + "\data\ubt.ini", OpenMode.Output, OpenAccess.Write)
- PrintLine(1, "[Userdata]")
- PrintLine(2, "LockPassword=" + PasswordString.Text)
- PrintLine(3, "LoggedUser=" + dAuser.Text)
- PrintLine(4, "LastSession=" + My.Computer.Clock.LocalTime.Date.DayOfWeek.ToString + "@" + My.Computer.Clock.LocalTime.Date + "@" + TimeOfDay)
- PrintLine(5, "")
- PrintLine(6, "[Browser]")
- PrintLine(7, "LastVisitedTitle=" + ToolStripLabel1.Text)
- PrintLine(8, "WindowSize=" + "H:" + My.Settings.SizeH + "x&W:" + My.Settings.SizeW)
- PrintLine(9, "LockState=" + LockState.Text)
- PrintLine(10, "LockStateT=" + LockStateT.Text)
- PrintLine(11, "")
- PrintLine(12, "[Theme]")
- PrintLine(13, "CurrentTheme=" + WhatThemeIHave.Text)
- PrintLine(14, "CurrentOffice=" + My.Settings.OfficeStyle)
- FileClose()
Hoffe jemand findet den Fehler...
Liebe Grüße
Dieser Beitrag wurde bereits 7 mal editiert, zuletzt von „Shaymin123[CRI09]“ ()