利用数字加密对用户密码加密

《利用数字加密对用户密码加密》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、COMPUTINGSECURITYTECHNIQUES计算机安全技术利用数字加密对用户密码加密贾西科，杨战旗(河南理工大学高等职学院，焦作454000)摘要：主要介绍在使用ASP技术设计的网站，对注册用户的密码进行加密，并使加密后的信息保存在密码表中。用户登录网站时，将用户提交的密码与密码表中的用户密码解密后进行比较，判读登录用户是否合法用户。关键词：加密算法；解密算法；ASP技术UsingaDigitalEncryptiontoUserPasswordEncryptionJIAX嗽e．YANGZhanqi(HenanPolytechnicUniversity，H

2、ighervocationalcollege，Jiaozuo454000)Abstract：thisintroducestheu8eofASPtechnologyindesignthesite。toregistereduse瑙passwordencrypted,papermainlyandmakeinformationstoredinthepasswordlist．toginuser$logonsite．willtheu8ersubmittedthepasswordandencryptedpasswordtablecomparinguserpassworddeer

3、yptiOil，readingafterlandinglegitimateuseEs．Keywords：Encryptionalgorithm；Decryptionalgorithm；ASPtechnologyl创建加密与解密的自定义函数1．3解密函数deleode(inint)该函数主要针对addcode0函数的加密算法对密码表中加密函数addeode0将用户的密码信息进行加密，最终使密码表中保存的密码为加密后的信息，即使将来一些用户的用户密码进行解密。闯入系统内部读取密码表的信息，也是无法登录到系统。Functiondelcode(inint)Onerrorr

4、esumeNext1．1加密函数addeode(inint)E----inint该函数主要介绍密码加密算法。Ifleft(e，1)=“r’’thenFunctionaddcode(inint)Flag=-IOnerrorresumeNextEl∞N《Dblr(inint+717)A2_7．(inint+717)-17)Flag=lIfn<0t11enEndifResult=“r’’E--mid(e，2)ElseNew=“”Result=“i”Fori=ltolen(e)step2EndifT=mid(e，I，2)N=CStr(abs(n))Ifasc(t)>-as

5、c(⋯0’)anda$c(t)<-a$c(“9”)thenFori=ltolen(n)step2New--new&tT--mid(n，I，2)ExitforIflen(t)=1thenEndifResult=result&tHin=mid化l，1)ExitforLon--mid0,2，1)EndifHin一--(asc(hin)一asc(“m”))"16Hin=(cint(t)and240)／16Lon=asc(Ion)一aseCc)Lon=(Cint(t)and15T=cstr(binorIon)Result---result&chr(asc(“m”)+lain

6、)&chr(asc(“c”)+Ion)Iflen(t)=lthen倚“0”&tnextNew=new&taddcode---resultNextendfunctionE----CDBl(new)+flag1．2加密过程’Delcode-Clng((7+sr(49_4+(．17--e)))／2—717)endfunction该过程是通过使用addeode0函数对用户密码进行加密。1．4解密过程Functionadd_code(inCHar)该过程是通过使用delcode0函数对密码表中的用户密码cReture=“”fori=ltolen(inCHar)进行解密。cR

7、eture=cReture&“％”addcode(ascW(mid(inCHar，I，1)))作者简介：贾西科，男，研究方向：计算机网络技术、网站ne妣建设与规划。收稿日期：2011-04—18电脑编程技巧与维护Functiondel_code(inCHar)Nst--replace(nst,“char(37)”，“>”)cReture=””Nst=replace(nst，“”“”，“"；”)arr=-split(inCHar,”％”)Nst--replace(nsL“；“，“：；”)foreachIinalTNst=replace(nst,“一”，“

8、一”)if