ERROR 713

[tpbjr]

Hi Everyone,

I get the following error when my InitializeDatabase subroutine executes. Error 713 (Class not registered. Looking for object with CLSID:{00000010-0000-0010-8000-00AA006D2EA4})

The code in this subroutine is:
On Error GoTo InitializeDatabase_error

Set gDB = OpenDatabase(gAppPath & "Movies.MDB")
Data1.DatabaseName = gAppPath & "Movies.MDB"
Data1.RecordSource = "Actors"
Data1.Refresh
Set gMainTable = gDB.OpenRecordset("Main")
gMainTable.Index = "Title"
FrmMain!mnuViewTitle.Checked = True
FrmMain!lblMsgBar2.Caption = "View by Title"
gMainTable.MoveLast
gMainTable.MoveFirst

Exit Sub

InitializeDatabase_error:
If Err = 3021 Then Resume Next 'No Current Record - Databas could be empty
MsgBox "Error " & Err.Number & " (" & Err.Description & ") in procedure InitializeDatabas of Form 'FrmMain'", vbCritical


Any thoughts? I have had the user install the Jet4.0 service pack and the MDAC_Type service pack but it still reports the same message. I am starting to think that it is a VB dependency file but I do not have a fresh computer to test on and I am communicating with this user over emails so I can only go by what he is telling me.

I appreciate any support you can give me.


Thank you for all your help

http://www.besware.com

Tom

 

[jebenson]

Try registering MSBIND.DLL on the user's computer.

At a command prompt:

regsvr32 "Path\to\dll\msbind.dll"

Of course, substitute the actual path to the .dll (e.g., C:\Windows\System32) in place of "Path\to\dll" in the example above.


I used to rock and roll every night and party every day. Then it was every other day. Now I'm lucky if I can find 30 minutes a week in which to get funky. - Homer Simpson

 

[johnwm]

I believe that CLSID:{00000010-0000-0010-8000-00AA006D2EA4} refers to DAO ver 3.5

________________________________________________________________
If you want to get the best response to a question, please check out FAQ222-2244 first.
'If we're supposed to work in Hex, why have we only got A fingers?'
Drive a Steam Roller