ASP网页编程之一套加解密字符串的函数

只看该作者 · 发表于 2015-1-16 23:14:46

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有帐号？立即注册

x

ASP最大的缺点在于网络的安全性和可靠性，企业将经营数据放在开放的平台上，最大的担忧就是如何保证这些数据不被其他人破坏。函数|解密|字符串<%
FunctionEncrypt(theNumber)
OnErrorResumeNext
Dimn,szEnc,t,HiN,LoN,i
n=CDbl((theNumber+1570)^2-7*(theNumber+1570)-450)
Ifn<0ThenszEnc="R"ElseszEnc="J"
n=CStr(abs(n))
Fori=1ToLen(n)step2
t=Mid(n,i,2)
IfLen(t)=1Then
szEnc=szEnc&t
ExitFor
EndIf
HiN=(CInt(t)And240)/16
LoN=CInt(t)And15
szEnc=szEnc&Chr(Asc("M")+HiN)&Chr(Asc("C")+LoN)
Next
Encrypt=szEnc
EndFunction

FunctionDecrypt(theNumber)
OnErrorResumeNext
Dime,n,sign,t,HiN,LoN,NewN,i
e=theNumber
IfLeft(e,1)="R"Thensign=-1Elsesign=1
e=Mid(e,2)
NewN=""
Fori=1ToLen(e)step2
t=Mid(e,i,2)
IfAsc(t)>=Asc("0")AndAsc(t)<=Asc("9")Then
NewN=NewN&t
ExitFor
EndIf
HiN=Mid(t,1,1)
LoN=Mid(t,2,1)
HiN=(Asc(HiN)-Asc("M"))*16
LoN=Asc(LoN)-Asc("C")
t=CStr(HiNOrLoN)
IfLen(t)=1Thent="0"&t
NewN=NewN&t
Next
e=CDbl(NewN)*sign
Decrypt=CLng((7+sqr(49-4*(-450-e)))/2-1570)
EndFunction
%>
<html><body>
Originalnumber:69 
Encrypt(69)returns:JNMQMOJ8 
Decrypt("JNMQMOJ8")returns:69

Anotherexampleusingvariablesinstead: 
Encrypt(Request.Form("ID")) 
Encrypt(myVar) 
Decrypt(Request.QueryString("id")) 
Decrypt("JNMQMOJ8") 
Decrypt(myVar)

</body></html>

源代码保护方面其实现在考虑得没那么多了..NET也可以反编译.ASP写得复杂的话别人能看得懂的话.他也有能力自己写了.这方面担心的倒不太多.纵观现在网上可以下载的那些所谓BBS还有什么网站等等的源代码

只看该作者 · 发表于 2015-1-20 08:37:18

弱类型造成潜在的出错可能：尽管弱数据类型的编程语言使用起来回方便一些，但相对于它所造成的出错几率是远远得不偿失的。

只看该作者 · 发表于 2015-1-29 06:14:11

ASP也是这几种脚本语言中最简单易学的开发语言。但ASP也是这几种语言中唯一的一个不能很好支持跨平台的语言。　　因为ASP脚本语言非常简单，因此其代码也简单易懂，结合HTML代码，可快速地完成网站的应用程序。

只看该作者 · 发表于 2015-2-1 18:00:07

运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中，便可快速完成网站的应用程序，无需编译，可在服务器端直接执行。容易编写，使用普通的文本编辑器编写，如记事本就可以完成。由脚本在服务器上而不是客户端运行，ASP所使用的脚本语言都在服务端上运行。

只看该作者 · 发表于 2015-2-7 12:46:46

交流是必要的，不管是生活还是学习我们都要试着去交流，通过交流我们可以学到很多我们自己本身所没有的知识，可以分享别人的经验甚至经历。

只看该作者 · 发表于 2015-2-21 21:14:52

兴趣爱好，那么你无须学编程，申请一个域名和空间，在网上下载一些免费开源的CMS系统，你不用改代码，只须熟悉它们的后台操作，像office一样简单方便，很快就能建一个站点，很多站长都是这样做的

只看该作者 · 发表于 2015-3-13 21:59:34

Request:从字面上讲就是“请求”，因此这个是处理客户端提交的东东的,例如Resuest.Form，Request.QueryString,或者干脆Request("变量名")

只看该作者 · 发表于 2015-3-20 19:51:02

我可以结合自己的经验大致给你说一说，希望对你有所帮助，少走些弯路。

		自动登录	找回密码
密码			立即注册

[学习教程] ASP网页编程之一套加解密字符串的函数

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子