Credit goes to my Sir,it was never hard learning vbscript it was rather spune feedng, guys here is a vbscript based on.
'To Display each line of a file insted of total contain at a time

option explicit                                                      'option explicit doesn't allow QTP to take default values
dim fso,fo,l                                                          'fso=filesystemobject, fo=fileobject, l=line to display
set fso=createobject("scripting.filesystemobject")  'set fso is creating object
set fo= fso.opentextfile("D:\mindq.txt",1,false)       'opening a text file with a specifed path
while fo.atendofstream<>true                                'conidtion  
l=fo.readline                                                         'reding the line
msgbox(l)                                                             'displaying
wend
fo.close                                                                 'close of loop
set fo=nothing                                                       'destroying textfile
set fso=nothing                                                      'destroying file object