Visual studio e la criptografia

sabato 27 gennaio 2007 - 18.41

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

alejandro Profilo | Newbie

18 messaggi | Data Invio: sab 27 gen 2007 - 18:41

ho creato un programma per gestione file al quale voglio aggiungere un tool di criptografia degli stessi.ma il problema si presenta con i file non .TxT.la decriptatura non mantiene i formati ( doc,jpeg,bmp,etc).ecco il code:
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Function AES(ByVal sInputFilename As String, ByVal sOutputFilename As String, ByVal sKey As String)

Dim vAES As New RijndaelManaged
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
vAES.BlockSize = 128
vAES.KeySize = 128
vAES.Key = ASCIIEncoding.ASCII.GetBytes(sKey)
vAES.IV = ASCIIEncoding.ASCII.GetBytes(sKey)
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
If FlagCriptDecript Then
Dim FileInputCript As New FileStream(sInputFilename, FileMode.Open, _
FileAccess.Read)
Dim FileCriptado As New FileStream(sOutputFilename, FileMode.Create, _
FileAccess.Write)
Dim Encriptador As ICryptoTransform = vAES.CreateEncryptor()
Dim FlujoCriptado As New CryptoStream(FileCriptado, Encriptador, _
CryptoStreamMode.Write)
Dim ArrayByteInput(FileInputCript.Length - 1) As Byte
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
FileInputCript.Read(ArrayByteInput, 0, ArrayByteInput.Length)
FlujoCriptado.Write(ArrayByteInput, 0, ArrayByteInput.Length)
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
FlujoCriptado.Close()
FileInputCript.Close()
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
ElseIf Not FlagCriptDecript Then
Dim FileInputDecript As New FileStream(sInputFilename, FileMode.Open, _
FileAccess.Read)
Dim Decriptador As ICryptoTransform = vAES.CreateDecryptor()
Dim FlujoDecriptado As New CryptoStream(FileInputDecript, Decriptador, _
CryptoStreamMode.Read)
Dim FileDecriptado As New StreamWriter(sOutputFilename)
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
FileDecriptado.Write(New StreamReader(FlujoDecriptado).ReadToEnd)
FileDecriptado.Flush()
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
FileInputDecript.Close()
FileDecriptado.Close()
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
End If
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
FlagCriptDecript = False
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
End Function
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
cosa sbaglio???

Torna su

Stanze Forum

Elenco Threads

Partecipa anche tu! Registrati!

Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !