我已经创建了一个vbscript来显示我的系统日志内容。我还想包括insertionString（如果它存在的话）。但是，我似乎无法确定是否存在insertionstring。以下是我剧本的开头：
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
Set rs = objWMIService.ExecQuery ("Select * from Win32_NTLogEvent Where Logfile = 'System' and SourceName = 'mysource'")
For Each objEvent in rs
If objEvent.InsertionString exists....
我尝试了几种变体来确定是否存在insertionstring，但都没有成功，包括：
If Not IsNull(objEvent.InsertionString) Then
If objEvent.InsertionString.Length > 0 Then
If GetLength(objEvent.InsertionString(1)) > 0 Then
If objEvent.InsertionString(1).Length > 0 Then
如有任何建议，将不胜感激。
谢谢。
最佳答案
属性名中的拼写错误InsertionString应该InsertionStrings。
所以这个代码可以正常工作
If not IsNull(objEvent.InsertionStrings) Then
注意：
InsertionStrings属性是一个字符串数组，因此可以使用For Each循环或UBound和LBound函数在该属性上迭代。