Dim cn,rs
Set cn = CreateObject ("ADODB.Connection")
Set rs = CreateObject ("ADODB.Recordset")
cn.Open "DSN = QT_Flight32"
rs.Open "select * from employee ", cn
While rs.EOF <>True
print rs("I_name")&" "& rs("f_name")
rs.MoveNext
Wend
rs.Close
cn.Close
it through Error
The test run cannot continue due to an unrecoverable error.
[Microsoft][ODBC Driver Manager] Data source name not found and no
default driver specified
Line (1): "".
--
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
