Decrypt the ASP source code.

From the online interest dash down the ground to download the ASP source code, ready to study the time.
An open file, the code of the Heavenly book. That's depressing, isn't it:(
On the internet is found the decryption method, get a file by a file
Open, copy, paste, decrypt, copy, paste, save ...
If an ASP program has hundreds of files???
The solution came.
Decode.asp
<% @Language = "JavaScript"%>
<%
/*
*---------------decode.asp-----------------
* Function: Traverse a directory of all files, to the encrypted. asp files
* To decrypt and write to the source file.
* Instance: Single File decryption
* Response.Write (Dncodefile (Server.MapPath ("conn.asp"));
* Instance: All files in the directory are decrypted.
* Dncodefolderfiles (Server.MapPath ("xml"))
* AUTHOR:WANGHR100 (Grey bean baby. NET)
* UPDATE:2004-5-17 11:31
*---------------decode.asp-----------------
*/
function Dncodefile (Sfilepath)
{
/*
*---------------Dncodefile (Sfilepath)-----------------
* Dncodefile (Sfilepath)
* Function: Open the file Sfilepath,encode decryption, rewrite the file.
* Parameters: Sfilepath, string, path to file.
* Return: Sfilepath, the path to the file.
* Example: Response.Write (Dncodefile (Server.MapPath ("conn.asp"));
* AUTHOR:WANGHR100 (Grey bean baby. NET)
* UPDATE:2004-5-17 0:58
*---------------Dncodefile (Sfilepath)-----------------
*/
var ForReading = 1, ForWriting =2, ForAppending = 8;
var fso = Server.CreateObject ("Scripting.FileSystemObject");
var f = fso. OpenTextFile (sfilepath,forreading,true);
Sfiletext = F.readall ();
F.close ();
Sdncodetext = Strdec (Sfiletext)
var f = fso. OpenTextFile (sfilepath,forwriting,true);
F.write (Sdncodetext);
F.close ();
return sdncodetext;
return sfilepath;
}
function Getfilespath (Sfolderpath)
{
/*
*---------------Getfilespath (Sfolderpath)-----------------
* Getfilespath (Sfolderpath)
* Function: Traverse all the files in the Sfolderpath directory. Returns an array. stores the file path.