Solved

Error 3706: ADO could not find specified provider

Posted on 2000-04-26
5
323 Views
Last Modified: 2008-02-20
I receive the following when I try to install my project on someone else's computer: Error 3706: ADO could not find specified provider.  What could be causing this and how do I fix it?  This is urgent.  Please be specific in any fixes that are offered.  Thanks.


Private Sub Form_Load()
'On Error Resume Next
On Error GoTo Err1

Dim DBE As DBEngine
Set DBE = DBEngine

If Dir(App.Path & "\eits2.mdb") <> "" Then Kill App.Path & "\eits2.mdb"


DBE.CompactDatabase App.Path & "\eits.mdb", App.Path & "\eits2.mdb"


If Dir(App.Path & "\eits.mdb") <> "" Then Kill App.Path & "\eits.mdb"

   

Name App.Path & "\eits2.mdb" As App.Path & "\eits.mdb"

Err1:

Dim cn1 As ADODB.Connection
Set cn1 = New Connection

Dim cn2 As ADODB.Connection
Set cn2 = New Connection


cn1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Data Source = " & App.Path & "\eits.mdb"
cn1.Open


On Error GoTo ErrHand

cn1.Execute ("Drop table Data_filter")

ErrHand:

sqlCreate = ("Select * into Data_filter from Data1")
cn1.Execute sqlCreate

sqlGet = "Select * from Data_filter"

cn2.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Data Source = " & App.Path & "\eits.mdb"
cn2.Open


Form1.Adodc1.ConnectionString = cn2
Form1.Adodc1.CommandType = adCmdTable
Form1.Adodc1.RecordSource = "Data_filter"
Form1.Adodc1.Refresh

End Sub
0
Comment
Question by:nfp30
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
  • 2
5 Comments
 
LVL 28

Accepted Solution

by:
AzraSound earned 30 total points
ID: 2752052
0
 

Author Comment

by:nfp30
ID: 2752124
AzraSound,

I think you are right on target, however, being the newbie that I am, I'm having trouble implementing the fix.  When I change the connection string to OLEDB.4.0 I get errors (because I'm not using Windows 2000?).  Is there something else to change along with that?  Also, the other fix is to use MDAC 2.0 but the link they offered doesn't offer it anymore.  Can I specify MDAC 2.0 instead of MDAC 2.1 in the package and deployment wizard?
Thanks
0
 
LVL 28

Expert Comment

by:AzraSound
ID: 2752190
what errors are you getting?
0
 

Author Comment

by:nfp30
ID: 2752223
AzraSound,

I got a copy of MDAC 2.0 from the installation cd.  Thank you so much for your help.  It is working!
Thanks again.

nfp30
0
 
LVL 28

Expert Comment

by:AzraSound
ID: 2752236
youre quite welcome.  glad i could point you in the right direction.
0

Featured Post

Salesforce Made Easy to Use

On-screen guidance at the moment of need enables you & your employees to focus on the core, you can now boost your adoption rates swiftly and simply with one easy tool.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

There are many ways to remove duplicate entries in an SQL or Access database. Most make you temporarily insert an ID field, make a temp table and copy data back and forth, and/or are slow. Here is an easy way in VB6 using ADO to remove duplicate row…
When trying to find the cause of a problem in VBA or VB6 it's often valuable to know what procedures were executed prior to the error. You can use the Call Stack for that but it is often inadequate because it may show procedures you aren't intereste…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…

739 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question