前两天在做一个站内版的企搜引擎,发现某些站点可以链接站点内容。。 
奇怪之下看了看,原来是按照数据库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程序中的一点点经验,不足之处请大家多多指正! 
华山资源网 Design By www.eoogi.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
华山资源网 Design By www.eoogi.com

稳了!魔兽国服回归的3条重磅消息!官宣时间再确认!

昨天有一位朋友在大神群里分享,自己亚服账号被封号之后居然弹出了国服的封号信息对话框。

这里面让他访问的是一个国服的战网网址,com.cn和后面的zh都非常明白地表明这就是国服战网。

而他在复制这个网址并且进行登录之后,确实是网易的网址,也就是我们熟悉的停服之后国服发布的暴雪游戏产品运营到期开放退款的说明。这是一件比较奇怪的事情,因为以前都没有出现这样的情况,现在突然提示跳转到国服战网的网址,是不是说明了简体中文客户端已经开始进行更新了呢?