scripting - vbScript Arrat 错误

Question

我有以下 CoreAPP.txt 日志文件：

[10/31/2012 19:53:41:889 SWAP INF] {hap=CB2:app=Internet Explorer_b1 6.0.3790.3959:tid=22C0:usr=B9D327} 上传经过的时间：0.718 秒

[10/31/2012 19:53:42:639 SWAP INF] {hap=CB2:app=Internet Explorer_b1 6.0.3790.3959:tid=22C0:usr=V9V327} 启动已用时间：3.250 秒

[10/31/2012 19:56:37:815 ???? INF] {tid=4004:usr=V47235} 打开虚拟注册表时发生错误（部分：9），rc：07B01F0C-0000004A

[10/31/2012 19:56:37:846 ???? INF] {tid=4004} 打开虚拟注册表时出错（第 9 节），rc: 07B01F0C-0000004A

[10/31/2012 10:45:00:576 ???? INF] {tid=1650} 打开虚拟注册表时发生错误（第 9 节），rc：07B01F0C-0000004A ElapR Application Virtualization Client 无法连接到流 URL 'RTSP://SRVW23E:554/V1321_BDP_V1_R1_SB/V1321_BDP_C1_P2PM_SS。 sft'（rc 1690900A-00002002，原始 rc 1690900A-00002002）。

[10/31/2012 00:29:59:843 OSDF ERR] {tid=1464} Application Virtualization Client 无法解析 OSD 文件 'C:\SoftCache\SoftGrid Client\OSD Cache\edCc4305-3f6C-4dcc-3d70 -404eb8bd97d8.osd'。原因：XML解析失败（rc 00000A25-00000002）

[10/31/2012 08:24:35:869 ???? ERR] {tid=336C:usr=t405230} 检测到损坏的 cp 文件（'V:\V1321_BDP\osguard.cp'）。osguard cp 文件，未采取更正措施

[10/31/2012 22:16:39:240 JGSW ERR] {hap=1C82:app=bDP c15 E2AM SS 1.0:tid=3D58} Application Virtualization Client 无法连接到流 URL 'RTSP://PSWQAPP1: 554/V14678993_BDP_C15_E2AM_SS/V14678993_BDP_C15_E2AM_SS.sft'（rc 1690900A-00002002，原始 rc 1690900A-00002002）。

[10/31/2012 22:16:39:240 SWAP ERR] {hap=1C82:app=bDP c15 E2AM SS 1.0:tid=3D58} 客户端无法连接到 Application Virtualization Server (rc 1690900A-00002002)

[10/31/2012 22:17:09:163 AMGR ERR] {tid=4F54} 指定的应用程序名称（应用程序集成）不明确。一些潜在的匹配项：应用程序集成 7.0.1756.1756 应用程序集成 9.2.2373.2373

[10/31/2012 22:17:09:163 AMGR ERR] {tid=4F54} 应用程序虚拟化客户端无法打开应用程序集成

[10/31/2012 00:03:14:313 SWAP WRN] {tid=507C:usr=N28712} 无法加载 OSD 文件 \PSWQAPP1\Content\D1311_bDP_Adobe_Reader_9.3.3\D1311_bDP_Adobe_Reader 9.3.3.osd

[10/31/2012 00:03:14:313 AMGR INF] {tid=507C:usr=i435145} 应用程序管理器无法从 '\PSWQAPP1\Content\D1311_bDP_Adob_dobe_Reader_9.3.3\D1311_bDP_Adob_b_Adobe Reader 9.3.3 创建应用程序。 osd'（rc 0C405664-00000002）。

==== [10/31/2012 13:35:16:987 JGSW ERR] {hap=1:app=Abaculus 1.0.0.1:tid=14C8:usr=R3R7DF42} Application Virtualization Client 无法连接到流 URL 'RTSP:%SFT_SRV%:554/D1311_bDP_Adob_b_Adobe_Abaculus_15_01/D1311_bDP_Adob_b_Adobe_Abaculus_15_01.sft'（rc 19D02E0A-10000002，原始 rc 19D02E0A-10000002）。

[10/31/2012 13:35:47:998 SWAP ERR] {hap=2:app=AboutPI-SDK 1.3.0.26:tid=1568:usr=I337721} 无法加载应用程序

[10/31/2012 19:56:37:862 SWAP INF] {hap=CB3:app=Adobe Reader X 10.0.1.434:tid=4004:usr=V47235} 上传经过的时间：0.609 秒

[10/31/2012 19:56:38:393 SWAP INF] {hap=CB3:app=Adobe Reader X 10.0.1.434:tid=4004:usr=V47236} 启动已用时间：1.187 秒

[10/31/2012 19:56:57:487 SWAP INF] {hap=CB3:app=Adobe Reader X 10.0.1.434:tid=4004:usr=V47234} 应用程序关闭

