Как я могу сравнить два ряда DataTable в QTPКак я могу сравнить два ряда DataTable в QTP
ответ
1) Вы хотите сравнить строки данных в родном DataTable объекта Qtp в?
Применение SetCurrentRow метод Пример: objDataSheet.SetCurrentRow (intRow)
Используйте GetParameter, чтобы получить доступ к имени столбца и значение ячейки sColName = objDataSheet.GetParameter (к) .Name Значение по индексу: sCellValue = objDataSheet.GetParameter (к) .Name Значение по имени Col: sCellValue = objDataSheet.GetParameter (sColName) .Name
2) Есть ли у ou хотите сравнить 2 строки в 2 отдельных листах Excel? Вы можете использовать следующий код (взятый из моего блога http://automationbeyond.wordpress.com, см. Другие примеры)
Приложение Excel должно быть установлено на ПК. Сравнение идет по ячейке в пределах занятого диапазона. Несоответствующие ячейки отмечены красным цветом.
Обе книги должны существовать и определяться как полный путь с файлом. Оба листа должны существовать и могут быть определены как числовой индекс или имя строки.
objParameter является зарезервированным параметр для реализации пользовательского сравнения, как «игнорировать регистр», «округлить число» и т.д.
Public Function ExcelWorksheetCompare(ByVal sWorkbook1, ByVal sWorksheet1, ByVal sWorkbook2, ByVal sWorksheet2, ByVal objParameter)
Dim boolRC, boolSheetExists
Dim FSO, XLHandle
Dim XLBook1, XLBook2, XLSheet1, XLSheet2
Dim Iter, objCell
‘Verify both files exist
Set FSO = CreateObject(”Scripting.FileSystemObject”)
boolRC = FSO.FileExists(sWorkbook1)
If Not boolRC Then
ExcelWorksheetCompare = FALSE
Exit Function
End If
boolRC = FSO.FileExists(sWorkbook2)
If Not boolRC Then
ExcelWorksheetCompare = FALSE
Exit Function
End If
Set FSO = Nothing
Set XLHandle = CreateObject(”Excel.Application”)
XLHandle.DisplayAlerts = False
‘Open workbook1
Set XLBook1 = XLHandle.WorkBooks.Open(sWorkbook1)
‘Verify sheet exists (1)
If isNumeric(sWorksheet1) Then
sWorksheet1 = CInt(sWorksheet1)
If (sWorksheet1 >0) AND (sWorksheet1<=XLBook1.Worksheets.Count) Then
Set XLSheet1 = XLBook1.Worksheets(sWorksheet1)
boolSheetExists = TRUE
Else
boolSheetExists = FALSE
End If
Else
boolSheetExists = FALSE
For Iter = 1To XLBook1.Worksheets.Count
If XLBook1.Worksheets(Iter).Name = sWorksheet1 Then
Set XLSheet1 = XLBook1.Worksheets(Iter)
boolSheetExists = TRUE
End If
Next
End If
If Not boolSheetExists Then
XLBook1.Close
XLHandle.Quit
Set XLBook1 = Nothing
Set XLHandle = Nothing
ExcelWorksheetCompare = FALSE
Exit Function
End If
‘Open workbook2
Set XLBook2 = XLHandle.WorkBooks.Open(sWorkbook2)
‘Verify sheet exists (2)
If isNumeric(sWorksheet2) Then
sWorksheet2 = CInt(sWorksheet2)
If (sWorksheet2 >0) AND (sWorksheet2<=XLBook2.Worksheets.Count) Then
Set XLSheet2 = XLBook2.Worksheets(sWorksheet2)
boolSheetExists = TRUE
Else
boolSheetExists = FALSE
End If
Else
boolSheetExists = FALSE
For Iter = 1To XLBook2.Worksheets.Count
If XLBook2.Worksheets(Iter).Name = sWorksheet2 Then
Set XLSheet2 = XLBook2.Worksheets(Iter)
boolSheetExists = TRUE
End If
Next
End If
If Not boolSheetExists Then
XLBook1.Close
XLBook2.Close
XLHandle.Quit
Set XLSheet1 = Nothing
Set XLBook1 = Nothing
Set XLBook2 = Nothing
Set XLHandle = Nothing
ExcelWorksheetCompare = FALSE
Exit Function
End If
‘Mark range
‘Compare and mark mismatches red
For Each objCell In XLSheet2.UsedRange
If objCell.Value <> XLSheet1.Range(objCell.Address).Value Then
objCell.Interior.ColorIndex = 3
Else
objCell.Interior.ColorIndex = 0
End If
Next
‘Save and close
XLBook1.Close
XLBook2.Save
XLBook2.Close
XLHandle.Quit
Set XLSheet1 = Nothing
Set XLSheet2 = Nothing
Set XLBook1 = Nothing
Set XLBook2 = Nothing
Set XLHandle = Nothing
ExcelWorksheetCompare = TRUE
End Function
- 1. Переверните два ряда данных datatable
- 2. Как сравнить два нестационарных временных ряда
- 3. Как я могу сравнить два freespaces?
- 4. Как я могу сравнить два массива?
- 5. Как я могу сравнить два текстовых файла?
- 6. Как я могу сравнить два значения массива
- 7. Как я могу сравнить два объекта
- 8. Как сравнить два DataTable и вернуть diffrence?
- 9. JQuery - Как я могу сравнить два списка
- 10. как я могу сравнить два списка
- 11. Как сравнить два ряда из двух серий панд?
- 12. Почему я не могу сравнить два атома?
- 13. Как я могу проверить PDF в qtp ..?
- 14. Как я могу сравнить два значения в наследовании в java?
- 15. Как сравнить два datagridview's
- 16. Ярлык в два ряда
- 17. сравнить два DataTable значения, если оператор
- 18. Как я могу сравнить два раза в VB.net
- 19. Как я могу сравнить два массива в ГДЕ?
- 20. Как я могу сравнить два файла в Python более эффективно?
- 21. Как я могу сравнить два значения результата AWK в Баше
- 22. сравнить два ряда строк с таким же количеством ячеек
- 23. Qtp, экспорт datatable в центр качества
- 24. Как я могу сравнить два локальных веб-сервера iOS?
- 25. как я могу сравнить два столбца строк вместе
- 26. Как я могу сравнить два класса, основанные на их методах?
- 27. Как я могу сравнить и объединить два массива
- 28. Как я могу сравнить два объекта типа NSTimeInterval
- 29. Как сравнить два типа данных
- 30. Средняя позиция в два ряда