Categorias

Criptografando arquivos com o AspEncrypt

Persits AspEncrypt é uma poderosa ferramenta para encriptar, decriptar arquivos e gerar/gerenciar chaves criptográficas derivadas de senhas e aleatórias.

Criptografando um arquivo

<%
' Cria uma instância do controle
Set AspEncrypt = Server.CreateObject("Persits.CryptoManager")
Set Context = AspEncrypt.OpenContext("mycontainer", True)
' Caminho do arquivo a ser encriptado
arq_Encriptar = Server.MapPath("teste.txt")
' Senha de criptografia do arquivo
Set key = Context.GenerateKeyFromPassword("my password", calgSHA, calgRC4, 40)
' Realizar a criptografia do conteúdo do arquivo e salva em outro arquivo.
key.EncryptFile arq_Encriptar, arq_Encriptar & ".xxx"
' Tira o objeto da memória
Set AspEncrypt = Nothing
%>


Decriptogragando um arquivo

<%
' Cria uma instância do controle
Set AspEncrypt = Server.CreateObject("Persits.CryptoManager")
Set Context = AspEncrypt.OpenContext("mycontainer", True)
' Caminho do arquivo a ser decriptado
arq_Decriptar = Server.MapPath("teste.txt")
' Senha de criptografia do arquivo
Set key = Context.GenerateKeyFromPassword("my password", calgSHA, calgRC4, 40)
' Realizar a descriptografia do conteúdo do arquivo e salva em outro arquivo.
key.DecryptFile arq_Decriptar & ".xxx", arq_Decriptar
' Tira o objeto da memória
Set AspEncrypt = Nothing
%>