Forum: PC-Programmierung [VB] schreiben in eine Textdatei bringt kryptische Zeichen


von dkeipp (Gast)


Lesenswert?

Hallo zusammen,

folgender Code:
1
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
2
        Str2TXT("C:\tmp\test.txt", "Hallo, das ist ein")
3
        Str2TXT("C:\tmp\test.txt", "Test")
4
End Sub
5
6
Public Sub Str2TXT(ByVal FullPath As String, ByVal str As String)
7
        Dim f As New IO.FileInfo(FullPath)
8
        
9
        If f.Directory.Exists = True Then
10
            My.Computer.FileSystem.WriteAllText(FullPath, str & vbLf, True)
11
        End If
12
13
End Sub

bringt folgendes Ergebniss in der test.txt:
1
Hallo, das ist ein
2
Test

Kann mir jemand sagen woher die drei Zeichen in der ersten Zeile kommen?
Das geschieht grundsätzlich immer. egal ob die datei neu erstellt wird 
oder schon vorhanden aber leer ist, aber immer nur in der ersten Zeile.
Verwenden tu ich:

Microsoft Visual Studio 2008
Version 9.0.30729.1 SP
Microsoft .NET Framework
Version 3.5 SP1
auf MS Windows XP SP3

Gruß
Dennis

von Arc N. (arc)


Lesenswert?

http://msdn.microsoft.com/en-us/library/27t17sxs.aspx
"When no encoding is specified, UTF-8 is used. The byte order mark (BOM) 
for the encoding is written to the file unless you specify 
Encoding.Default, which uses the system's current ANSI code page. If the 
specified encoding does not match the existing encoding of the file, the 
specified encoding is ignored."

p.s. F1 drücken funktioniert auch bei dieser Methode...

Bitte melde dich an um einen Beitrag zu schreiben. Anmeldung ist kostenlos und dauert nur eine Minute.
Bestehender Account
Schon ein Account bei Google/GoogleMail? Keine Anmeldung erforderlich!
Mit Google-Account einloggen
Noch kein Account? Hier anmelden.