1. Just Ping

http://www.just-ping.com/
这个网站只要你输入服务器域名或者IP，它就能通过全球50处地方ping你所指定的服务器，然后输出结果。

2. Free online network tools

http://centralops.net/co/
提供了一些功能强大的网络命令工具合集，其中有些可以用来检测域名的情况（解析、Whois等），非常方便。

3. Network Tools

http://network-tools.com/
提供了一些简单的网络命令工具合集，比如ping、nslookup、trace等。

4. NetCraft

http://uptime.netcraft.com/
服务器历史状况检测，可以查找服务器操作系统、软件类型、所属机构以及检测服务器的运行状况等。

5. WooRank

http://www.woorank.com/
网站评估机构，对于注重SEO的站长们来说，其对于网站的一些优化建议还是值得一看的。

6. Robots.txt Checker

http://tool.motoricerca.info/robots-checker.phtml
在线检测Robots.txt是否合法有效，Robots.txt也是SEO所必须检测的一个项目。

7. TinEye

http://www.tineye.com/
这个和站长关系不大，这是一个以图搜图的工具，也可以算是“求真相”所必须的，可以很快找到图片出处，那些PS的图很容易就显形了。

8. Whois Source

http://www.whois.sc/
这个也是我常用的查询Whois的工具。

9. Pool.com

http://www.pool.com/
一家查询域名到期即将删除（Pending Delete）列表的网站，当然运气好可以淘到不少好米。

10. WEBPAGETEST

http://www.webpagetest.org/
重量级网站性能易用性评估测试工具，会给出详细的图表测试报告供我们参考。

原文发表于2009年8月11日

2011年4月16日
本来不想把这篇文章从原来的博客上转过来的，但是想想也是自己一些感受吧，考虑再三，还是先放过来。

前段时间刚好同学来我家于是和他一起看了当前热播的电视剧《仙剑奇侠传三》，据说有不少玩家看完电视剧后感觉很雷，我没玩过游戏所以也就没有这种感觉了，总体上来说仙剑三的主题是“轮回”，这点可以从徐长卿的三世轮回，龙葵的千年等待中看出，但是在生生死死中感情开始纠葛，于是贯穿剧情的就少不了爱了，比如雪见与景天的相互爱慕，龙葵与哥哥的兄妹之爱，长卿与紫萱的难舍爱情。长卿与景天的兄弟关爱。正是因为这些爱让人看完电视后有些感动。特别是那种生离死别的场景。

最后觉得编剧太残忍，结局不像我先前想象的那么美好，先是茂茂为了百姓吃饱肚子牺牲了自己，后来是龙葵为了哥哥战胜邪剑仙而殉剑。毕竟他们带着遗憾离别了世界：茂茂没能去长安然后结婚，跟着景天没能过上幸福安稳的日子；龙葵毕竟等待了一千多年，当她遇见景天时说好是再也不与王兄分离，最后还要当着王兄的面殉剑……据说网上有完美的结局的，当然电视剧也不必要处处结局都是完美的，这样的结局也能让人感到一种人性美吧。忘了说了，其实最后还留下了个悲剧的悬念那就是景天为了拯救被邪剑仙杀害的人而自愿折寿。与雪见一起的幸福日子也不多了，可以想象景天离开后雪见的伤心欲绝。当然电视剧没有直接写明，想给我们留下想象的空间吧。或许景天得到高人相助没有死去。

重楼，刚一开始我还以为是终极大Boss，结果被情所困，战斗力也有明显下降。玩过仙剑3的玩家都说重楼才是终极大Boss，邪剑仙在重楼眼里根本不算什么，而电视剧里却出现邪剑仙轻而易举的制服了重楼，甚至连他们打斗的场面也没看到，至少重楼也应该与邪剑仙过上几招，在邪剑仙出现后，重楼在我眼中战无不胜的形象彻底倒塌。

徐长卿，确实动作比较帅，看到他我不由得想起我以前玩的《大唐豪侠》游戏，我是扮演蜀山派的，也是背着一把剑然后到处耍帅，呵呵。

