Run Time Error 3078

By abdirisaq8 ·
I am trying to open table from Access Database but i am getting Run Time Error 3078.
If i give you more information Database works fine with old PC win2000 office the hard disk was dying so i have decided to give my dut manager new PC winXP office 2003 i copied all the files to the new hard disk all of them works except this one.

can sme help please


This conversation is currently closed to new comments.

3 total posts (Page 1 of 1)  
| Thread display: Collapse - | Expand +

All Answers

Collapse -

Different database engines?

by seanferd In reply to Run Time Error 3078

Is code in the database updated to reference the 2003 version of Jet or whatever engine is used? I don't write VB but you can probably edit the db code and change some settings.

edit: Or just convert the entire database

Tools > Database Utilities > Convert Database > To Access 2002-2003 format

Collapse -

Do You Have Problems with 3078?

Problem: Error 3078 is caused by missing system files or broken system registry structures. This is a critical sign of an unstable system that is typically caused by improper maintenance of the computer.

More Regcure Features:

* Repair Error Code 3078 Errors.
* Repair JavaScript / Scripting Errors.
* Repair Internet Explorer / Active X Errors.
* Repair C++/EXE/DLL/OCX/INF/VXD Errors.
* Repair System Registry Structures.
* Optimize PC's Performance up to 300% Faster.
* Prevents Freezing & Crashing - Completely!
* Speed Up Windows Boot & Application Speed.
* Advanced Back-Up & Windows Config Settings.
* Fix Virtually ALL Windows Problems - Instantly!

Download the fix here:

Please post back if you have any more problems or questions.
If this info is useful, please give a thumbs up. Thanks

Collapse -

Or you can try this method...

This modified code in the "dao" VB Discussion Group...courtesy of Doug
Running the code receives...

.....Runtime error 3078???Cannot find the Table ----> But, It does exist.....

Private Sub Command1_Click()
Dim Z As DAO.Database, RS As DAO.Recordset, Q$
Set Z = OpenDatabase("\\T01ABC01\\Main Database\XYZ.mdb")
Q = "SELECT Date, Shift FROM MarvinMan ORDER BY Date"
Set RS = Z.OpenRecordset(Q)
With RS
Do Until .EOF
MsgBox !Date
RS.Close: Set RS = Nothing: Z.Close: Set Z = Nothing
End With
End Sub

Please post back if you have any more problems or questions.
If this info is useful, please give a thumbs up. Thanks

Back to Software Forum
3 total posts (Page 1 of 1)  

Related Discussions

Related Forums