Utilizar criptoASP
Buen día.. Necesito mostrar en funcionamiento el argoritmo RC2 y encontré que la librería criptoASP lo maneja, pero cuando escribo las lineas que adjunto ma aparece un mensaje de error indicando que faltan parámetros, Agradezco la ayuda que me puedan dar.
<%
Set oCripto = Server.CreateObject("Instisec.Cripto")
strAleatorio = oCripto.Aleatorio(16)
strHash = oCripto.Hash(strTexto,3)
strCifrado = oCripto.Cifrar(strTex,strClav,0)
strDescifrado = oCripto.Descifrar(strCifrado,strClav,0)
Set oCripto = Nothing
%>
<%=strCifrado%>
<p> </p>
<%=strDescifrado%
<%
Set oCripto = Server.CreateObject("Instisec.Cripto")
strAleatorio = oCripto.Aleatorio(16)
strHash = oCripto.Hash(strTexto,3)
strCifrado = oCripto.Cifrar(strTex,strClav,0)
strDescifrado = oCripto.Descifrar(strCifrado,strClav,0)
Set oCripto = Nothing
%>
<%=strCifrado%>
<p> </p>
<%=strDescifrado%
1 Respuesta
Respuesta de Jorge Vila
1
Si no veo las funciones ni los parámetros que reciben, resulta un poco complicado ayudarte. Prueba una cosa, pon funciçon por función y averigua donde te está fallando, es decir, crea el objeto oCripto y haz una función, si todo va bien, mete otra, y así hasta que encuentres la línea del error para poder ayudarte!.
Espero haberte orientado!, por favor, no olvides cerrar la pregunta para que otros me puedan preguntar!.
Espero haberte orientado!, por favor, no olvides cerrar la pregunta para que otros me puedan preguntar!.
Mil gracias, la verdad estoy utilizando la librería criptoASP y no se de que manera armar la función para encriptar y luego desencriptar, mostrando ambos valores.
