Hi use this = "microsoft.jet.oledb.4.0" Thanks raghu
On Sat, Jul 21, 2012 at 9:28 PM, uday bhaskar <[email protected]>wrote: > 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 > -- 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
