CopyFromRecordset Action -> Error 430 on some machines 2

[VBAinspire]

I am using the following VBA code to transfer recorset data from Access to Excel:

rstNew = New ADODB.Recordset
xlBook.Worksheets(1).Range(B2).CopyFromRecordset rstNew

On some machines, it works perfectly. On others, it crashes with the following error:

Run-time Error 430 - "Class does not support Automation or does not support expected interface."

Any ideas on what could be causing the problem and how to fix it?

 

[Rolliee]

I checked the Visual Basic forumn via Google and go the followinig anwser.

quote
u need to install MDAC 2.6/2.7...

I faced same problem
-sachya

unquote

Apparently the 98SE machine has a MDAC that is too old. I believe this is free from Uncle Bill's website aka Microsoft.com


rollie@bwsys.net

 

[Rolliee]

I checked out a VB forum thru google and found the following

quote

unquote u need to install MDAC 2.6/2.7...

I faced same problem
-sachya


rollie@bwsys.net

 

[VBAinspire]

Thank you so much!!!

I installed the MDAC 2.7 Service Pack 1 Refresh, and it fixed the problem.

The executable is located at the following address:

http://www.microsoft.com/downloads/...f2-cae7-493d-b0f3-ae36c570ade8&DisplayLang=en

 

[Rolliee]

you are welcome.