软件质量优化

Function getStrBetween(Str,StartStr,EndStr)  StartStrPos = Instr(Str, StartStr)+Len(StartStr)   EndStrPos = Instr(Str,EndStr)   Length = EndStrPos  - StartStrPos    Res= Mid(Str,StartStrPos,Le

在VBScript中，可以用ExecuteGlobal语句来在一个脚本文件中加载另外一个脚本的函数，例如，假设需要加载的是脚本Test.vbs:Function Test1 Msgbox "Test1"End Function那么可以在脚本ExecuteGlobal.vbs中按下面的方式加载并调用Test1函数:Set fso = CreateObject("Scripting.FilesyS

QTP采用VBS作为脚本语言，VBS中处理错误的语句是：On Error Resume NextOn Error GoTo 0 If you dont use an On Error Resume Next statement anywhere in your code, any run-time error that occurs can cause an error messag

 VBS中函数参数支持ByVal和ByRef两种传递方式，它们的区别是什么呢？ ByRef表示传递的是指向对象的指针，函数体内修改变量值时将直接修改指针所指向的对象值，参数定义时如果没有声明为ByVal或ByRef，则默认为ByRef，例如：msg = "DB MSG - Some junk from errormes

FileSystemObjectProvides access to a computers file system. FileSystemObject对象（简称FSO对象）提供给了从VBS或QTP访问文件的能力，在QTP自动化测试过程中经常使用。通常用CreateObject来创建FSO对象。FSO对象常用的方法有：OpenTextFile - 打开文本文件Re

VBS中如何获取一个数组中最大值的位置？ 以下VBS脚本可以实现这个功能： Public Function getArrMaxValueIndex(ByVal arr)        Dim ix, ixMax             ixMax = 0        For ix = 1 To UBound(arr)            If ( arr(ixM

relevantcodes.com的《Passing Multiple Values from Functions》这篇文章介绍了如何从函数（Function）中返回多个值：http://relevantcodes.com/passing-multiple-values-from-functions/ 第一种方法是利用全局变量，因此根本不用返回，只要直接给全局变量赋值即可。例：

 relevantcodes.com的一篇文章《VBScript: Compare 2 Excel Files》中介绍了如何用VBScript来比较两个Excel文件的数据：http://relevantcodes.com/vbscript-compare-2-excel-files/ 主要是使用了Excel的COM接口的range对象来实现的。支持比较数据并且高亮显示差异： 

'#########################################################' 整合GCovFunction Example_GCov Call GCov_Build_With_Coverage() Call GCov_Run_AUT() Call GCov_Gen_Coverage_Data() Call LCov_Gen_Report() Call GC