[2012 年 10 月 31 日 20:01:40:745 ???? INF] {tid=327C:usr=V42235} 打开虚拟注册表时出错（第 9 节），rc: 07B01F0C-0000004A

[2012 年 10 月 31 日 20:01:40:776 ???? INF] {tid=327C} 打开虚拟注册表时发生错误（部分：9），rc：07B01F0C-0000004A

[10/31/2012 20:01:40:776 SWAP INF] {hap=CB4:app=Adobe Reader X 10.0.1.434:tid=327C:usr=V422357235} 上传耗时：0.609 秒

[11/01/2012 16:48:44:157 SWAP INF] {hap=11A4:app=Lotus Notes_b1 6.5.40.5086:tid=361C:usr=A422353001} 启动已用时间：5.219 秒

[11/01/2012 16:50:21:003 ???? INF] {tid=32D8:usr=W8WS83} 打开虚拟注册表时发生错误（部分：9），rc：07B01F0C-0000004A

[11/01/2012 16:50:21:066 ???? INF] {tid=32D8} 打开虚拟注册表时发生错误（第 9 节），rc: 07B01F0C-0000004A

[11/01/2012 16:50:21:082 SWAP INF] {hap=11A5:app=Adobe Reader X 10.0.1.434:tid=32D8:usr=W8WS83} 上传经过的时间：0.703 秒

[11/01/2012 16:50:22:503 SWAP INF] {hap=11A5:app=Adobe Reader X 10.0.1.434:tid=32D8:usr=W8WS83} 启动已用时间：2.218 秒

[11/01/2012 16:50:50:395 SWAP INF] {hap=11A5:app=Adobe Reader X 10.0.1.434:tid=32D8:usr=A422353001} 应用程序关闭

[11/01/2012 16:53:24:367 ???? INF] {tid=1F80:usr=t405230} 打开虚拟注册表时发生错误（部分：9），rc：07B01F0C-0000004A

[11/01/2012 16:53:24:383 ???? INF] {tid=1F80} 打开虚拟注册表时出错（第 9 节），rc: 07B01F0C-0000004A

[11/01/2012 16:53:24:383 SWAP INF] {hap=11A6:app=Show Desktop 1.0:tid=1F80:usr=A422353001} 上传已用时间：0.531 秒

[11/01/2012 16:53:24:727 SWAP INF] {hap=11A7:app=Microsoft Office Excel 2003_b1 11.0.8324.1:tid=251C:usr=V422357235} 上传经过的时间：0.0 秒

[11/01/2012 16:53:24:758 SWAP INF] {hap=11A6:app=Show Desktop 1.0:tid=1F80:usr=V47234} 启动已用时间：1.78 秒

[11/01/2012 16:53:25:117 SWAP INF] {hap=11A6:app=Show Desktop 1.0:tid=1F80:usr=V422357235} 应用程序关闭

[11/01/2012 10:45:00:576 ???? INF] {tid=1650} 打开虚拟注册表时发生错误（第 9 节），rc：07B01F0C-0000004A ElapR Application Virtualization Client 无法连接到流 URL 'RTSP://SRVW23E:554/V1321_BDP_V1_R1_SB/V1321_BDP_C1_P2PM_SS。 sft'（rc 1690900A-00002002，原始 rc 1690900A-00002002）。

[11/01/2012 00:29:59:843 OSDF ERR] {tid=1464} Application Virtualization Client 无法解析 OSD 文件 'C:\SoftCache\SoftGrid Client\OSD Cache\edCc4305-3f6C-4dcc-3d70 -404eb8bd97d8.osd'。原因：XML解析失败（rc 00000A25-00000002）

[11/01/2012 08:24:35:869 ???? ERR] {tid=336C:usr=t405230} 检测到损坏的 cp 文件（'V:\V1321_BDP\osguard.cp'）。osguard cp 文件，未采取更正措施

[11/01/2012 22:16:39:240 JGSW ERR] {hap=1C82:app=bDP c15 E2AM SS 1.0:tid=3D58} Application Virtualization Client 无法连接到流 URL 'RTSP://PSWQAPP1: 554/V14678993_BDP_C15_E2AM_SS/V14678993_BDP_C15_E2AM_SS.sft'（rc 1690900A-00002002，原始 rc 1690900A-00002002）。

[11/01/2012 22:16:39:240 SWAP ERR] {hap=1C82:app=bDP c15 E2AM SS 1.0:tid=3D58} 客户端无法连接到 Application Virtualization Server (rc 1690900A-00002002)

[11/01/2012 22:17:09:163 AMGR ERR] {tid=4F54} 指定的应用程序名称（应用程序集成）不明确。一些潜在的匹配项：应用程序集成 7.0.1756.1756 应用程序集成 9.2.2373.2373

