浏览模式: 标准 | DIGG原创文章

推荐日志彻底屏蔽迅雷，旋风，快车下载站内资源

2008年11月16日 星期日

迅雷，旋风，快车这些下载工具虽然大大方便了我们下载，但是这些工具现在越来越流氓了，都集成了P2P下载方式，导致站内下载流量猛增，这些还不算，最可恶的是迅雷可以在别的站点下载文件而用你的资源，点击量上不来流量反而上来了！

经过观察发现了最简单有效的方法，判断AGENT，一般的下载软件都会有几个特定的AGENT，当然有的也会模拟IE，跟IE一模一样，那样你就没有办法了，总不能连IE也屏蔽了吧！不过还好，大部分还是没有完全模拟IE的！！所以根据这些我们就很容易可以写出代码屏蔽了。

  1. <% 
  2. '屏蔽主流的下载工具 
  3. Dim xurl,xtool 
  4.     '获取浏览器AGENT 
  5.     xurl    =   lcase(Request.ServerVariables("HTTP_USER_AGENT")) 
  6.     '定义禁止的AGENT，下面5个包含最新版的快车，旋风和迅雷部分版本，可以自行添加！ 
  7.     xtool   =   "mozilla/4.0 (compatible; msie 5.00; windows 98)" &_ 
  8.                 "mozilla/4.0 (compatible; msie 6.0; windows+nt 5.0)" &_ 
  9.                 "mozilla/4.0 (compatible; msie 6.0; windows nt 5.1; )" &_ 
  10.                 "mozilla/4.0 (compatible; msie 6.0; windows nt 5.0; .net clr 1.1.4322)" &_ 
  11.                 "mozilla/4.0 (compatible; msie 6.0; windows nt 5.0; .net clr 3.5.20706)" &_ 
  12.                 "mozilla/4.0 (compatible; msie 6.0; windows nt 5.1; sv1; .net clr 1.1.4322; .net clr 2.0.50727)" 
  13.     '判断AGENT是否合法 
  14.     If InStr(xtool,xurl)>0 Then 
  15.         '下载工具直接报404错误 
  16.         Response.Status = "404 Not Found" 
  17.         Response.End 
  18.     End If 
  19.     '其它的代码在下面 
  20.     Response.Write "正常浏览内容，你可以用下载工具测试下载该页面看看是否可以下载？" 
  21. %> 

上面的代码应该很容易看懂吧！！本来不想公布，很多人要就发出来了！image

全文完

Tags: 迅雷, 旋风, 快车

原创文章 | 评论:5 | 阅读:62

日文假名片的简单处理

2008年11月01日 星期六

网络上很多都是转成特定字符，然后在查询或显示的时候再转回来！

这种方法很烦琐，不是我所需要的，于是根据需要修改成了以下代码

  1. Function Jpcode(Str) 
  2.  Jpcode=Str 
  3. '无数据退出 
  4. If isnull(Str) Or len(Str)=0 then Exit Function 
  5. dim J,E,I    
  6.     J=array("ゴ","ガ","ギ","グ","ゲ","ザ","ジ","ズ","ヅ","デ","ド","ポ","ベ","プ","ビ","パ","ヴ","ボ","ペ","ブ","ピ","バ","ヂ","ダ","ゾ","ゼ")    
  7.     E=array("468","460","462","464","466","470","472","474","485","487","489","509","505","503","499","497","532","508","506","502","500","496","482","480","478","476") 
  8.     for I=0 to 25      
  9.         Jpcode=replace(Jpcode,J(I),"&#12"&E(I))    
  10.     next    
  11. End Function 

使用很简单，只要是文本的就给它加上，这样入库后可以直接显示，不需要再做任何转换，搜索的时候把关键字也转一下再搜索，这样就可以使用简单的LIKE语句而不会出错！（我原来是使用对比的方式，效率差点）

全文完

Tags: 日文, 假名片

原创文章 | 评论:0 | 阅读:13

最精简Base64加密解密ASP,JS通用版

2008年10月27日 星期一

