仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 351|回复: 9
打印 上一主题 下一主题

[学习教程] 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<br>
Encrypt(69)returns:JNMQMOJ8<br>
Decrypt("JNMQMOJ8")returns:69
<p>
Anotherexampleusingvariablesinstead:<br>
Encrypt(Request.Form("ID"))<br>
Encrypt(myVar)<br>
Decrypt(Request.QueryString("id"))<br>
Decrypt("JNMQMOJ8")<br>
Decrypt(myVar)

</body></html>
</p>当然了,现在国内CRM厂商的产品与其说是CRM,但从至少从我的角度分析上来看,充其量只是一个大型的进销存而已了,了解尚浅,不够胆详评,这里只提技术问题
精灵巫婆 该用户已被删除
沙发
发表于 2015-1-20 08:37:18 | 只看该作者
还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。
愤怒的大鸟 该用户已被删除
板凳
发表于 2015-1-29 06:14:04 | 只看该作者
用户端的浏览器不需要提供任何别的支持,这样大提高了用户与服务器之间的交互的速度。
再见西城 该用户已被删除
地板
发表于 2015-2-1 18:00:07 | 只看该作者
兴趣爱好,那么你无须学编程,申请一个域名和空间,在网上下载一些免费开源的CMS系统,你不用改代码,只须熟悉它们的后台操作,像office一样简单方便,很快就能建一个站点,很多站长都是这样做的
小女巫 该用户已被删除
5#
发表于 2015-2-2 21:43:53 | 只看该作者
在平时的学习过程中要注意现学现用,注重运用,在掌握了一定的基础知识后,我们可以尝试做一些网页,也许在开始的时候我们可能会遇到很多问题,比如说如何很好的构建基本框架。
不帅 该用户已被删除
6#
发表于 2015-2-8 07:20:45 | 只看该作者
尽管MS自己讲C#内核中更多的象VC,但实际上我还是认为它和Java更象一些吧。首先它是面向对象的编程语言,而不是一种脚本,所以它具有面向对象编程语言的一切特性,比如封装性、继承性、多态性等等,这就解决了刚才谈到的ASP的那些弱点。
变相怪杰 该用户已被删除
7#
发表于 2015-2-24 22:51:04 | 只看该作者
Request:从字面上讲就是“请求”,因此这个是处理客户端提交的东东的,例如Resuest.Form,Request.QueryString,或者干脆Request("变量名")
admin 该用户已被删除
8#
发表于 2015-3-7 13:51:15 | 只看该作者
不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍
飘飘悠悠 该用户已被删除
9#
发表于 2015-3-15 07:27:55 | 只看该作者
弱类型造成潜在的出错可能:尽管弱数据类型的编程语言使用起来回方便一些,但相对于它所造成的出错几率是远远得不偿失的。
若天明 该用户已被删除
10#
 楼主| 发表于 2015-3-21 20:21:43 | 只看该作者
我可以结合自己的经验大致给你说一说,希望对你有所帮助,少走些弯路。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-25 02:02

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表