当前位置:DOS资源站资料中心VBS脚本 → 文章列表
文章标题关闭所有内容预览 | 展开所有内容预览
  • 深入挖掘Windows脚本技术 [内容预览] 46584 | 2008-04-06 21:53:00
    深入挖掘Windows脚本技术文章作者:zzzEVAzzz<zzzevazzz@126.com>为使文中涉及的代码整洁,将使用论坛的PHP标签处理。(没有VBS标签,code标签不好用,郁闷)如果转载本文,请注意做相应调整。【目录】1,前言2,回顾WSH对象3,WMI服务4,脚本也有GUI5,反查杀6,来做个后门7,结...

    [阅读全文]

  • VBS中Select CASE的其它用法 [内容预览] 46584 | 2008-04-06 21:52:58
    marr=20selectcasetruecasemarr<12response.write"小于12"casemarr>12response.write"大于12"casemarr=12response.write"=="endselect还可以这样用casemarr>7andmarr<12

    [阅读全文]

  • vbscript 可以按引用传递参数吗? [内容预览] 46589 | 2008-04-06 21:52:57
    vbscript可以按引用传递参数吗?比如说functionddd(str)str=str&"12345"endfunctionabc="54321"想通过ddd(abc),把abc变成“5432112345”要怎么改动才行呢?回答:点击运行可以看到效果:[Ctrl+A全选提示:你可先修改部分代码,再按运行]没发现要改...

    [阅读全文]

  • 下载文件到本地运行的vbs [内容预览] 46596 | 2008-04-06 21:52:56
    'onerrorresumenextdl=http://www.jb51.net/index.htm'这是要下载的文件的路径str="Microsoft.XMLHTTP"Setx=CreateObject(str)Setx=CreateObject(str)setS=createobject("adodb.stream...

    [阅读全文]

  • 飘叶千夫指源代码,又称qq刷屏器 [内容预览] 46604 | 2008-04-06 21:52:54
    SetWshShell=WScript.CreateObject("WScript.Shell")WshShell.AppActivate""fori=1to10´要发送的次数WScript.Sleep500´定义发送信的所要的时间以ms毫秒为单位。如:1000为一秒发一次WshShell.Se...

    [阅读全文]

  • SendKeys参考文档 [内容预览] 46582 | 2008-04-06 21:52:53
    SendKeys参考文档 一直用foxipgw程序自动登录网关,今天做了一个自动调用foxipgw的程序,就不用每次点“确定”了,代码如下。sets=WScript.CreateObject("WScript.Shell")app_window=s.run("D:\Soft\FoxIPGW.EXE")WScript.S...

    [阅读全文]

  • VBS中SendKeys的基本应用 [内容预览] 46586 | 2008-04-06 21:52:52
    ps:不知道有人还记得这个攻击qq群的代码?就是利用这个所写的!SendKeys模拟键盘操作,将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行,其使用格式为:object.SendKeysstring“object”:表示WshShell对象“string”:表示要发送的按键指令字符串,需要放在英文双...

    [阅读全文]

  • VBScript教程 第十四课在VBScript中使用对象 [内容预览] 46582 | 2008-04-06 21:52:51
    使用对象无论使用的是ActiveX?控件(以前称为OLE控件)还是Java?对象,MicrosoftVisualBasicScriptingEdition和Microsoft?InternetExplorer都以相同的方式处理它们。如果您使用的是InternetExplorer并且ActiveX库中安装了这些控件,就会...

    [阅读全文]

  • VBScript教程 第十三课 VBScript与窗体 [内容预览] 46581 | 2008-04-06 21:52:50
    简单验证使用VisualBasicScriptingEdition,您可以完成通常要在服务器上进行的大量窗体处理工作,也可以完成不能在服务器上进行的工作。这是一个简单的客户端验证的样例。HTML代码的结果是一个文本框和一个按钮。如果使用Microsoft?InternetExplorer查看用以下代码制作的页面,您会看...

    [阅读全文]

  • VBScript教程 第十二课VBScript页面的简单样例 [内容预览] 46581 | 2008-04-06 21:52:48
    一个简单页面使用Microsoft?InternetExplorer可以查看用以下HTML代码制作的页面。如果单击页面上的按钮,可看到VBScript的运行结果。<HTML><HEAD><TITLE>一个简单首页</TITLE><SCRIPTLANGUAGE="VBScript"><!--SubButton1_ ...

    [阅读全文]

  • VBScript教程 第十一课深入VBScript [内容预览] 46581 | 2008-04-06 21:52:47
    VB教程>第十一课深入VBScript学习高级VBScript技术的最快方法是阅读大量的样例。同时更好地理解对象模型有助于深入学习VBScript。您可以从以下部分开始学习:·ActiveX?控件常见问题解答·页面样例·热点链接页面

    [阅读全文]

  • VBScript教程 第十课 VBScript编码约定 [内容预览] 46582 | 2008-04-06 21:52:46
    什么是编码约定?编码约定是帮助您使用MicrosoftVisualBasicScriptingEdition编写代码的一些建议。编码约定包含以下内容:·对象、变量和过程的命名约定·注释约定·文本格式和缩进指南使用一致的编码约定的主要原因是使Script或Script集的结构和编码样式标准化,这样代码易于阅读和理解。使用...

    [阅读全文]

  • systeminfo 系统命令快速查看你的系统几岁了 [内容预览] 13 | 2008-04-05 22:42:28
    Windows系统安装使用到现在,想知道它的“高龄”是多少吗?以WindowsXP系统来说,按“WIN+R”快捷键,输入“CMD”回车后,再在DOS窗口下输入“systeminfo”命令,就可以查看到您的WindowsXP出...

    [阅读全文]

  • 用VBS隐藏任务栏图标 [内容预览] 14 | 2008-04-05 00:21:50
    Message="Toworkcorrectly,thescriptwillclose"&vbCR  Message=Message&"andrestarttheWindowsExplorershell."&vbCR  Message=Message&"Thiswillnotharmyo...

    [阅读全文]

  • [图文] vbs 利用 wmi 实现电脑硬件信息收集举例 [内容预览] 25 | 2008-04-05 00:20:30
    Setwmi=GetObject("winmgmts:\\")Setboard=wmi.instancesof("win32_baseboard")ForEachbInboardmsg="主板:"&b.Manufacturer&vbTab&b.product&vbTab&Chr(...

    [阅读全文]

  • vbs 中调用shell.application 简单函数 [内容预览] 40 | 2008-04-05 00:20:08
    Setos=CreateObject("wscript.shell")Setos0=CreateObject("shell.application")Doinput1=InputBox("请选择:"+chr(13)+chr(13)+_"1.全部窗口最小化"+chr(13)+_"2.窗口状态复原"+chr(13)+_"3...

    [阅读全文]

  • vbs 实现瞬间关闭多个系统进程 [内容预览] 7 | 2008-04-05 00:19:38
    程序利用vbs的wmi、scripting.filesystemobject、shell.application、scripting.dictionary、wscript.shell的相关功能功能实现将当前进程列表显示在一个文本文件中,通过用户界面的选择,确定需要瞬间中断的进程列表,然后中断之。程序试验环境为windo...

    [阅读全文]

  • wmiexec.vbs(通过135端口执行命令) [内容预览] 21 | 2008-04-05 00:19:20
    setww=createobject("wbemscripting.swbemlocator")setcc=ww.connectserver("172.20.241.218","root/cimv2","user","password")Setpp=cc.get("Win32_Process")pp.create("c...

    [阅读全文]

  • 用VBS发送邮件 [内容预览] 51 | 2008-04-05 00:18:51
    NameSpace="http://schemas.microsoft.com/cdo/configuration/"SetEmail=CreateObject("CDO.Message")Email.From="zzzevazzz@21cn.com"Email.To="zzzevazzz@126.com"Email....

    [阅读全文]

  • 清空iis log 中自己登录ip的vbs脚本 [内容预览] 4 | 2008-04-05 00:18:26
    OptionExplicitDimsourcefile,ipaddress,objargsconstdestfile="tempfile"ConstForWriting=2DimTextDimfso,objNet,ServiceObjDimtxtStream,txtStreamOutSetobjArgs=WScript...

    [阅读全文]

  • 汉字转拼音vbs版 [内容预览] 6 | 2008-04-05 00:17:55
    Setd=createObject("Scripting.Dictionary")d.add"a",-20319d.add"ai",-20317d.add"an",-20304d.add"ang",-20295d.add"ao",-20292d.add"ba",-20283d.add"bai",-20265d.add"...

    [阅读全文]

  • 经典的VBS代码 [内容预览] 34 | 2008-04-05 00:16:23
    注销/重起/关闭本地WindowsNT/2000计算机SubShutDown()DimConnection,WQL,SystemClass,System'GetconnectionTolocalwmiSetConnection=GetObject("winmgmts:root\cimv2")'GetWin32_Oper...

    [阅读全文]

  • 用VBS捕获键盘和鼠标 [内容预览] 14 | 2008-04-05 00:15:58
    <SCRIPTLANGUAGE=vbs>Functiondocument_onkeydownMsgBoxwindow.event.keyCodeEndFunction</script><SCRIPTLANGUAGE=vbs>functionGetMousePos()textarea1.value="相对位置:X:"&a...

    [阅读全文]

  • 虚拟主机&域名查循的 VBS脚本 [内容预览] 4 | 2008-04-05 00:15:16
    IfWScript.Arguments.Count<>1ThenWScript.Echo"Example:CScript"&WScript.ScriptName&"www.sohu.com"WScript.QuitEndIfurl="http://www.seologs.com/ip-domains.h...

    [阅读全文]

  • 使用vbs下载文件 [内容预览] 8 | 2008-04-05 00:12:32
    当你把这段代码保存为vbs的时候,杀毒软件可能就开始报警了;而且使用中cscript.exe会访问网络,不太隐蔽。那么,有没有更好的方法呢?答案很明显:-)我们可以利用一个叫InternetExplorer.Application的对象(其实就是个IE啦)下载文件。但是貌似这个组件不能直接下载保存文件,只好曲线救国了。...

    [阅读全文]

  • 用VBS批量改文件后缀名 [内容预览] 8 | 2008-04-05 00:11:51
    DimarSetar=WScript.ArgumentsIfar.Count=0ThenMsgBox"请把包含要按顺序Rename的文件的文件夹拖放到本程序的图标上!",4160,"提示"Setar=NothingWScript.QuitEndIfPublicszExt,szExtNew,l,mf,r,fso,aszE...

    [阅读全文]

  • 用VBS代码来优化设置系统服务 [内容预览] 7 | 2008-04-05 00:11:19
    DimSS,SDimszMsg,szTtlDimlSetSS=GetObject("winmgmts:{impersonationLevel=impersonate}").ExecQuery("Select*FromWin32_Service")szMsg="执行了下列操作:"&vbCrLfszTtl="管理服...

    [阅读全文]

  • 一个扫描ASP木马的VBS脚本 [内容预览] 7 | 2008-04-05 00:09:02
    '---'ScanASPWebShellinvbs'Author:lake2(http://lake2.0x54.org)'Date:2006-11-30'Version:1.0Beta'---DimFileExt="asp,cer,asa,cdx"DimReport,Report2,Sun,SumFiles,SumF...

    [阅读全文]

  • 一个把任何文件转成批处理的VBS脚本 [内容预览] 7 | 2008-04-05 00:07:59
    用Base64编码数据,好处是压缩了大小(相对bin2str而言),缺点是增加处理时间和脚本复杂度。由于效率瓶颈是在bat生成vbs这一步,所以总的来说还是合算了。写文件用ADODB.Recordset,比debug好使多了。大部分事都是脚本做的,批处理只是用echo来生成脚本而已。echo版的好处是,全选复制粘贴到c...

    [阅读全文]

  • Vbscript加密算法----入门篇[1] [内容预览] 12 | 2008-04-05 00:07:13
    知识点:vbscript的基本语法len、mid、Asc、Chr、Split、For..Next...Foreach..In..等函数、语句的应用!自定义函数体如下:/*加密函数体FunctionASCdata(Data)num=len(data)/*获取数据的总长度newdata=""/*定义newdata为空For...

    [阅读全文]

 VBS脚本   770   30   25/26页         21   22   23   24   25      GO