加载VBS文件到 Library 库中出错。

jino007

加载VBS文件到 Library 库中出“This operation cannot be performed during a run session.”错误。


                         Dim obj ,qtLibraries
              Set obj = CreateObject("QuickTest.Application")
              Set qtLibraries = obj.Test.Settings.Resources.Libraries  
              If qtLibraries.Find( TaskVbsFilePaths)=-1Then
                                  msgbox TaskVbsFilePaths
                  qtLibraries.Add TaskVbsFilePaths,3
                          End If
请问哪里出错了

TIB

这些代码要在QTP之外用VBS文件执行

jino007

If DataTable("IDX",TEST_SHEET) = "√" Then
                        taskFileName = DataTable("bizName",TEST_SHEET)
                        If NOT taskFile.Exists(taskFileName) Then
                                taskFilePath = pathFind(Environment("testScriptFolderName"),taskFileName,"vbs")
                call taskFile.add(taskFileName,taskFilePath)
                            ExecuteFile taskFilePath '加载task脚本文件
                                logPrint("加载Task脚本文件完成。"&taskFilePath)
                                Execute "Set obj"&taskFileName&" = new "&taskFileName '初始化task的类
                        End If
                End If
                DataTable.GetSheet(TEST_SHEET).SetNextRow
        Next


上面的这段代码：能不能解释一下 加载“初始化task的类”的一下用法，或者是说加载外部的VBS文件的一些心得啊？？最近在学这方面的东西

jino007

ding