qtp获取网页的表格并打印出来

网页上的表格：

   For j = 1 To browser("广东省农业科学院农业经济与农村发展研究所").Page("广东省农业科学院农业经济与农村发展研究所").WebTable("序号").ColumnCount(1)                                      //ColunmnCount要加一个参数才能运行
   datatable.GetSheet("Global").AddParameter browser("广东省农业科学院农业经济与农村发展研究所").Page("广东省农业科学院农业经济与农村发展研究所").WebTable("序号").GetCellData(1,j)," "    //获取列名
   
  
    For i = 2 To browser("广东省农业科学院农业经济与农村发展研究所").Page("广东省农业科学院农业经济与农村发展研究所").WebTable("序号").RowCount                                    //RowCount     不需要加参数         
    datatable.GetSheet("Global").SetCurrentRow(i-1)                                                                                                                                                                                                   //设置所有行的内容
    datatable.Value(j,"Global")=browser("广东省农业科学院农业经济与农村发展研究所").Page("广东省农业科学院农业经济与农村发展研究所").WebTable("序号").GetCellData(i,j)                       // datatable.Value(j,"Global"）括号中的j是指列名
    Next
    next

输出结果：