Hallo und danke schonmal für eure Hilfe.
Ich hab folgendes Problem:
Ich bin dabei für mein Programm Daten in einer XML-Datei zu speichern.
Nun habe ich die XML-Datei verschlüsselt.
Die Variable "Dataset" ist mein Dataset, welches die Daten beinhaltet.
Die Variable "Pfad" ist der Speicherort.
Das Verschlüsseln funktioniert soweit, doch leider bekomme ich die Datei nicht mehr entschlüsselt.
Das Ergebnis meiner Tüftelei sieht momentan so aus:
Doch bei "cryptostream.Read(bytearr, 0, bytearr.Length)" bekomme ich eine Fehlermeldung die nur "ungültige Daten" heißt und damit kann ich leider nicht besonders viel anfangen.
Es wäre nett, wen ihr mir helfen könntet.
mfg buschmanR
Ich hab folgendes Problem:
Ich bin dabei für mein Programm Daten in einer XML-Datei zu speichern.
Nun habe ich die XML-Datei verschlüsselt.
VB.NET-Quellcode
- Dim byteArr As Byte()
- Dim memstrm As New MemoryStream
- Dataset.WriteXml(memstrm)
- byteArr = memstrm.ToArray
- memstrm.Close()
- Dim CSP As New DESCryptoServiceProvider
- Dim ICP As ICryptoTransform = CSP.CreateEncryptor
- Dim fs As New FileStream(Pfad, FileMode.OpenOrCreate, FileAccess.ReadWrite)
- Dim cryptostrm As New CryptoStream(fs, ICP, CryptoStreamMode.Write)
- cryptostrm.Write(byteArr, 0, byteArr.Length)
- cryptostrm.Close()
Die Variable "Dataset" ist mein Dataset, welches die Daten beinhaltet.
Die Variable "Pfad" ist der Speicherort.
Das Verschlüsseln funktioniert soweit, doch leider bekomme ich die Datei nicht mehr entschlüsselt.
Das Ergebnis meiner Tüftelei sieht momentan so aus:
VB.NET-Quellcode
- Dim byteArr() As Byte = File.ReadAllBytes(Pfad)
- Dim memstrm As New System.IO.MemoryStream
- Dim CSP As New DESCryptoServiceProvider
- Dim ICP As ICryptoTransform = CSP.CreateDecryptor
- Dim cryptostream As New CryptoStream(memstrm, ICP, CryptoStreamMode.Read)
- cryptostream.Read(bytearr, 0, bytearr.Length)
- Dataset.ReadXml(ms)
Doch bei "cryptostream.Read(bytearr, 0, bytearr.Length)" bekomme ich eine Fehlermeldung die nur "ungültige Daten" heißt und damit kann ich leider nicht besonders viel anfangen.
Es wäre nett, wen ihr mir helfen könntet.
mfg buschmanR