HI,
Thank you for your reply, I try only to read the data line by line (As a txt 
file) and take the test if such a function (void) it must start with "{" 
anything between parenthesis and ends with "}" with regular manual 
expressions,  tried to do that but I want to enjoy using the regular 
expressions, you don(t have an example, thank you.

filename = "src \ mx_main.c" 
Set fs = CreateObject ("Scripting.FileSystemObject") 
Set fich_source fs.OpenTextFile = (filename, 1, False) 

Do While not fich_source.atEndOfStream 
'Read the line 
strLine = fich_source.ReadLine 

If inStr (strLine, "/ * USER CODE") Then 
'Print the value read on the Report 
Reporter.ReportEvent micPass, strLine, strLine 
End If 
Loop 

fich_source.close 
Set fich_source = nothing 
Set fs = nothing 

-- 
-- 
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en

--- 
You received this message because you are subscribed to the Google Groups "QTP 
- HP Quick Test Professional - Automated Software Testing" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
For more options, visit https://groups.google.com/groups/opt_out.


Reply via email to