阅读内容 

WSH的应用方法

[日期:2005-10-16] 来源:黑客基地  作者:无从考证 [字体: ]
????? WSH 实际上是一个脚本语言的运行环境,它之所以具备强大的功能,是在于其充分挖掘了脚本语言的潜力。因此,如果抛开脚本语言而空谈 WSH ,那实际上就没有了意义。而如果再展开来讲述脚本语言,显然就离开了今天的主题。

  在这种情况下,只好采取一种折衷的方法:给大家推荐几个脚本文件利用 WSH 执行任务的实例,希望大家能通过这些例子对 WSH 的使用有一个初步的认识。

  脚本文件的编写十分方便,你可以选用任意一个文字编辑软件进行编写,编写完成后,只需将它保存为 WSH 所支持的文件名就可以了(如.js 文件和.vbs 文件)。最常用的就是记事本编辑器,下面的实例都是以它作为工具编写的。

  打开记事本编辑器,在上面编写如下内容:

  WScript.Echo("走近 WSH")

  将它保存为以 .vbs 或 .js 为后缀名(千万不要写成了 .txt)的文件并退出记事本。双击执行这个文件。

  这一次,我们要利用 WSH 完成一次创建十个文件夹的工作。代码如下:

  dim objdir
  set objdir=wscript.createobject("scripting.filesystemobject")
  for k=1 to 10
  anewfolder="c:\chapter" & k
  objdir.createfolder(anewfolder)
  next

  同样,将它存为 .vbs 文件并退出。运行后,我们会发现,C 盘根目录下一次性多出了十个新文件夹。

??? 最后,再举一个在服务器上的运用。下面的代码将帮助你重新启动指定的 IIS 服务:

  ' define a constant for stopped services
  Const ADS_SERVICE_STOPPED = 1

  ' get an ADSI object for a computer
  Set objComputer = GetObject("WinNT://MYCOMPUTER,computer")

  ' get an object for a service
  Set objService = objComputer.GetObject("Service","MYSERVICE")

  ' check to see if the service is stopped
  If (objService.Status = ADS_SERVICE_STOPPED) Then

  ' if the service is stopped, then start it
  objService.Start

  End If

  将它以 startsvc.vbs 为名保存在 C: 盘根目录。并通过如下命令执行:CSCRIPT C:\STARTSVC.VBS 。运行后,经你指定的 IIS 服务项将被重新开启。

  其实,在 Windows 的 samples 目录下,有个 WSH 文件夹,那里面有不少很具代表性的 .vbs 和 .js 脚本文件。

  此外,利用 WSH 还可以自己编写脚本文件来提高网络管理方面的效率。

阅读:
录入:

推荐 】 【 打印
相关新闻      
本文评论       全部评论
发表评论
  • 尊重网上道德,遵守中华人民共和国的各项有关法律法规
  • 承担一切因您的行为而直接或间接导致的民事或刑事法律责任
  • 本站管理人员有权保留或删除其管辖留言中的任意内容
  • 本站有权在网站内转载或引用您的评论
  • 参与本评论即表明您已经阅读并接受上述条款


点评: 字数
姓名:
Advertisement
内容查询


Advertisement