<p> 前两天在做一个站内版的企搜引擎,发现某些站点可以链接站点内容。。</p><p> 奇怪之下看了看,原来是按照数据库ID的自动编号规律进行链接的~~</p><p> 闲暇之余弄了下面这个东东,希望对大家在以后的编写ASP程序中有所帮助!</p><code><%<br />''//生成指定位数的随机数字<br />''//也可以用Guidy写的iXuEr_Rnd_Str函数,自带15种样式,可以伪MD5啦!!<br />Function rndStr(strLong)<br />Dim tempStr<br />Randomize<br />Do While Len(rndStr) < strLong<br />tempStr=CStr(Chr((57-48)*rnd+48))<br />rndStr=rndStr&tempStr<br />Loop<br />rndStr=rndStr<br />End Function<br />%></code><p> 下面以Form表单中提交的参数为例子针对Request.Form,需要传递的参数doAction原来的值是从数据库读取的ID</p><code><form name=iform action="ABC.asp" method="post"><br /><input name=doAction type="hidden" value="<%=rndStr(10)%><%=Rs("ID")%><%=rndStr(10)%>"><br /></form></code><p> 注意:</p><p> 上面的doAction的值有了改变,每刷新一次页面得到的值都不一样~~</p><p> 下面是ABC.asp页面</p><p> 首先取得doAction的值</p><code>doAction = Trim(Request.Form("doAction"))</code><p> 下面大家可以自己加一点验证,如IsNumeric等!</p><p> 然后我们来分解doAction的值</p><code>Dim LastID<br />doAction = Mid(doAction,11)<br />LastID = Mid(doAction,1,Len(doAction)-10)</code><p> 如果大家对Mid函数熟悉的话,上面的内容很容易就猜到,简单吧?</p><p> 下面是实际的例子:</p><p> 原doAction要传递的ID在数据库里(字段类型为自动编号)的值为:34</p><p> 说明:</p><p> Mid(doAction,11)里的11为你所生成随机字符位数+1</p><p> LastID = Mid(doAction,1,Len(doAction)-10)里的10为所指定生成的随机字符位数!</p><code>Dim LastID<br />doAction = 3614354944348151287527 ― 经过伪装后的ID值(完全可以当数字来验证)<br />doAction = Mid(doAction,11)<br />LastID = Mid(doAction,1,Len(doAction)-10)<br />LastID = 34</code><p> 我实验了一下,如果配合随机生成的字母和数字一起运用的话,那完全是可以伪成MD5类似的值!</p><p> 只是条件就一个,要可以指定随机字符的位数!</p><p> 哈哈,现在大家Response.Write输出LastID的值看看,是不是又是数据库里的ID啦?</p><p> 这个方法可以运用到影片参数的加密,下载等.如做了政府的公文流转系统,还可以用到文件上面去!</p><p> 针对Request.QueryString的也是同一个道理!照葫芦画瓢啦...</p><p> 以上是本人在编写ASP程序中的一点点经验,不足之处请大家多多指正!</p>