Visual Basic - cifrar ficheros con capicom

Life is soft - evento anual de software empresarial
   
Vista:

cifrar ficheros con capicom

Publicado por pappland (1 intervención) el 12/06/2008 10:31:53
Un saludo....

Estoy dando mis primeros pasos con BV y quiero saber como puedo cifrar u resumir ficheros.

Se hacerlo con cadenas de texto mediante los siguientes codigos, pero como los modifico para hacerlo con ficheros????

Private Sub Boton_Encriptar_Click()
Dim ed As New EncryptedData
ed.Content = TextBox_EncriptacionTexto.Text
ed.Algorithm.Name = CAPICOM_ENCRYPTION_ALGORITHM_3DES
ed.SetSecret Text_Clave.Text
TextBox_Resultado.Text = ed.Encrypt
End Sub

Private Sub Boton_Resumir_Click()
Dim resumen As New HashedData
resumen.Algorithm = CAPICOM_HASH_ALGORITHM_MD5
resumen.Hash (Text_Resumen.Text)
Text_resultadoResumen = resumen.Value
End Sub

Lo que quiero es saber como cambio os textareas por ficheros.


Gracias...
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder