在QTP中使用文本文件

Question

我需要从文本文件中读取数据并将读取的数据保存到Excel中。

该文本文件包含111111111122222222223333333333Taaaaaaaassssssss。所以在这里我已经阅读了前10个字符并将它们保存到Excel中的一列中，依此类推文本文件中的整行1行。

尝试在QTP中执行此操作，请求您提供帮助。

Answer 1

您可以使用的策略：

1. 通过自动化为excel文件创建COM实例。使用CreateObject("Excel.Application")在QTP中实现这一目标。使第一个单元格成为ActiveCell

2. 打开文本文件并执行.readall将结果存储在字符串中

3. 执行for each line in split(readAllString, vbNewLine)循环所有行

4. 在For循环的主体中：

   • 循环遍历line的长度，如：for characterPosition = 1 to len(line) step 10，并在此循环内：
     • 执行mid(line, characterPosition, 10)以获取一组10个字符
     • 将结果写入ActiveCell并将ActiveCell移至一列
   • 将ActiveCell转移到第一列和下一行

5. 清理，关闭Excel文件等。

步骤1和2可以很容易地在互联网上查找，其他步骤是非常直接的VBScript功能。尝试一下，当您遇到问题时，将它们添加到您的帖子中，我们会看到我们可以在哪里修复它。