Este artículo presenta principalmente los métodos de descifrado asp, restauración de chrw, archivos codificados con chr y el método para decodificar el contenido de chrw. Los amigos que lo necesiten pueden consultarlo.
Después de cifrar los parámetros de la función asp mediante la codificación chrw, cómo decodificar el contenido de chrw. La siguiente función de decodificación resulta ser muy simple. Utiliza expresiones regulares para extraer la cadena chrw en el contenido, y luego eval ejecuta dinámicamente la cadena chrw obtenida para obtener el contenido y luego realiza el reemplazo. Nota: consulte los comentarios en el código fuente. Tenga en cuenta que el código fuente debe guardarse como un archivo en formato vbs antes de la ejecución. Si es un archivo asp, createobject debe modificarse a server.createobject.
function readfile(fn)'Lea el contenido del archivo codificado set fso=createobject(scripting.filesystemobject) set ts=fso.OpenTextFile(fn,1,false,-2)'Preste atención al último parámetro aquí, si el suyo es Codificación Unicode, cambie -2 (codificación predeterminada del sistema) a -1 (codificación Unicode). 0 es ascii readfile=ts.ReadAll ts.close set ts=nada set fso=nadafunción finalfunción decodechrw(s)'decode chrw contenido codificado set rx=new RegExp rx.Global=true rx.IgnoreCase=true rx.Pattern=ChrW/s*/(/s*/d+/s*/)(/s*&/s*ChrW/s*/(/s*/d+/s*/))*'Decodificar cadena chrw establezca mc=rx.Execute(s) para cada m en mc s=replace(s, m.value,&eval(m.value)&) siguiente rx.Pattern=Chr/s*/(/s*/d+/s*/)(/s*&/s*Chr/s*/(/s*/d+/s*/))*'Cadena chr urgente establezca mc=rx.Execute(s) para cada m en mc s=replace(s, m.value,&eval(m.value)&) siguiente decodificaciónchrw=s función final decodechrwfile(fn) 'Decodifica el archivo que contiene la codificación chrw s=readfile(fn) s=decodechrw(s) 'Escribe el contenido decodificado nuevamente en el conjunto de archivos fso=createobject(scripting.filesystemobject) set ts=fso.OpenTextFile(replace(fn,.,_decode.),2,true,-2)'Escriba el contenido decodificado en el archivo cuyo nombre de archivo original se reemplaza con _decode. Si fn es encode.txt, entonces El decodificado. el archivo es encode_decode.txt ts.write s ts.close set ts=nada set fso=nadaend functiondecodechrwfile(encode.txt)' Preste atención para modificar el nombre del archivo y la ruta cifrados por chrw aquí, si es el contenido enviado por el cliente