从微软里面分离出来再次精简的，不使用类了，这么个小函数调用麻烦死了，JS，ASP里面都可以使用，当然其它的语言稍微修改也可以用的！

  1. <script type="text/javascript"> 
  2. var keyStr = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/="; 
  3. //加密 
  4. function base64encode(Str) { 
  5.     Str = escape(Str); 
  6.     var output = ""; 
  7.     var chr1, chr2, chr3 = ""; 
  8.     var enc1, enc2, enc3, enc4 = ""; 
  9.     var i = 0; 
  10.     do { 
  11.         chr1 = Str.charCodeAt(i++); 
  12.         chr2 = Str.charCodeAt(i++); 
  13.         chr3 = Str.charCodeAt(i++); 
  14.         enc1 = chr1 >> 2; 
  15.         enc2 = ((chr1 & 3) << 4) | (chr2 >> 4); 
  16.         enc3 = ((chr2 & 15) << 2) | (chr3 >> 6); 
  17.         enc4 = chr3 & 63; 
  18.         if (isNaN(chr2)) {enc3 = enc4 = 64;} else if (isNaN(chr3)) {enc4 = 64;} 
  19.         output = output + keyStr.charAt(enc1) + keyStr.charAt(enc2) + keyStr.charAt(enc3) + keyStr.charAt(enc4); 
  20.         chr1 = chr2 = chr3 = ""; 
  21.         enc1 = enc2 = enc3 = enc4 = ""; 
  22.     } while (i < Str.length); 
  23.     return output; 
  24. } 
  25. //解密 
  26. function base64decode(Str) { 
  27.     var output = ""; 
  28.     var chr1, chr2, chr3 = ""; 
  29.     var enc1, enc2, enc3, enc4 = ""; 
  30.     var i = 0; 
  31.     var base64test = /[^A-Za-z0-9\+\/\=]/g; 
  32.     if (base64test.exec(Str)){} 
  33.     Str = Str.replace(/[^A-Za-z0-9\+\/\=]/g, ""); 
  34.     do { 
  35.         enc1 = keyStr.indexOf(Str.charAt(i++)); 
  36.         enc2 = keyStr.indexOf(Str.charAt(i++)); 
  37.         enc3 = keyStr.indexOf(Str.charAt(i++)); 
  38.         enc4 = keyStr.indexOf(Str.charAt(i++)); 
  39.         chr1 = (enc1 << 2) | (enc2 >> 4); 
  40.         chr2 = ((enc2 & 15) << 4) | (enc3 >> 2); 
  41.         chr3 = ((enc3 & 3) << 6) | enc4; 
  42.         output = output + String.fromCharCode(chr1); 
  43.         if (enc3 != 64) {output = output + String.fromCharCode(chr2);} 
  44.         if (enc4 != 64) {output = output + String.fromCharCode(chr3);} 
  45.         chr1 = chr2 = chr3 = ""; 
  46.         enc1 = enc2 = enc3 = enc4 = ""; 
  47.     } while (i < Str.length); 
  48.     return unescape(output); 
  49. } 
  50. document.write(base64encode('蓝雨')) 
  51. document.write(base64decode('JXU4NEREJXU5NkU4')) 
  52. document.write(base64decode(base64encode('蓝雨'))) 
  53. </script> 

需要在ASP里面使用只需要修改头部让它在服务器端执行即可

  1. <script language="JScript" runAt="server"> 

全文完

Tags: 精简, base64, 加密解密, ASP, JS, 通用版

原创文章 | 评论:8 | 阅读:72

静态页面定时更新新方法！！

2008年10月13日 星期一

一般页面生成静态后，需要更新必须手动。

或者采用土办法，数据库里面加个字段，每次打开完去读取这个字段的时间，如果小于预定值不去处理，大于就重新生成，这样就保证了页面信息的即时性！

但是这样有个弊端，每个页面必须有一个相对应的时间值才可以！！如果页面很复杂的话就不好处理了，特别是分页部分！！

