DynuEncrypt

O componente DynuEncrypt permite a você criptografar/descriptografar dados. Exemplo <% 'Declara as variáveis a serem utilizadas no script Dim DynuEncrypt, sEncrypted, sDecrypted   'Instancia o componente SET DynuEncrypt = Server.Createobject("Dynu.Encrypt")   'Encripta uma string com a senha 'senhateste123' sEncrypted = DynuEncrypt.Encrypt("Esta é a string a ser encriptada.", "senhateste123")   'Imprime na tela o valor criptografado response.write "<b>Valor criptografado</b><br>" & sEncrypted & "<br><br>"   'Decriptando o valor da string sDecrypted = DynuEncrypt.Decrypt(sEncrypted, "senhateste123")   'Imprime na tela o valor descriptografado response.write "<b>Valor descriptografado</b><br>" & sDecrypted & "<br>"   'Remove as referências do objeto na memória SET DynuEncrypt = nothing %> O código mencionado acima é somente um exemplo. Caso haja dúvidas quanto sua utilização, sugerimos que verifique juntamente a um desenvolvedor de sua confiança. Veja também DynuHTTP AdRotator DynuPOP3 Isapi Rewrite FSO (File System Object) Cdosys Links Central do Cliente Painel de Controle Central de atendimento