分析：
此脚本内容比较多，这里一步步解释一下。在类的最上方是一些变量定义，这些都是必备的一些变量，包括路径、Sheet名、行数，并且这些变量都使用了let 和set方法进行了封装，以方便之后的调用。那么接下来就是Load函数，此函数的作用就是载入这些变量，并执行BuildContext方法，其实在理解了之前讲解的ADO连接Excel的技术后，理解此函数应该没有什么大的问题，它的功能主要是连接数据库获取到数据结果集，并把数据集存储到Dictionary对象中。
在了解了oDataDic的这个核心类之后，接着就可以让它发挥应有的作用了。创建一个txt文件，写入以上脚本后保存。然后在QTP下的Setting→Resources中载入此类库，如图3-42所示。
图3-42
载入之后就可以在QTP中进行使用了，为了能够连接Excel进行交互，因此需要定义Excel文件的路径、Sheet名称以及行数，接着就可以顺利载入数据和Excel，投入使用了。
|
oWorkBookPath = "d:\1.xls" '工作簿路径 oSheetName = "Sheet1" 'Sheet名称' oRowNo = 3 '需要定位的行数 '载入Excel和所有变量 Set mDict = mDataContext.Load(oWorkBookPath, oSheetName, oRowNo) MsgBox mDict("Age") '获取年龄 MsgBox mDict("Sex") '获取性别 MsgBox mDict("Username")'获取用户名 MsgBox mDict("Password") '获取密码 |
