Hi Vishal,

Try below code:

Dim conOb
Set conObj=createobject("ADODB.Connection")
conObj.open "driver=XXXXXX;" etc...
'You can find the right connection stings for the DB at this location:
http://www.connectionstrings.com/

Set ResultSet=conObj.Execute("select * from YourTableName")

While not ResultSet.EOF
    stdname=ResultSet("your filed name")
    'stdname=ResultSet("your filed name").value   //both the statement 
yield the same results
    print stdname 
    msgbox(stdname)
    ResultSet.movenext
Wend

Please let me know if the above doent help.

Thanks,
Uday
QTP / UFT Videos <https://www.youtube.com/user/AnemUday/videos>

On Thursday, 10 July 2014 11:27:54 UTC+5:30, Vishal wrote:
>
> Hi,
>
> Can anyone suggest me that how we can handle multiple rows in recordset?
>
> Currently I am getting multiple rows as a query result and get value from 
> each row one by one. how to do that?
>
> I am using MS Access db as a data source.
>
> Awaiting for help.
>
> Thanks,
> Vishal
>

-- 
-- 
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/d/optout.

Reply via email to