Use the following code: you will get 0 also when there is no records
set conn=Createobject("ADODB.Connection")
Set Rec = CreateObject("ADODB.Recordset")
SQLquery="select * from users"
Rec.open SQLquery ,conn
Rec.MoveFirst
cnt1=0
Do until Rec.EOF
cnt1=cnt1+1
Rec.MoveNext
Loop
Rec.Close
msgbox cnt1
regards
Umamahesh
8939192903
--
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