好了，时间不早了，先写这么多。

今天看到 淘宝UED 更新了一篇文章 《盲人站长深恶痛绝的onfocus=“this.blur()”》 ，不由得想起之前我写的 《去掉网页上链接或按钮的虚线框》 。感觉淘宝UED对这个问题研究还是比较深入的，比较下来，只有this.blur()属于比较暴力的消除虚线框的办法，而且在一定程度上还会导致易用性的下降，比如淘宝UED就提到了盲人易用性的问题，淘宝UED团队总结出“去除链接虚线框的推荐方法是：ie下用hidefocus属性，ff/chorme/opera/safari下用outline:none”。

问题应该很好的解决了，但是我们还是对this.blur()念念不忘，为什么呢？因为其兼容性和效果都是最好的，那有没有折中的办法，即不损失易用性（能够获得焦点）且隐藏焦点所带来的虚线框？Mike Smullin的 《Removing the Dotted Outline from Focused Links》 给出了个办法可以参考一下，我将其办法改成了函数如下：

function killFocus(obj) {
  obj.onmousedown = function() {
    this.blur(); // most browsers
    this.hideFocus = true; // ie
    this.style.outline = 'none'; // mozilla
  }
  obj.onmouseout = obj.onmouseup = function() {
    this.blur(); // most browsers
    this.hideFocus = false; // ie
    this.style.outline = null; // mozilla
  }
}

很明显，其通过鼠标的操作动态的设置相关的属性，也就是说当我们点击鼠标时虚线框将被隐藏掉，这不影响我们键盘按Tab键或其他办法获得焦点，当然这个只是针对鼠标操作隐藏了焦点虚线框，如果你觉得一点焦点虚线框都不能有的话，那还是按照hidefocus和outline配合使用吧。

一般Windows系统在默认账户比如Administrator没有设置密码的情况下，我们可以自动登录系统，但是在某些情景下可能不是这样，比如服务器版的Windows，还有一些做了特别设置的系统，大家可能惊讶的发现，即使没有密码，系统也会弹出个登录框，在服务器系统上还会出现个按Ctrl+Alt+Shift继续的对话框，当然这也是为了安全考虑，不过这样大家往往需要多一步才能进入系统，如何解决这个问题？

我这里先介绍两种方法：

1. 使用RunDLL32命令来帮忙

依次选择开始，运行，输入下面的语句，并确认。

rundll32 netplwiz.dll,UsersRunDll

然后系统会自动弹出一个对话框，去除“要使用本机，用户必须输入用户名密码”复选框中的勾号，然后确认。

很多朋友可能在刚开始接触MySQL数据库时就被它那黑漆漆的命令提示符给吓跑了，经常有朋友会问，为什么MySQL没有查询分析器和企业管理器，好吧，那个是微软SQL Server的两个集成化环境，其实MySQL的第三方可视化界面还是有的，而且做得都非常不错，比如说PHPMyAdmin [项目主页] ，相信很多站长都用过PHPMyAdmin，在线管理的可视化模式确实比命令提示符省事不少，但是我们还是怀念像微软那样的查询分析器或者企业管理器，幸运的是，已经有人做了，而且做得非常不错，今天给大家介绍的就是HeidiSQL，一个MySQL数据库管理的客户端，可以将所有对MySQL的操作都可视化，这样我们也就无需去记住那繁琐的 命令 。一切都可以通过鼠标点击完成，听起来非常不错，赶紧试试吧，哦，对了，这么强大的工具还是开源的，看代码，貌似是Pascal/Delphi编写的。

项目主页： http://www.heidisql.com/ 下载地址： http://www.heidisql.com/download.php

在Microsoft TechNet上 《你好，脚本专家！》 看到的技巧，原文是 《如何加粗整个 Microsoft Word 文档中的特定词？》 ，代码摘录如下：

Const wdReplaceAll  = 2

Set objWord = CreateObject("Word.Application")
objWord.Visible = True

