パラメーターのスクリプトへの送信

GFI LanGuard スキャナー ツールは実行されるときにスクリプトにパラメーターを渡します。 たとえば、脆弱性用にスキャンされるターゲット マシンのコンピューター名とコンピューター IP です。 スクリプトをデバッグできるようにするために、これらのパラメーターの値のさまざまなタイプをテストします。 オプション > パラメーター からこれらのパラメーター用の代替値を指定できます。

スクリプト内でこれらのパラメーターへのアクセスを得るために、GetParameter という特殊な GFI LanGuard 関数を使用して、それを次のようなパラメーターの名前に渡す必要があります。

Function Main

' 使用する必要のあるオブジェクトの宣言

Dim wmi As Object

Dim objswbemobject As Object

' 必要な他の変数の宣言

Dim strComputer As String

Dim cr As String

strComputer = "127.0.0.1"

' 改行

cr = Chr(13) + Chr(10)

' wmi オブジェクトでフック

Set wmi = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

' フックが成功したことをチェック

If wmi is Nothing Then echo ("error1")

' wmi のサービス インスタンスを戻す

Set wmiinst=wmi.instancesof("Win32_Service")

' インスタンスが利用可能かどうかをチェック

If wmiinst is Nothing Then echo ("error2")

' 各インスタンスをループ

For Each objswbemobject In wmiinst

echo("Service Name= ")

' サービスを表示

echo(objswbemobject.DisplayName+cr)

Next

End Function