la funcion mas sencilla para encriptar que se me ocurre:
Código PHP:
function Crypt(stexto,inumero)
ilen=len(stexto)
scad=""
for i=1 to ilen
schr=mid(sTexto,i,1)
ichr=chr(schr)
ichr=ichr+inumero
do while ichr>255
ichr=ichr-255
loop
do while ichr<0
ichr=ichr+255
loop
scad=scad & asc(ichr)
next
crypt=scad
end function
y la usarias asi:
crypt(clave,numero de dni o algo asi del usuario)
para encriptar
y
crypt(clave,0-numero de dni o algo asi del usuario)
para desencriptar
no estoy muy seguro de la sintaxis porque ahora estoy trabajando en VB mas que en ASP pero algo asi ha de ser...