Users Guide

目次に戻る
サンプルスクリプトと BIOS 設定
Dell™OpenManage™ClientInstrumentationバージョン 7.6 ユーザーズガイド
WMI サンプルスクリプト
OMCI 7.6 でサポートされている BIOS 設定
WMI サンプルスクリプト

シャーシ侵入ステータスのクリア
以下のサンプル VBScript は、システムのシャーシ侵入ステータスをクリアします。このスクリプトは、システムの名前を使用してローカルまたはリモートから実行できます。
Namespace: root\DellOMCI
Class Name: Dell_SMBIOSsettings
Instance 'Key' Value: 0
Property Name: ChassisIntrusionStatus
Property Value: 5 '**************************************************** '*** Name: SampleChassisIntrusionClear.vbs
'*** Purpose: To clear the chassis intrusion status on a Dell OMCI client.
'*** Usage: cscript.exe //nologo SampleChassisIntrusionClear.vbs <システム名>
'***
'*** This sample script is provided as an example '***only, and has not been tested, nor is '***warranted in any way by Dell; Dell disclaims
any '*** liability in connection therewith. Dell provides '***no technical support with regard to such '***scripting. For more information on
WMI '***scripting, refer to applicable Microsoft '***documentation. '*************************************************** Option Explicit
'*** Declare variables
Dim strNameSpace
Dim strComputerName
Dim strClassName
Dim strKeyValue
Dim objInstance
Dim strPropName
Dim strPropValue
'*** Check that the right executable was used to run '***the script and that all parameters were passed.
If (LCase(Right(WScript.FullName, 11)) = "wscript.exe" ) Or _ (Wscript.Arguments.Count < 1) Then
Call Usage()
WScript.Quit
End If
'*** Initialize variables
strNameSpace = "root/Dellomci"
strComputerName = WScript.Arguments(0)
strClassName = "Dell_SMBIOSsettings"
strKeyValue = "0"
strPropName = "ChassisIntrusionStatus"
'*** Retrieve the instance of Dell_SMBIOSSettings '***class (there should only be 1 instance).
Set objInstance =GetObject("WinMgmts:{impersonationLevel=impersonate ,AuthenticationLevel=pktprivacy }//" &_ strComputerName & "/" &
strNameSpace & ":" & strClassName & "=" &_ Chr(34) & strKeyValue & Chr(34))