How do you connect/configure qtp to access data from database?

[b]Question asked by visitor Laxmi[/b]

How do you connect/configure qtp to access data from database? What database it is compatible with?

Access is well compatable with QTP. Just give the DSN file path.....Its preety easy

Dim con,rs
set con = CreateObject("ADODB.Connection")
set rs =CreateObject("ADODB.recordset")
con.provider "microsoft.jet.oledb.4.o"
con.open "D:\programfile\mercuryinteractive\................xxx.mdb"
rs.open select * from emp,con
rs.movefirst
while not rs.EOF
msgbox rs.fileds("column name")
rs.movenext
wend