An engineering approach to Software Testing and Test Automation

Parent page: Service Functions – Math (QTP, VBScript) Convert array to set Public Function Array2Set(ByVal dvArray, ByVal sSetSeparator)   Dim Iter   Dim stResult     If Not isArray(dvArray) Then     Array2Set = ""     Exit Function   End If   If UBound(dvArray) = -1Then     Array2Set = ""     Exit Function   End If [...] ...

Parent page: Service Functions – Math (QTP, VBScript) Check whether an item is in array Public Function isItemInArray(ByVal dvArray, ByVal sItem)   Dim Iter     If sItem = "" Then     isItemInArray = False     Exit Function   End If     If Not isArray(dvArray) Then     isItemInArray = False     Exit Function   [...] ...

Parent page: Service Functions – Math (QTP, VBScript) Check whether an array consists of numeric values Public Function isArrayNumeric(ByVal dvArray)   Dim Iter     If Not isArray(dvArray) Then     isArrayNumeric = False     Exit Function   End If   If UBound(dvArray) = -1 Then     isArrayNumeric = False     Exit Function   End If [...] ...

Proverbs and quotes You can teach a student a lesson for a day; but if you can teach him to learn by creating curiosity, he will continue the learning process as long as he lives. Clay P. Bedford Get over the idea that only children should spend their time in study.  Be a student so [...] ...