帮忙写一个解密函数 - ASP技术论坛

编程论坛 → WEB开发 → 『 ASP技术论坛』 → 帮忙写一个解密函数

标题：帮忙写一个解密函数

只看楼主

belin2000

等　级：论坛游侠
威　望：5
帖　子：975
专家分：194
注　册：2004-6-2
结帖率：0

问题点数：0 回复次数：1

帮忙写一个解密函数

function code(str)
    dim i,newstr
    for i=1 to len(str)
    newstr=newstr&hex(asc(mid(str),i,1)*3)
next
md=newstr
end function

搜索更多相关主题的帖子: 函数　解密　

2005-07-22 14:53

belin2000

等　级：论坛游侠
威　望：5
帖　子：975
专家分：194
注　册：2004-6-2

得分:0

更正函数
function code(str)
    dim i,newstr
    for i=1 to len(str)
    newstr=newstr&(hex(asc(mid(str,i,1))*3))
next
md=newstr
end function

59ita点com(我就爱TA)

2005-07-22 15:53