|
VB.Net-Forum - Beitragsübersicht - |
|
Thema | V08: StreamReader und StreamWriter |
Von |
woddy |
Datum |
26. Mai 2016 um 13:40:17 |
Frage |
Hallo,
beim einlesen und schreiben bekomme ich anstatt Umlaute Fragezeichen.
lesen: If ofd_1.ShowDialog() = System.Windows.Forms.DialogResult.OK Then Dim sr As New System.IO.StreamReader(ofd_1.FileName, System.Text.Encoding.UTF8, 512) strPfad_1 = CStr(ofd_1.FileName) For Each Linie As String In System.IO.File.ReadAllLines(ofd_1.FileName, System.Text.Encoding.UTF8) intEin_1 += 1 Next Label1.Text = Str(intEin_1) Label3.Text = ofd_1.FileName strEin_1 = sr.ReadLine sr.Close() MessageBox.Show(intEin_1) End If schreiben: Dim sr As New System.IO.StreamReader(strPfad_1, System.Text.Encoding.UTF8, 512) For Each Linie As String In System.IO.File.ReadAllLines(strPfad_1, System.Text.Encoding.UTF8) strEin_1 = sr.ReadLine 'intEin_2 += 1 If strEin_1 = Nothing Then Else strBearb_Neu += CStr(strEin_1) & vbCrLf End If Next sr.Close wie bekomme ich das hin??
Danke und Gruß woddy
|
|
Antwort: |
Von |
Tweetychen |
Datum |
30. Januar 2017 um 08:15:31 |
Antwort |
Ich habe das auch gehabt :-) wobei ich gleich mal Nachfragen möchte .
Ich Speichere seit Uhrzeiten die Listbox so ab : Public Function ListBoxSave(ByVal ListBox As ListBox, ByVal Filename As String) As Boolean Dim oStream As IO.StreamWriter = Nothing Dim bResult As Boolean = False Try If File.Exists(Filename) Then File.Delete(Filename) End If ' Stream-Objekt zum Speichern erstellen oStream = New IO.StreamWriter(Filename, False, System.Text.Encoding.Default) With ListBox.Items ' Liste durchlaufen und zeilenweise speichern For i As Integer = 0 To .Count - 1 oStream.Write(CStr(.Item(i)) & CStr(IIf(i < .Count - 1, CChar(vbCrLf), ""))) 'Hier liegt glaube mein Fehler Next End With bResult = True Catch ex As Exception Finally ' Stream-Objekt schließen If Not IsNothing(oStream) Then oStream.Close() End Try Return (bResult) End Function So das Problem das ich eine Datei die Vorher im Format: DOS vorlag jetzt plötzlich als MAC Format erkannt wird. Bei SQL+ Sachen ist das dann nicht so gut. Kennt jemand das Problem oder hat einer die Perfekte Lösung ? Vielen Dank schon mal |
|
[ Antwort schreiben | Zurück zum VB.Net-Forum | Forum-Hilfe ] |
|
Letzte Aktualisierung: Sonntag, 13. Dezember 2015 |
|