[11/01/2012 22:17:09:163 AMGR ERR] {tid=4F54} 应用程序虚拟化客户端无法打开应用程序集成

[11/01/2012 00:03:14:313 SWAP WRN] {tid=507C:usr=N28712} 无法加载 OSD 文件 \PSWQAPP1\Content\D1311_bDP_Adobe_Reader_9.3.3\D1311_bDP_Adobe_Reader 9.3.3.osd

[11/01/2012 00:03:14:313 AMGR INF] {tid=507C:usr=i435145} 应用程序管理器无法从 '\PSWQAPP1\Content\D1311_bDP_Adob_dobe_Reader_9.3.3\D1311_bDP_Adob_b_Adobe Reader 9.3.3 创建应用程序。 osd'（rc 0C405664-00000002）。

====

[11/01/2012 13:35:16:987 JGSW ERR] {hap=1:app=Abaculus 1.0.0.1:tid=14C8:usr=R3R7DF42} Application Virtualization Client 无法连接到流 URL 'RTSP:% SFT_SRV%:554/D1311_bDP_Adob_b_Adobe_Abaculus_15_01/D1311_bDP_Adob_b_Adobe_Abaculus_15_01.sft'（rc 19D02E0A-10000002，原始 rc 19D02E0A-10000002）。

[11/01/2012 13:35:47:998 SWAP ERR] {hap=2:app=AboutPI-SDK 1.3.0.26:tid=1568:usr=I337721} 无法加载应用程序 [11/01/2012 16: 53:25:399 SWAP INF] {hap=11A7:app=Microsoft Office Excel 2003_b1 11.0.8324.1:tid=251C:usr=V47234} 启动已用时间：0.891 秒

[11/05/2012 10:43:37:527 SWAP INF] {hap=1510:app=Adobe Reader X 10.0.1.434:tid=2AE8:usr=V47234} 应用程序关闭

[11/05/2012 10:44:00:793 SWAP INF] {hap=1511:app=Microsoft Office Word 2003_b1 11.0.8324.1:tid=1D80:usr=V422357235} 上传经过的时间：0.0 秒

[11/05/2012 10:44:03:809 SWAP INF] {hap=1511:app=Microsoft Office Word 2003_b1 11.0.8324.1:tid=1D80:usr=V422357235} 启动已用时间：3.172 秒

[11/05/2012 10:44:15:965 SWAP INF] {hap=1511:app=Microsoft Office Word 2003_b1 11.0.8324.1:tid=1D80:usr=V422357235} 应用程序关闭

[11/05/2012 10:44:20:637 SWAP INF] {hap=1512:app=Microsoft Office Word 2003_b1 11.0.8324.1:tid=3B9C:usr=V47234} 上传经过的时间：0.0 秒

[11/05/2012 10:44:23:606 SWAP INF] {hap=1512:app=Microsoft Office Word 2003_b1 11.0.8324.1:tid=3B9C:usr=V47234} 启动已用时间：3.125 秒

[11/05/2012 10:44:32:481 SWAP INF] {hap=150B:app=Microsoft Office Excel 2003_b1 11.0.8324.1:tid=19C:usr=V47234} 应用程序关闭

[11/05/2012 10:44:38:575 SWAP INF] {hap=1512:app=Microsoft Office Word 2003_b1 11.0.8324.1:tid=3B9C:usr=E831415} 应用程序关闭

[11/05/2012 10:45:00:560 ???? INF] {tid=1650:usr=V47234} 打开虚拟注册表时出错（第 9 节），rc: 07B01F0C-0000004A

[11/05/2012 10:45:00:576 ???? INF] {tid=1650} 打开虚拟注册表时发生错误（第 9 节），rc：07B01F0C-0000004A ElapR Application Virtualization Client 无法连接到流 URL 'RTSP://SRVW23E:554/V1321_BDP_V1_R1_SB/V1321_BDP_C1_P2PM_SS。 sft'（rc 1690900A-00002002，原始 rc 1690900A-00002002）。

[11/05/2012 00:29:59:843 OSDF ERR] {tid=1464} Application Virtualization Client 无法解析 OSD 文件 'C:\SoftCache\SoftGrid Client\OSD Cache\edCc4305-3f6C-4dcc-3d70 -404eb8bd97d8.osd'。原因：XML解析失败（rc 00000A25-00000002）

[11/05/2012 08:24:35:869 ???? ERR] {tid=336C:usr=t405230} 检测到损坏的 cp 文件（'V:\V1321_BDP\osguard.cp'）。osguard cp 文件，未采取更正措施

