none
关于vbs的问题,咨询一下 RRS feed

  • 问题

  • strMachines = WScript.Arguments.Item(0)
    aMachines = Split(strMachines, ";")
    For Each machine In aMachines
      Set objPing = GetObject("winmgmts:")._
      ExecQuery("select * from Win32_PingStatus where address = '"_
        & machine & "'")
      For Each objStatus In objPing
        If IsNull(objStatus.StatusCode) Or objStatus.StatusCode<>0 Then
          WScript.Echo("machine " & machine & " is not reachable")
        Else
          WScript.Echo("reply from " & machine)
        End If
      Next
    Next
    WScript.Arguments.Item(0)
    问一下这句是什么意思,在整个程序什么作用?
    谢谢!!!
    2009年4月18日 3:30

答案

  • WScript.Arguments是一个集合,WScript.Arguments.Item(0)就是取集合的第一个元素,
    这个程序执行的方法应该类似这样

    xxx.vbs '参数'
    孟宪会
    • 已标记为答案 wls0551 2009年4月20日 3:34
    2009年4月19日 0:30
    版主

全部回复

  • WScript.Arguments是一个集合,WScript.Arguments.Item(0)就是取集合的第一个元素,
    这个程序执行的方法应该类似这样

    xxx.vbs '参数'
    孟宪会
    • 已标记为答案 wls0551 2009年4月20日 3:34
    2009年4月19日 0:30
    版主
  • WScript.Arguments是一个集合,WScript.Arguments.Item(0)就是取集合的第一个元素,
    这个程序执行的方法应该类似这样

    xxx.vbs '参数'
    孟宪会
    这几天我没上,万分感谢
    2009年4月20日 3:34