在UFT（QTP）中，引用外部的Excel文件作为它的datatable，但是结果只执行第一行数据，是为什么？

将excel做为外部数据参数化时，需要自己写循环吧。

Dim filePath,sheetName '定义参数数据文件的路径

Dim sheetRows,sheetColumns'定义行数和列数

Dim excelBook,myExcelBook,myExcelSheet

filePath = Parameter("excelBook")

sheetName = Parameter("excelSheet")

Set excelBook = CreateObject("Excel.Application")

Set myExcelBook = excelBook.Workbooks.Open(filePath)

Set myExcelSheet = myExcelBook.Worksheets(sheetName)

sheetRows = myExcelSheet.UsedRange.Rows.Count'获取行数

sheetColumns = myExcelSheet.UsedRange.Columns.Count

Dim data()'定义数戚猜陪组读取单元格值

Redim data(sheetRows,sheetColumns)'重新定义数组

Dim i,j'定义循环变量

For i=2 To sheetRows

For j = 1 To sheetColumns

data(i,j) = myExcelSheet.Cells(i,j).value'获取单元格值

Next

Next

ExcelBook.Quit

Set ExcelBook=Nothing

我是这样引兆孝用高蠢的，不知道是不是与你说的一样。

本文总结下bootStrap中的dataTable插件的使用方法，以供初学者学。

我引用dataTable制作的表格效果如下:

首先说下为什么使用插件，插件可以帮助我们快速开发，同时适合初学者完成一些复杂的 *** 作，比如上传文件啊，日历啊什么的。bootstrap中有丰富的插件让开发这实现各种功能。咐轿

1.首先引入样式文件本例用的是bootstrap中的ace-master插件，可以直接到bootstrap官做镇网下载此插件在进行修改下载完成后解压，然后打开解压后的ace-master文件夹可以纯简粗看到很多类型为HTML的文件，这些文件都是一个网页，把任意一个html文件拖到浏览器中打开可以看到很多页面效果。这里我们使用的是里面的名为table的文件：

拖进浏览器后的页面图：

然后我们就可以在我们的编译器中更改代码，变成我们想要的效果啦。我们可以边改边在浏览器中看效果，我们会发现前端很有意思哦~

[解决办唤蚂前法]

写物知全命名空间

[解决办法]

using System.Data = SysData//自定义别和清名

using Microsoft.Office.Interop.Excel.DataTable = OfficeData

使用:

SysData.DataTable dt = new SysData.DataTable()

---