Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Datei ab einer bestimmten Position binär auslesen und als text ausgeben
Autor: fin
Datum: 07.07.09 15:52
Hallo, bin Neuling in vb 2005, ich habe ein Programm zum Umbenennen und Drehen von Fotos geschrieben, was auch so funktioniert. Ich möchte nun zusätzliche Infos in die Bilder als versteckten Text schreiben. Auch das klappt. Probleme habe ich den Text wieder auszulesen (war bei vb 6.0 mit "get"). Der Text kommt im Bild an (sichtbar am Ende der Datei im Hexeditor). Hab schon Verschiedenes versucht, komme aber nicht mehr weiter, mein Code gibt nur ein Zeichen zurück: Dim br As New BinaryReader(New FileStream(Application.StartupPath & "\neu.jpg", FileMode.Open)) Dim s As String = "" Dim n As Long Dim wert As Long Dim sFind As String On Error Resume Next sFind = br.ReadString If sFind.IndexOf("HF") <> -1 Then wert = (sFind.IndexOf("HF")) 'ab hier soll bis zum Ende der text ausgelesen und als Text angezeigt werden End If 'br.BaseStream.Position = 1 For n = wert To Len(br.BaseStream) - 1 s &= Convert.ToString(Hex(br.ReadByte())) Next TextBox1.Text = s 'und ausgeben. br.Close() kann mir jd. mit einem konkreten Code helfen - Danke im voraus mfg fin

Datei ab einer bestimmten Position binär auslesen und als te...	1.468	fin	07.07.09 15:52
Re: Datei ab einer bestimmten Position binär auslesen und al...	625	Zardoz	08.07.09 14:03

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen