Write a VB Script to count blank Lines in a notepad
Answers were Sorted based on User's Feedback
Answer / usha
set fso=createobject("scripting.filesystemobject")
set f=fso.opentextfile("C:usha.txt")
c=0
do until (f.atendofstream)
a=f.readline()
if len(a)=0 then
c=c+1
end if
loop
msgbox c
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / pravati
Set fso=createobject("scripting.filesystemobject")
Set qfile=fso.OpenTextFile("c:Rinkuaby.txt",1,true)
Do While qfile.AtEndOfStream<>true
x=qfile.ReadLine
msgbox x
If len(x)=0 Then
y=y+1
End If
msgbox y
loop
| Is This Answer Correct ? | 0 Yes | 0 No |
does anyone have qtp11.0 license key.Please sendit to my mail id-rrvv2011@gmail.com...Thanks
What is the use of option explicit in vbscript?
write a vb script to find simple interest using functions
How to generate 3 digit random number?
How to assign a date value to a variable?
What is the purpose of regexp object in vbscript?
Is vbscript a case-sensitive or case-insensitive?
i created script for login in QTP,i parametirized that using global sheet,problem i am facing is first i want to login with first values provided in excelsheet and want to perform some operation,second time if call same action it should login with second values in excelsheet
how to set one column as primary key in QTP and fetch values accordingly
Have any one know about Test Complete 6, please let me know. If any one have good material regarding Test Complete 6, Please send to my mail id: cns.praveen@gmail.com
How should i Create Email invite with server-side Coding?
What are string functions in vbscript?