我正在尝试从VBS文件执行下面的OTA代码，以便在测试集中执行每个测试
但是我收到一个错误，ActiveX组件无法在步骤
创建对象设置Scheduler = theTestSet.StartExecution（＆＃34;＆＃34;）
我的系统详情：
操作系统：Windows 7专业版 系统类型：64位操作系统 ALM版本：12.0
代码：
设置ALMConnection = CreateObject（＆＃34; TDAPIOLE80.TDConnection＆＃34;）
＆＃39;连接到服务器 ALMConnection.InitConnectionEx＆＃34; http://alm.zebra.com/qcbin＆＃34;
＆＃39;验证用户身份 ALMConnection.Login＆＃34; uk1346＆＃34;，＆＃34; aJanuary $ 2018＆＃34;
＆＃39;连接到项目 ALMConnection.Connect＆＃34; ZEBRA_PROJECTS＆＃34;，＆＃34; Zebra_Global_Projects＆＃34;
设置TSetFact = ALMConnection.TestSetFactory
设置tsTreeMgr = ALMConnection.TestSetTreeManager
nPath =＆＃34; Root \＆＃34; ＆安培;修剪（＆＃34; Automation \ Automation Dry Run＆＃34;）
设置tsFolder = tsTreeMgr.NodeByPath（nPath）
如果（tsFolder什么都没有）那么
MSGBOX＆＃34;找不到文件夹＆＃34;
否则
MSGBOX＆＃34;找到文件夹＆＃34;
结束如果
设置tsList = tsFolder.FindTestSets（＆＃34; Dry Run＆＃34;）
如果tsList.Count＆gt; 0然后
MSGBOX＆＃34; FindTestSets找到了多个测试集＆＃34;
ElseIf tsList.Count＆lt; 1然后
MSGBOX＆＃34; FindTestSets：未找到测试集＆＃34;
结束如果
设置测试集= tsList.Item（1）
MSGBOX theTestSet.ID ＆＃39; 设置Scheduler = theTestSet.StartExecution（＆＃34;＆＃34;）
Scheduler.RunAllLocally = True
Scheduler.Run
设置execStatus = Scheduler.ExecutionStatus
MSGBOX execStatus
设置ALMConnection = Nothing