Set objDoc = objWord.Documents.Open("C:\Scripts\Test.doc")
Set objSelection = objWord.Selection

objSelection.Find.Text = "Fabrikam"
objSelection.Find.Forward = TRUE
objSelection.Find.MatchWholeWord = TRUE

objSelection.Find.Replacement.Font.Bold = True

objSelection.Find.Execute ,,,,,,,,,,wdReplaceAll

其替换C:\Scripts\Test.doc内指定的Fabrikam单词格式为粗体，那么如何才能实现替换为另外指定的单词呢？注意objSelection.Find.Replacement.Font.Bold = True这句，其实我们只需要将其改动为objSelection.Find.Replacement.Text = "你要替换的字符串"，就可以实现这个功能了，如何批量替换Word里指定的字句？那就需要用到我前面介绍的枚举文件的文章 《利用Scripting.FileSystemObject组件来枚举文件》 ，当然，你也可以借助于我编写的 批量文件扫描及进程处理工具 ，这个里面有个批量打印的示例插件，大家可以参考修改一下。

我这里要说的是ASP，没错，不是ASP.NET，我们所要做的是如何让ASP像ASP.NET那样访问.NET Framework的内置对象，首先我们需要安装.NET Framework环境，然后下一步呢？CreateObject创建对象？答对了一半，不过有一点要让你失望了，那就是大多数.NET Framework类对于ASP是无法访问的，别急，仍然有大量.NET 类实现了可调用 COM 接口，也就是说，我们可以像创建普通COM对象那样创建它们。

在具体操作前，不妨打开我们的注册表，定位到HKEY_CLASSES_ROOT，然后你就会发现有大量的.NET类的ProgId和CLSID，这样我们就可以通过这些特征信息来创建并使用这些对象。

在 Microsoft TechNet的《您好，脚本专家！》栏目 中介绍了如何在WScript脚本宿主中调用这些对象，比如System.Collections.ArrayList，我们现在可以除了Scripting.Dictionary外有了更多的选择，其中ArrayList的Sort排序等功能更是我们所垂涎的，比如脚本专家上的示例：

Set DataList = CreateObject _
      ("System.Collections.ArrayList")

DataList.Add "B"
DataList.Add "C"
DataList.Add "E"
DataList.Add "D"
DataList.Add "A"

DataList.Sort()

For Each strItem in DataList
    Wscript.Echo strItem
Next
Set DataList = Nothing

我们可以很容易的就将其改成ASP版本的代码：

<%
Set DataList = Server.CreateObject _
      ("System.Collections.ArrayList")

DataList.Add "B"
DataList.Add "C"
DataList.Add "E"
DataList.Add "D"
DataList.Add "A"

DataList.Sort()

For Each strItem in DataList
    Response.Write strItem
Next

Set DataList = Nothing
%>

经过测试这样是可行的，怎么样，是不是很方便，关于ArrayList更多的使用方法可以参考MSDN的.NET Framework手册了，这样我们写ASP程序又多了一种更为强大的选择，不过我还是奉劝还在搞鼓ASP的程序员，该换换口味了，为何不试试更为强大的ASP.NET或者PHP呢？

参考文档 《.NET COM+ Interop Component with Classic ASP》

以前总是喜欢用PPC（Windows Mobile）自带的便笺程序进行录音，不过这个程序生成的可是*.pwi文件，如果想要得到里面的音频文件可要费一番周折。

后来在网上搜到了这么一个工具PWISoundExtract，用这个可以很方便的将声音文件从PWI里分离提取出来，使用也很简单，在电脑上下载[download id="1122"]，解压，运行PWISoundExtract.exe，然后将从PPC中拷过来的PWI文件拖到窗体上，然后音频文件就出来了，哦，对了，这个可是需要Microsoft .Net Framework的支持的哦，没有的话， [点击这里下载] 安装吧。

