'/*=========================================================================
' * Intro       通过 WMI 禁用"TCP/IP 筛选" vbs版
' * FileName    TCP-IP-Filter-Disable-Console.vbs
' * Author      yongfa365
' * Version     v1.0
' * WEB         http://www.yongfa365.com
' * Email       yongfa365@qq.com
' * FirstWrite  http://www.yongfa365.com/item/Use-WMi-Disable-TCP-IP-Filter-VBS-yongfa365.html
' * LastModify  2007-08-31 14:45:14
' *==========================================================================*/

'/*=========================================================================
' * Intro       通过 WMI 启用"TCP/IP 筛选" 并设置端口号 vbs版
' * FileName    TCP-IP-Filter-Enable-Console.vbs
' * Author      yongfa365
' * Version     v1.0
' * WEB         http://www.yongfa365.com
' * Email       yongfa365@qq.com
' * FirstWrite  http://www.yongfa365.com/item/Use-WMi-Enable-TCP-IP-Filter-VBS-yongfa365.html
' * LastModify  2007-08-31 14:52:46
' *==========================================================================*/

'/*=========================================================================
' * Intro       通过 WMI 改变网卡的IP地址 vbs版
' * FileName    ChangeIP.vbs
' * Author      yongfa365
' * Version     v1.1
' * WEB         http://www.yongfa365.com
' * Email       yongfa365@qq.com
' * FirstWrite  http://www.yongfa365.com/item/Use-WMi-Change-IP-VBS-yongfa365.html
' * LastModify  2007-12-29 13:57:50
' *==========================================================================*/

/*=========================================================================
 * Intro       规范VBS或SQL大小写
 * FileName    SQLVBSFormat.jsee
 * Author      yongfa365
 * Version     v1.0
 * WEB         http://www.yongfa365.com
 * Email       yongfa365@qq.com
 * FirstWrite  http://www.yongfa365.com/item/SQLVBSFormat.jsee-For-Emeditor-Macros-yongfa365.html
 * LastModify  2007-08-29 22:34:37
 *==========================================================================*/

'/*=========================================================================
' * Intro       GB2312 to PinYin
' * FileName    GB2PY.vbee
' * Author      yongfa365
' * Version     v2.0
' * WEB         http://www.yongfa365.com
' * Email       yongfa365@qq.com
' * FirstWrite  http://www.yongfa365.com/item/GB2PY-For-Emeditor-Macros-yongfa365.html
' * LastModify  2007-08-30 09:41:04
' *==========================================================================*/

'/*=========================================================================
' * Intro       Get Html From clipboardData URL 
' * FileName    XMLhttp.vbee
' * Author      yongfa365
' * Version     v1.0
' * WEB         http://www.yongfa365.com
' * Email       yongfa365@qq.com
' * FirstWrite  http://www.yongfa365.com/item/Get-HTML-From-clipboardData-URL-Emeditor-Macros-XMLhttp.vbee-yongfa365.html
' * LastModify  2007-08-29 16:52:54
' *==========================================================================*/

/*=========================================================================
 * Intro       Add Info to your file header
 * FileName    Head.jsee
 * Author      yongfa365
 * Version     v3.0
 * WEB         http://www.yongfa365.com
 * Email       yongfa365[at]qq.com
 * FirstWrite  http://www.yongfa365.com/item/Text-txt-Add-Copyright-Tool-For-Emeditor-Macros-yongfa365.html
 * LastModify  2007-08-31 15:08:59
 *==========================================================================*/

'/*=========================================================================
' * Intro       从IIS日志文件分析搜索引擎来访次数统计
' * FileName    bots.vbee
' * Author      yongfa365
' * Version     v2.0
' * WEB         http://www.yongfa365.com
' * Email       yongfa365@qq.com
' * FirstWrite  http://www.yongfa365.com/item/IIS-Log-iislogAnalyzer-Search-Engines-visiting-Statistics-For-Emeditor-Macros-yongfa365.html
' * LastModify  2007-08-30 10:18:25
' *==========================================================================*/

/**
 * 添加各种常见的注释
 * @FileName    Comment.jsee
 * @Author      yongfa365
 * @Version     v1.0
 * @WEB         http://www.yongfa365.com
 * @Email       yongfa365@qq.com
 * @FirstWrite  http://www.yongfa365.com/item/Add-All-Comment-Tool-vbs-js-html-For-Emeditor-Macros-yongfa365.html
 * @LastModify  2007-8-28
 */

rem 数据备份

rem 柳永法

rem 2007-8-16

rem 为什么要这么做呢:因为服务器上为了安全已经把WScript.Shell给删除了,所以产生日期只能通过DOS来实现了,不过感觉还是不错的,如果可以直接把时间带上就更好了,可惜不是很熟悉DOS,所以先这么弄着.


for /f "tokens=1" %%i in ('date /t') do call :sub %%i..

@echo off
for /f %%h in (hostlist) do call :back %%h
ping /n 5 127.1>nul 2>&1

:back
set temp=%1
for /f "skip=1 delims=[] tokens=2" %%i in ('ping /n 1 %1') do call :set %%i
echo %1=%temp%
goto :eof

:set
if "%1"=="" goto :back
set temp=%1
goto :eof

　　这几天在改自己公司网站：北京中科兴联信息技术有限公司


　　因为网站内很多代码都是复用的，所以就使用自己最擅长的文本处理工具dreamweaver及Emeditor,加上自己半生半熟的正则表达式，对网站进行了一天的大批量处理，终与完工，期间发现太多的小问题，可以批量的都处理了，剩下的就慢慢来了，


　　这期间有..

前些天由于一时头晕，把虚拟主机服务器上的文件夹权限都给弄没了，一时电话不断，因为是晚上，所以打电话的人还不是很多。


当时的想法是：必须先处理那些总是非常关注网站的人的空间，至少这些人先发现网站有问题的机率要大很多，与时：只要是最近七天改过网站内容的站点先处理。


想到了dir,里有日期这一项，还有..

verycd,eMule电驴官方网站上说：为了不违背共享精神，是不会为eMule电驴添加自动关机功能的，这要多费电呀，在网上看了一个方法，感觉非常不错，改掉了原代码的不足之处


Set fso = CreateObject("Scripting.FileSystemObject")

Set ws = WScript.CreateObject("WScript.Shell")

Count = 0
..

如果您安装过 VS 2005 SP1的话，一定会感觉非常郁闷，因为 VS 2005 SP1比 VS 2005 的安装要慢的多，只是一个补丁而已，这么慢，一般人都受不了。


 VS 2005 SP1 中文版的下载地址及安装方法，及解决数字签名认证的问题在我的一篇转改文章里介绍过：vs2005 sp1 下载地址、安装方法--更新非常慢


从http://blogs..