下面我要说的是利用文件本身的时间值来定时自动更新（已经应用在BCMS1.1上），原来很简单，FSO判断文件最后更新时间，然后再根据时间值选择是否需要更新。

先写个获取时间的函数，方便调用

  1. '获取文件最后修改时间 
  2.  
  3. Function GetDateLast(path) 
  4. on error resume next 
  5. Dim FSO,objFile 
  6. Set FSO = Server.CreateObject("scripting.filesystemobject") 
  7.     GetDateLast = FSO.GetFile(Server.Mappath(path)).DateLastModified 
  8. Set FSO = Nothing 
  9. if err.number<>0 then err.clear 
  10. End Function 

然后就是时间对比了，

  1. DateDiff("n", CDate(GetDateLast("文件路径")), Now()) 

说到这里会的应该看懂了，不会的就没有办法了，代码都在这里了看你什么应用了，这个非常方便，可以定时更新任何一个文件，而不需要查询数据库！！

全文完

原创文章 | 评论:0 | 阅读:37

推荐日志你用几款浏览器？我使用的浏览器大全！

2008年09月05日 星期五

相同内核的不算，比如基于IE内核的世界之窗等等！除IE外其它的只列出最新版本！

IE6

名称:IE6.JPG 大小:124.7 KB

IE7

名称:IE7.JPG 大小:126.9 KB

继续阅读...

Tags: 浏览器, IE, Chrome, firefox, Netscape, opera, Safari

原创文章 | 评论:2 | 阅读:110

推荐日志chrome谷歌浏览器第一时间抢先测试！（多图）

2008年09月03日 星期三

得到信息今天chrome浏览器开放下载，忍不住下载了一个测试下！

基本上一般的网页浏览还是正常的，下面将详细讲解chrome浏览器从安装到功能上的改变，

浏览器官方下载地址：http://www.google.com/chrome

绿色免安装版下载：http://fj126.net/down/html/94/index.html

9.4新增官方即时更新地址：http://build.chromium.org/buildbot/snapshots/chromium-rel-xp/

即时更新包按数字排序，数字越高版本越高，请进入最高数字的目录，如1885
名称:Snap1.jpg 大小:11.7 KB
接着选择下载安装文件，或免安装版本
名称:Snap2.jpg 大小:8.3 KB
我一般都是下载chrome-win32.zip这个，不喜欢安装版的！

言归正传，测试开始！

自动下载，跟其它的浏览器不大一样，这个是在线下载的！
名称:snap001.jpg 大小:10.9 KB

安装中

名称:snap002.jpg 大小:11.2 KB

继续阅读...

Tags: google, 谷歌, chrome, 浏览器, 测试

原创文章 | 评论:3 | 阅读:101

关于网页设计标准的一些数据

2008年08月26日 星期二

下面是本站30天内的数据，包含雅虎和百度，Google的拉速度所以没有用（百度的也不想用了）

浏览器

名称:snap001.jpg 大小:27.3 KB

名称:snap002.jpg 大小:49.5 KB

根据数据得出！5万左右的PV，IE6-IE7占了80%以上的份额，其次是FF3了，其它的根本微不足道！

总结：做好的页面以IE6,IE7,FF3为标准，在这三款浏览器下显示正常就可以了，没有必要为了那么一点点的其它非主流浏览器大费周章！

继续阅读...

原创文章 | 评论:0 | 阅读:39

如何给博客加上Gravatar通用版！

2008年07月25日 星期五

这里只是谈下原理，不会编程的可以直接跳过这篇！

  1. 首先，你的评论要支持邮箱输入，假如不支持就请先在数据库加个MAIL字段
  2. 读取的时候判断是否存在邮箱，存在则把邮箱地址MD5加密然后套用调用公式，没有邮箱直接显示默认图片

链接代码

  1. http://www.Gravatar.com/avatar.php?gravatar_id=MD5加密后的字段&rating=等级&size=头像大小&&default=缺省头像 

结束icon，个人感觉加这个非常简单，没有任何技术性可言！

全文完

Tags: 博客, Gravatar

原创文章 | 评论:4 | 阅读:290

1612››