前兩天在做一個站內版的企搜引擎,發現某些站點可以鏈接站點內容。 。
奇怪之下看了看,原來是按照數據庫ID的自動編號規律進行鏈接的~~
閒暇之餘弄了下面這個東東,希望對大家在以後的編寫ASP程序中有所幫助!
<%
''//生成指定位數的隨機數字
''//也可以用Guidy寫的iXuEr_Rnd_Str函數,自帶15種樣式,可以偽MD5啦!!
FunctionrndStr(strLong)
DimtempStr
Randomize
DoWhileLen(rndStr)<strLong
tempStr=CStr(Chr((57-48)*rnd+48))
rndStr=rndStr&tempStr
Loop
rndStr=rndStr
EndFunction
%>
下面以Form表單中提交的參數為例子針對Request.Form,需要傳遞的參數doAction原來的值是從數據庫讀取的ID
<formname=iformaction="ABC.asp"method="post">
<inputname=doActiontype="hidden"value="<%=rndStr(10)%><%=Rs("ID")%><%=rndStr(10)%>">
</form>
注意:
上面的doAction的值有了改變,每刷新一次頁面得到的值都不一樣~~
下面是ABC.asp頁面
首先取得doAction的值
doAction=Trim(Request.Form("doAction"))
下面大家可以自己加一點驗證,如IsNumeric等!
然後我們來分解doAction的值
DimLastID
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為所指定生成的隨機字符位數!
DimLastID
doAction=3614354944348151287527—經過偽裝後的ID值(完全可以當數字來驗證)
doAction=Mid(doAction,11)
LastID=Mid(doAction,1,Len(doAction)-10)
LastID=34
我實驗了一下,如果配合隨機生成的字母和數字一起運用的話,那完全是可以偽成MD5類似的值!
只是條件就一個,要可以指定隨機字符的位數!
哈哈,現在大家Response.Write輸出LastID的值看看,是不是又是數據庫裡的ID啦?