Jet error, Run-time error 3447

I can run this thing fine on my system, a co worker get invalid login and password despite being no such thing in it and another gets the error in the subject line and saying this:

The Jet VBA file failed to initialize when called.  

What is going on?
Who is Participating?

Improve company productivity with a Business Account.Sign Up

PRB: Error "The Jet VBA File...Failed to Initialize When Called"

I found this snipit of info on my MSDN CD--hope it helps!

Applications like Visual Basic 6.0 and Visual C++ 6.0 install new versions of the DAO and Jet files on your development computer. Any version of VBAJet32.dll or later is now dependent on the file Expsrv.dll. The error occurs with your original setup program because it does not include Expsrv.dll in the dependency information.

To resolve the error, do one of the following:

Manually add Expsrv.dll to your file list for your existing setup program.

Re-create a new setup program from scratch that includes this new dependency.

Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

thats exactly what the link says that i pointed to
treyjeffAuthor Commented:
I tried that and get an error on install when it gets to that file.  The destination system doesnt have any development tools.  I'm using VB5 Pro but I do have Visual Interdev 6 on my system.  Now when I try to run it on his system it says the db is in use by someone else when it isn't.
treyjeffAuthor Commented:
I have no idea whats going on!  I have tried a few things and just nothing!!
treyjeffAuthor Commented:
Ok, the absolutely diverse site gave a solution which at least made the error go away :)

Unfortunately there is now run time error 3051!!

It says" It is already opened exclusively by another user, or you need permission to view it's data.

What does this one mean?  I can still view it fine!
how are you connecting to and opening the database?  can you post some code?
treyjeffAuthor Commented:
Here is what goes when we press button called Build Database - I can run it no problem but this other person can't!!!!:    

Dim DB As Database
    'The database is built using extracts from Control:Manufacturing
    'Delete the current database.
    Set DB = OpenDatabase("s:\pathapps\cmcost\cmcost.mdb")
'    Set DB = OpenDatabase("z:\testsrce\cmcost\cmcost.mdb")
    DB.Execute ("delete * from Detail")
    DB.Execute ("delete * from Master")
    Call ReadMaster(DB)
    Call ReadLabour(DB)
    Call ReadMaterial(DB)
    Call ReadStandard(DB)
try this:

Set DB = OpenDatabase("s:\pathapps\cmcost\cmcost.mdb",True)

this will open it in exclusive mode..the default is shared mode...i think thats why you may be getting that error

also ensure when you close the program to close out all the database objects you create and set them to nothing, e.g.

Set DB = Nothing

treyjeffAuthor Commented:
The absolutelydiverse site gave me the answer.  Still having problems but different ones now.
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.