Excel的有效可读数据区域是指拥有数据的最大范围，比如只有100行50列拥有数据区域，那么其Range就是100*50的范围。正常情况下，我们要如何编程获得这个区域呢，其实我们可以借助于UsedRange这个方法，下面举个简单的例子，比如用VBScript或者VBA将有效数据区域的行高度自动（自动调整行高），那么可以参考下面的VBScript代码：

Option Explicit
 
Const MSEXCEL_FILENAME = "Excel文件路径"
Sub VBMain()
  Dim xlApp, WorkBooks, Sheet
  Set xlApp = WSH.CreateObject("Excel.Application")
  xlApp.Visible = False
  Set WorkBooks = xlApp.Workbooks.Open(MSEXCEL_FILENAME)
 
  Set Sheet = WorkBooks.Worksheets(1)  '打开第一个工作表
  ' 也可以打开上次保存时打开的活动工作表
  ' Set Sheet = WorkBooks.ActiveSheet  打开活动的工作表
  Sheet.UsedRange.EntireRow.AutoFit ' 自动调整行高
  Set Sheet = Nothing
 
  WorkBooks.Close
  Set WorkBooks = Nothing
  xlApp.Quit
  Set xlApp = Nothing
End Sub
 
Call VBMain()
WSH.Quit()

那么如何获取有效区域的行数和列数呢，参照上面的代码其实可以使用Sheet.UsedRange.Rows.Count或者Sheet.UsedRange.Columns.Count分别取得。

Word的内置属性（WdBuiltInProperty）往往给我们提供了很多有用的信息，我们可以通过BuiltInDocumentProperties的方式进行访问这些属性，参考下面的VBScript代码：

Dim wdApp
Set wdApp = WSH.CreateObject("Word.Application")
wdApp.ActiveDocument.BuiltInDocumentProperties(Index)
' Set doc = wdApp.Documents.Open(...)
' doc.BuiltInDocumentProperties(Index) 这样也可以
Set wdApp = Nothing

注意这里的Index索引属性，其取值不同就代表操作不同的内置属性，其相关取值用Visual Basic描述如下：

Public Enum wdAttributes
  wdPropertyTitle = &H00000001 ' 标题
  wdPropertySubject = &H0000002 ' 主题
  wdPropertyAuthor = &H0000003 ' 作者
  wdPropertyKeywords = &H0000004 ' 关键词
  wdPropertyComments = &H0000005 ' 注释
  wdPropertyTemplate = &H0000006 ' 模板
  wdPropertyLastAuthor = &H0000007 ' 最后一次作者
  wdPropertyRevision = &H0000008 ' 校对修改
  wdPropertyAppName = &H0000009 ' 应用程序名
  wdPropertyTimeLastPrinted = &H000000A ' 最后一次打印时间
  wdPropertyTimeCreated = &H000000B ' 创建时间
  wdPropertyTimeLastSaved = &H000000C ' 最后一次保存时间
  wdPropertyVBATotalEdit = &H000000D ' VBA Edits的数目
  wdPropertyPages = &H000000E ' 总页数
  wdPropertyWords = &H000000F ' 总字数
  wdPropertyCharacters = &H0000010 ' 总字符数
  wdPropertySecurity = &H0000011 ' 安全设置
  wdPropertyCategory = &H0000012 ' 类别
  wdPropertyFormat = &H0000013 ' (尚未支持)
  wdPropertyManager = &H0000014 ' 管理器
  wdPropertyCompany = &H0000015 ' 公司
  wdPropertyBytes = &H0000016 ' 字节数
  wdPropertyLines = &H0000017 ' 行数
  wdPropertyParas = &H0000018 ' 段落数
  wdPropertySlides = &H0000019 ' (尚未支持)
  wdPropertyNotes = &H000001A ' 便签数
  wdPropertyHiddenSlides = &H000001B ' (尚未支持)
  wdPropertyMMClips = &H000001C ' (尚未支持)
  wdPropertyHyperlinkBase = &H000001D ' (尚未支持)
  wdPropertyCharsWSpaces = &H000001E ' 带空白字符的字符统计
end Enum

参考.NET版实现 《WdBuiltInProperty Enumeration》 。