51Testing软件测试论坛

标题: QTP 如何在读取文件内容的循环外取到数组的值 [打印本页]

作者: backerking    时间: 2013-12-16 11:23
标题: QTP 如何在读取文件内容的循环外取到数组的值
Dim strarray(1000)
Dim i
i=0
Set fso = CreateObject("Scripting.FileSystemObject")
Set openfile=fso.OpenTextFile("C:/TP131205KF.TXT",1,True)
Do          Until openfile.AtEndOfStream              
strarray(i)=openfile.ReadLine         
    i=  i+1   
Loop
openfile.Close
Set fso=Nothing
msgbox strarray(i)
为什么msgbox strarray(i) 取不到值,该如何解决
作者: joykao    时间: 2013-12-16 14:15
回复 1# backerking


    骚年。。你这个路径首先就写错了哇。。C:/TP131205KF.TXT

是不是应该是这样啊C:\TP131205KF.TXT




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2