手机
当前位置:查字典教程网 >电脑 >电脑安全教程 >用CFS编码对函式库进行加密
用CFS编码对函式库进行加密
摘要:本文介绍一种用CFS编码对函式库进行加密的方法。

本文介绍一种用CFS编码对函式库进行加密的方法。

<% '******************************************** '** '*CFS Encode Function* '** '*Produced by ASP-Zone* '** '*Main website is located at* '*http://asp.diy.com.tw/* '** '*E-MAIL:* '*thiefghost@games.com.tw* '** '*Use this function:* '*<>* '** '*2001/8/3* '** '******************************************** 'Encode Function Function CfsEnCode(CodeStr) Dim CodeLen Dim CodeSpace Dim NewCode CodeLen = 30 CodeSpace = CodeLen - Len(CodeStr) If Not CodeSpace < 1 Then For cecr = 1 To CodeSpace CodeStr = CodeStr & Chr

(21) Next End If NewCode = 1 Dim Been For cecb = 1 To CodeLen Been = CodeLen Asc(Mid(CodeStr,cecb,1)) * cecb NewCode = NewCode * Been Next CodeStr = NewCode NewCode = Empty For cec = 1 To Len(CodeStr) NewCode = NewCode & CfsCode(Mid(CodeStr,cec,3)) Next For cec = 20 To Len(NewCode) - 18 Step 2 CfsEnCode = CfsEnCode & Mid(NewCode,cec,1) Next End Function Function CfsCode(Word) For cc = 1 To Len(Word) CfsCode = CfsCode & Asc(Mid(Word,cc,1)) Next CfsCode = Hex(CfsCode) End Function %>

【用CFS编码对函式库进行加密】相关文章:

密码的一些存储方式和安全传输建议

PHP多字节编码漏洞小结

安全策略对网络化设备管理有用吗

如何强行破解台式电脑的开机密码?破解方法介绍

百度知道漏洞之存在反射型XSS的分析与解决方法

无法启动 Windows 安全中心服务,怎么办?

McAfee麦咖啡企业版8.8设置方法

百度卫士系统清理过程中,误删文件怎么办?

设置Win8开机按F8进入安全模式

360安全卫士防黑加固功能的使用方法

精品推荐
分类导航