Set obj=CreateObject("Scripting.FileSystemObject")
Set oFile=obj.OpenTextFile("C:/JX/WorkSpace/test.ldif",1)
msgbox oFile.ReadLine
Set obj=Nothing
Set oFile=Nothing
【软件自动化测试-QTP实战技能 27】== QTP open ldif file

Set obj=CreateObject("Scripting.FileSystemObject")
Set oFile=obj.OpenTextFile("C:/JX/WorkSpace/test.ldif",1)
msgbox oFile.ReadLine
Set obj=Nothing
Set oFile=Nothing