asp加密解密函数decrypt
更新时间：2008年01月09日 13:40:16 作者：
asp加密解密函数decrypt
加密与解密函数
<%function decrypt(dcode)
dim texts
dim i
for i=1 to len(dcode)
texts=texts & chr(asc(mid(dcode,i,2))-i)
next
decrypt=texts
end function
function encrypt(ecode)
Dim texts
dim i
for i=1 to len(ecode)
texts=texts & chr(asc(mid(ecode,i,2))+i)
next
encrypt = texts
end function
%>
<%=decrypt(123123)%>
<a href="11111.asp?id=<%=decrypt("sdfasdfs")%>">111111111</a>
<%abc=encrypt(request("id"))%><%=abc%>
<%function decrypt(dcode)
dim texts
dim i
for i=1 to len(dcode)
texts=texts & chr(asc(mid(dcode,i,2))-i)
next
decrypt=texts
end function
function encrypt(ecode)
Dim texts
dim i
for i=1 to len(ecode)
texts=texts & chr(asc(mid(ecode,i,2))+i)
next
encrypt = texts
end function
%>
<%=decrypt(123123)%>
<a href="11111.asp?id=<%=decrypt("sdfasdfs")%>">111111111</a>
<%abc=encrypt(request("id"))%><%=abc%>
相关文章
asp大小写规范是个网页转换工具，实现asp中大小写的替换，大家可以测试下2008-06-06
很多朋友想在最新新闻显示new图片，以便访客快速找到新更新的内容，原理就是通过判断日期2012-03-03
在不刷新页面的情况下调用远程asp脚本...2007-01-01
ASP利用Google实现在线翻译功能...2006-09-09
ASP 包含文件中的路径问题和使用单一数据库连接文件的解决方案
全站只需要用一个数据库连接文件的实现函数代码2009-03-03
asp中用insert into语句向数据库插入记录(添加信息)的方法
asp中用insert into语句向数据库插入记录信息的方法，学习的朋友可以参考下。2010-09-09
当网站的数据越来越多的时候，一台服务器就遇到瓶劲了，导致服务器运行慢，前台页面半天打不开。2011-05-05
改善程序性能是一件很微妙的事情。尤其是和INTERNET相关的程序，像ASP程序，制约其性能的因素很多，像 WEB服务器、TCP/IP网络和数据库服务器等。2011-02-02
用QuickWAP组件结合ASP建设Wap站点...2007-03-03
修改文件的名字和修改文件夹的名字的asp代码2008-11-11
最新评论