[11/05/2012 22:16:39:240 JGSW ERR] {hap=1C82:app=bDP c15 E2AM SS 1.0:tid=3D58} Application Virtualization Client 无法连接到流 URL 'RTSP://PSWQAPP1: 554/V14678993_BDP_C15_E2AM_SS/V14678993_BDP_C15_E2AM_SS.sft'（rc 1690900A-00002002，原始 rc 1690900A-00002002）。

[11/05/2012 22:16:39:240 SWAP ERR] {hap=1C82:app=bDP c15 E2AM SS 1.0:tid=3D58} 客户端无法连接到 Application Virtualization Server (rc 1690900A-00002002)

[11/05/2012 22:17:09:163 AMGR ERR] {tid=4F54} 指定的应用程序名称（应用程序集成）不明确。一些潜在的匹配项：应用程序集成 7.0.1756.1756 应用程序集成 9.2.2373.2373

[11/05/2012 22:17:09:163 AMGR ERR] {tid=4F54} 应用程序虚拟化客户端无法打开应用程序集成

[11/05/2012 00:03:14:313 SWAP WRN] {tid=507C:usr=N28712} 无法加载 OSD 文件 \PSWQAPP1\Content\D1311_bDP_Adobe_Reader_9.3.3\D1311_bDP_Adobe_Reader 9.3.3.osd

[11/05/2012 00:03:14:313 AMGR INF] {tid=507C:usr=i435145} 应用程序管理器无法从 '\PSWQAPP1\Content\D1311_bDP_Adob_dobe_Reader_9.3.3\D1311_bDP_Adob_b_Adobe Reader 9.3.3 创建应用程序。 osd'（rc 0C405664-00000002）。

==== [11/05/2012 13:35:16:987 JGSW ERR] {hap=1:app=Abaculus 1.0.0.1:tid=14C8:usr=R3R7DF42} Application Virtualization Client 无法连接到流 URL 'RTSP:%SFT_SRV%:554/D1311_bDP_Adob_b_Adobe_Abaculus_15_01/D1311_bDP_Adob_b_Adobe_Abaculus_15_01.sft'（rc 19D02E0A-10000002，原始 rc 19D02E0A-10000002）。

[11/05/2012 13:35:47:998 SWAP ERR] {hap=2:app=AboutPI-SDK 1.3.0.26:tid=1568:usr=I337721} 无法加载应用程序

我的脚本总是从当前日期读取上述日志......并捕获错误数组......

option Explicit

const ForReading = 1, ForWriting = 2, ForAppending = 3
const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0

dim arrErrors(5)
dim objFSO, objServerList, objErrorLog, strErrorLine, strError
dim strComputer, strToday, strFilePath, objCoreApp, strLine, today, i 

set objFSO = CreateObject("Scripting.FileSystemObject")
set objServerList = objFSO.OpenTextFile("list.txt", ForReading, false, TriStateTrue)
set objErrorLog = objFSO.CreateTextFile("error.log")

strToday = Date()

arrErrors(0) = "The Application Virtualization Client could not connect to stream"
arrErrors(1) = "XML parsing failure"
arrErrors(2) = "corrupt cp file detected"
arrErrors(3) = "The client was unable to connect"
arrErrors(4) = "Virtualization Client cannot open Application Integration"
arrErrors(5) = "Could not load OSD file"

Do while not (objServerList.AtEndOfStream)
  strComputer = objServerList.ReadLine

  strFilePath = "\\" & strComputer & "\d$\LOGFILES\"

  set objCoreApp = objFSO.OpenTextFile(strFilePath & "CoreAPP.txt", ForReading, False, TriStateTrue)

  objErrorLog.WriteLine strComputer & vbTab & "," & vbTab & "Checking"

  do while not (objCoreApp.AtEndOfStream)
    strLine = objCoreApp.ReadLine

    'If InStr (strLine, today) = 0 Then

    if (left(strLine, len(strToday) + 1) = "[" & strToday) then
      strErrorLine = objCoreApp.ReadLine

      for i = 0 to ubound(arrErrors)
        strError = arrErrors(i)

        if (left(lcase(strErrorLine), len(strError)) = lcase(strError)) then
          objErrorLog.WriteLine strErrorLine & vbTab & strComputer
          exit for
        end If
      next
    end If
  loop
  objCoreApp.close
loop
objErrorLog.WriteLine "Completed Checking all the servers"

objErrorLog.Close
objServerList.Close
MsgBox "Script Completed" 

上述脚本的问题是......脚本只能捕获“检测到损坏的 cp 文件”......只有......事实上，上述所有数组情况都是正确的，但没有捕获并写入日志文件......不是确定为什么它没有捕捉到剩余的错误......寻求帮助......

当我用上面的日志文件编译上面的脚本时......得到下面的输出......

MYserver1   ,   Checking
corrupt cp file detected adsa   MYserver1   
Completed Checking all the servers