renchaomike的专栏

<% <br /> function encrypt(ecode) <br />   Dim texts <br />   dim i <br />   for i=1 to len(ecode) <br />    texts=texts & chr(asc(mid(ecode,i,1))+i) <br />   next <br />       encrypt = texts <br />       end function <br /> function decryp

<br /> Request.ServerVariables("Url") <br /> 返回服务器地址 <br /> Request.ServerVariables("Path_Info") <br /> 客户端提供的路径信息 <br /> Request.ServerVariables("Appl_Physical_Path") <br /> 与应用程序元数据库路径相应的物理路径 <br /> Request.ServerVariables("Path_Translated")