good evening i wrote a script in VB which i want to get the data from the
msaccess but when i am running the code it is not running and getting error
dsn name is not taking but i created dsn name again still error is coming
and this is DSN Name MYDSN please clarify the query
Dim x,y
set x = CreateObject("ADODB.Connection")
set y =CreateObject("ADODB.recordset")
strDSN=MyDSN;UID=Admin;Pwd=Test"
x.provider= "microsoft.jet.oledb.4.o"
x.open "C:\Documents and Settings\My Documents\Db.mdb"
y.open "select * from emp",x
y.movefirst
while not y.EOF<> True
msgbox y.Fields("course")
y.movenext
wend
--
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
