qtp dictionary 问题

樱桃宝宝 · 发表于 2009-2-20 15:05:58

setFileExcel ="E:\中交测试脚本\loan.xls"
sheet_name ="loan"
Call datatable.AddSheet(sheet_name)
Call datatable.ImportSheet (setFileExcel,sheet_name,sheet_name)
rows =datatable.GetSheet (sheet_name).GetRowCount
set  valus =CreateObject("Scripting.Dictionary")

For i=1 to rows
DataTable.SetCurrentRow (1)
  For j=1 to 10
str =datatable.Value(j,sheet_name)
       valus .Add Cstr(j),str
  Next
Next

其中加红的地方在保存的时候老是提醒又错误，但是我找不出什么错误，请帮我找找！谢谢

樱桃宝宝 · 发表于 2009-2-20 15:06:47

现谢谢大家，知道的帮帮忙

morrith · 发表于 2009-2-20 16:06:41

多个空格？
valus.Add Cstr(j),str
我不清楚，就是看你的多了个空格。。

jifeng · 发表于 2009-2-20 17:17:22

提示什么错误啊，

		自动登录	找回密码
密码			(注-册)加入51Testing

[原创] qtp dictionary 问题

相关帖子

站长推荐 /1