Write a program to print all lines that contains a word either “testing” or “qtp”
- 2 Answers
- 6831 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / amit
''' Write a program to print all lines that contains a word either “testing” or “qtp”
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
Set objFile = fso.OpenTextFile("C:UsersAmit MoolchandaniDesktop est.txt",1,True)
Do While objFile.AtEndOfStream <> True
str = objFile.ReadLine
If Instr(1,str,"Testing",1) Or Instr(1,str,"qtp",1) Then
Print str
End If
Loop
objFile.Close
Set objFile = Nothing
Set fso = Nothing
| Is This Answer Correct ? | 5 Yes | 0 No |
Answer / syamala usha
set fso = createobject("scripting.filesystemobject")
set f=fso.opentextfile("C:
otes HP.txt",1)
Do until f.atendofstream
str=f.readline
a = split(str," ")
flag=0
for j = 0 to ubound(a)
if (a(j) = "testing") or (a(j) = "qtp") then
flag=1
exit for
end if
next
if flag=1 then
msgbox str
end if
loop
f.close
set f= nothing
set fso =nothing
| Is This Answer Correct ? | 0 Yes | 0 No |
Explain few date functions in vbscript?
What are the environments supported by vbscript language?
How can the spaces from the string be removed?
write a vb script to calculate factorial of a number?
who will create the object?
Which operator can be used to change the value of the operand or change the state of the condition?
How to write VB Script for selecting a particular row in a WebTable?
How to use QTP Object in .vbs(vbscript file) file Ex: Browser().., wait(), exist() and etc...
I want to import the sheet from the Excel to the Datatable using VB Script. I used the Syntax as 'Datatable.ImportSheet "Filename","SourceSheet","Destinat ionSheet" Ex: Datatable.ImportSheet "D:\Data1.xls","Sheet1","Global" Qtp producing run time error,How I can solve the problem
What if you do not specify anything when you call a procedure?
What are the 2 ways to pass a value to the function?
Explain the difference between POST and GET Method.
ASP 
