Automation Error Library Not Registered Access 2007
Contents |
be down. Please try the request again. Your cache administrator is webmaster. Generated Sat, 01 Oct 2016 19:33:10 GMT by s_hv987 (squid/3.5.20)
Need help? Post your question and get tips & solutions from a community of 418,436 IT Pros & Developers. It's quick & easy. Automation Error -- Library not registered. P: 16 FelixS runtime error automation error library not registered I have running one application (.mde file) of MS access 2003, quite a long automation error library not registered windows 7 time on Windows XP, - it was working well. Recently on my PC was installed SAS, after that while running my microsoft access automation error library not registered .mde application I am getting message "Automation Error -- Library not registered". I have found in WEB one recommendation - register module msadox.dll. Regsvr32.exe "C:\Program Files\Common Files\System\ado\msadox.dll" Doesn't help. The same module is working well on http://answers.microsoft.com/en-us/msoffice/forum/msoffice_excel-msoffice_custom/8002801d-automation-error-library-not-registered/5717123b-4c0b-4a3d-8bb5-7d0fe84e6ac9 my laptop, not affected by installation any new software. Any suggestions? Feb 9 '09 #1 Post Reply Share this Question 16 Replies Expert 100+ P: 1,923 puppydogbuddy You need to check for missing references in your Access vb library. To do this place any of your forms in design view and go to the code editor. Once you are in the Code view, go to the Access command menu, and select Tools> https://bytes.com/topic/access/answers/863061-automation-error-library-not-registered References, checking for any missing references. Feb 9 '09 #2 reply P: 16 FelixS Well, How I know which library is not connected (referenced). Usually there are only 5-6 out of many available.In fact, I have found already that error occurs while creating new folder by Set fs = CreateObject("Scripting.FileSystemObject") ... fs.CreateFolder (path) ... Feb 9 '09 #3 reply Expert 100+ P: 1,923 puppydogbuddy when you open up the references library it will tell you which one (if any) are missing. You will see the words Missing beside the missing library reference. Feb 9 '09 #4 reply P: 16 FelixS In my version of MS Visual Basic, when I go to Tools->References I see the Box with names of libraries and box for ticking before each name. No "MISSING" words. In the list of available references now there are 5 ticked ones, The others are empty. First of all, I think, this was also before it happens. Besides, I have no idea, what another library I need Feb 9 '09 #5 reply Expert 100+ P: 1,923 puppydogbuddy I just realized that you are looking at your mde file which has the code stripped out. You need to use your mdb file to determine which file is missing. In order to make a de
here for a quick overview of the site Help Center Detailed answers to any questions you might have Meta Discuss the workings and policies of this site About Us Learn more about Stack Overflow the http://stackoverflow.com/questions/25029484/vb6-program-fails-opening-excel-2007-with-automation-error-library-not-registere company Business Learn more about hiring developers or posting ads with us Stack Overflow Questions Jobs Documentation Tags Users Badges Ask Question x Dismiss Join the Stack Overflow Community Stack Overflow is a community of 4.7 million programmers, just like you, helping each other. Join them; it only takes a minute: Sign up VB6 program fails opening Excel 2007 with Automation Error Library not registered up vote 1 down vote favorite I created this automation error VB6 program on my Windows 7 32bit machine with Office 2010 32bit, which runs fine. Tested it on a Windows 8 64 bit machine with Office 2013 32bit, it works. On one machine with, Windows 7 64 bit and Office 2007(32 bit only) it throws an error during the following piece of code. The actual error message: Run-time Error –2147319779 (8002801d) Automation error, Library not registered VB6 Code: If (excel_app Is Nothing) Then automation error library Set excel_app = CreateObject("Excel.Application") Else Set excel_app = GetObject(, "Excel.Application") End If excel_app.Visible = True excel_version = excel_app.Application.Version Set wBook = excel_app.Workbooks.Open(directory_path & "\templates\book1.xlsm") So it is throwing the error when I open book1. It actual does open it and it has a macro run on Workbook_Open(), this runs right through seemly fine. After it finishes and processing of the program returns to the VB6 program it throws the error. Here are the project references: Has anyone come across this and what would be the fix? [EDIT] I am obviously doing something wrong here my error handler is throwing an error. I did try one other thing and that was removed "Set wBook = " and it didn't throw an error. I have placed "Set wBook = " back since then, as I do need it further on in my code. Dim wBook As Workbook Dim excel_app As Object On Error GoTo trialhandler If (excel_app Is Nothing) Then Set excel_app = CreateObject("Excel.Application") Else Set excel_app = GetObject(, "Excel.Application") End If excel_app.Visible = True excel_version = excel_app.Application.Version Set wBook = excel_app.Workbooks.Open(directory_path & "\templates\book1.xlsm") MsgBox ("Exiting") Exit Sub trialhandler: Dim source_string As String source_string = excel_app.Source 'Error here MsgBox ("My Error 1:" & source_string) excel_app.Err MsgBox ("My Error 2:" & excel_app.Err.Number & " " & excel_app.Err.Description) Exit Sub I had Off