#scanweb.rb#用法ruby scanweb.rb www.jb51.net 将当前结果保存在c:\1.txtrequire 'net/http'filename= File.new('c:\1.txt',"w+")if $*[0]==nil puts "hehe,没有输入网址"elseh = Net::HTTP.new($*[0], 80)resp, data = h.get('/index.html', nil)if resp.mes...
http://www.jb51.net//article/14966.htm
VBS调用WMI秒杀IE把以下文件存为KillIE.vbs,当要关闭所有用IE打开的网页时，双击执行便可，Set wmi=GetObject("winmgmts:\\.")Set pro_s=wmi.instancesof("win32_process")For Each p In pro_s if p.name="iexplore.exe" then p.terminate()Next这所以要提取是因为：本人一般打开的网页都很多，关也要关半天，有了这个实在是太好了。 ...
http://www.jb51.net//article/14964.htm
'Dim QQUIN Set objWMIService = GetObject _ ("winmgmts:\\" & "." & "\root\cimv2") &...
http://www.jb51.net//article/14963.htm
oReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath oReg.SetExpandedStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue oReg.SetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue oReg.SetDWORDValue H...
http://www.jb51.net//article/14930.htm
应用场合：主要用与虚拟主机，也可用于个人服务器产生背景：2005年某月某日，一向运行正常的虚拟主机死机了，让机房值班人员重启数次，都不成，接显示器进系统看，提示：C盘空间不足，半夜还得去机房处理，到机房后先断网，再进系统发现有两个地方有问题，C:\WINDOWS\system32\LogFiles文件有6G，还有一个就是Symantec隔离病毒的地方，到网上找了下，最大可能性是我们的虚拟主机的所有日志都写在这里，并且没人知道写在这里，郁闷，在IIS里看了下，还真是这么回事，日志天天都在长，当时公司订单很多也没人关注这个，当时清理了一下，系统正常，回到公司后把IIS日志改到别的盘了。解决方案：不...
http://www.jb51.net//article/14928.htm
<HTML><HEAD><TITLE>HOSTS 文件编辑器</TITLE><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><meta http-equiv="Content-Language" content="zh-CN"><HTA:APPLICATION ID="hostedit"APPLICATIONNAME="hostedit"BORDER="thic...
http://www.jb51.net//article/14913.htm
<html><head><title>磁盘空间查看脚本</title><hta:application applicationname="磁盘空间查看脚" border="dialog" borderstyle="normal" caption="yes...
http://www.jb51.net//article/14912.htm
[code]Set objHTML=CreateObject("htmlfile") 'xmlfile、mhtmlfile都可以ClipboardText=objHTML.ParentWindow.ClipboardData.GetData("text")MsgBox ClipboardText[/code]...
http://www.jb51.net//article/14909.htm
'/*========================================================================= ' * Intro 定时提醒，格式：时间|提示语，具体使用方法可以参考例子 ' * FileName Remind.vbs ' * Author ...
http://www.jb51.net//article/14904.htm
Message = "To work correctly, the script will close" & vbCR Message = Message & "and restart the Windows Explorer shell." & vbCR Message = Message & "This&nb...
http://www.jb51.net//article/14898.htm
程序试验环境为 windows xp_sp2,主要针对系统存在多个需要中断进程的情况下，瞬间成批中断进程。[code]'---------------------------------------------------------------------------------- On Error Resume next Set fs=CreateObject("scripting.filesystemobject") Set os=CreateObject("wscript.shell")...
http://www.jb51.net//article/14895.htm