当前位置: 首页 > 图文教程 > 网络编程 > ASP > 关于ASP生成伪参数技巧 简洁实用的伪(僞)参数

ASP
很不错的一个UBB代码
获取图片宽度和高度的类,支持JPG,GIF,PNG,BMP
无组件生成缩略图
如何远程调用ACCESS数据库[要求加精!!]
也谈采集入库的技术
asp打包类
分页类,异常类
ASP用JMail、CDO发送邮件
保存远程图片函数修改正版
图片自动保存到本地并利用aspjpeg为图片加水印
改进 ASP 的字符串处理性能
简单分页函数一 常用
LINE9的目录浏览源程序
使用XMLDOM在不支持FSO的服务器上
[原创]本人常用的asp代码
生成所有页面的效果+分页生成
[原创]asp+fso在线管理图片功能
ASPJPEG学习手记
ASP代码的对象化
[原创]关于Script的Defer属性

关于ASP生成伪参数技巧 简洁实用的伪(僞)参数


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 173 ::
收藏到网摘: n/a

简洁实用的伪(僞)参数
前两天在做一个站内版的企搜引擎,发现某些站点可以链接站点内容。。
奇怪之下看了看,原来是按照数据库ID的自动编号规律进行链接的~~
闲暇之余弄了下面这个东东,希望对大家在以后的编写ASP程序中有所帮助!
复制代码 代码如下:

<%
//生成指定位数的随机数字
//也可以用Guidy写的iXuEr_Rnd_Str函数,自带15种样式,可以伪MD5啦!!
Function rndStr(strLong)
Dim tempStr
Randomize
Do While Len(rndStr) < strLong
tempStr=CStr(Chr((57-48)*rnd+48))
rndStr=rndStr&tempStr
Loop
rndStr=rndStr
End Function
%>

下面以Form表单中提交的参数为例子针对Request.Form,需要传递的参数doAction原来的值是从数据库读取的ID
<form name=iform action="ABC.asp" method="post">
<input name=doAction type="hidden" value="<%=rndStr(10)%><%=Rs("ID")%><%=rndStr(10)%>">
</form>
注意:
上面的doAction的值有了改变,每刷新一次页面得到的值都不一样~~
下面是ABC.asp页面
首先取得doAction的值
doAction = Trim(Request.Form("doAction"))
下面大家可以自己加一点验证,如IsNumeric等!
然后我们来分解doAction的值
复制代码 代码如下:

Dim LastID
doAction = Mid(doAction,11)
LastID = Mid(doAction,1,Len(doAction)-10)

如果大家对Mid函数熟悉的话,上面的内容很容易就猜到,简单吧?
下面是实际的例子:
原doAction要传递的ID在数据库里(字段类型为自动编号)的值为:34
说明:
Mid(doAction,11)里的11为你所生成随机字符位数+1
LastID = Mid(doAction,1,Len(doAction)-10)里的10为所指定生成的随机字符位数!
Dim LastID
doAction = 3614354944348151287527 — 经过伪装后的ID值(完全可以当数字来验证)
doAction = Mid(doAction,11)
LastID = Mid(doAction,1,Len(doAction)-10)
LastID = 34
我实验了一下,如果配合随机生成的字母和数字一起运用的话,那完全是可以伪成MD5类似的值!
只是条件就一个,要可以指定随机字符的位数!
哈哈,现在大家Response.Write输出LastID的值看看,是不是又是数据库里的ID啦?
这个方法可以运用到影片参数的加密,下载等.如做了政府的公文流转系统,还可以用到文件上面去!
针对Request.QueryString的也是同一个道理!照葫芦画瓢啦...
以上是本人在编写ASP程序中的一点点经验,不足之处请大家多多指正!
大家可以根据需要,取中间的几位,也可以的