ASP页面随机添加字符实现防复制的代码
<% "作用:文字防复制乱码函数 "Date:2006-3-6 "作者:blue2004 "参数str为原文,str1作者也是你自己,reslut产生乱码的种子 FunctionReadToCode(str,Str1,result) dimname dimi,j,k Ifisnull(str)then ReadToCode="" ExitFunction EndIf Randomize k=instr(str,"</P>") Dowhil...