高清国产av一区二区三区_亚洲欧美日韩在线_无码熟妇人妻av在线影片免费_在线无码一级伊伊_爽好舒服高H自慰软件_亚洲熟女区偷拍区高清区_午夜福利影院啪啪_亚洲国产黄片在线播放_中文字幕日韩精品乐乐影院_久久国产亚洲日韩欧美精品

前幾天接到客戶的反饋，說他的站點(diǎn)頁面被taobao站點(diǎn)引用，導(dǎo)致自己服務(wù)器的流量過大，需要提供對(duì)策，但是還不能屏蔽了taobao站點(diǎn)，我們再三考慮分析，可以使用如下代碼：
一，防復(fù)制粘貼：
<%        '作用:文字防復(fù)制亂碼 函數(shù)
        'Date:2006-3-6
        '作者:blue2004
        '參數(shù)str 為原文,str1作者也是你自己,reslut產(chǎn)生亂碼的種子
        Function ReadToCode(str,Str1,result)
                dim name
                dim i,j,k
                If isnull(str) then
                        ReadToCode=""
                        Exit Function
                End If
                Randomize
                k=instr(str,"</P>")
                Do while k>0
                        result=""
                        for i=0 to 19
                                j=Int(128 * Rnd)+1
                                if j=60 or j=62 then
                                        j=j+1
                                end if
                                result =result&chr(j) ' 產(chǎn)生隨機(jī)數(shù)。
                            next
                        result="<span style='DISPLAY: none'>"&result&"</span>"
                        str=replace(str,"</p>",result&"<'/p