Hi, i am using the following code to open another access database. it works fine in fuilltime but when i install a runtime version I get an 'active x cant creat object' error. Does anyone knwo why this is?
Dim appAccess As Object
Const strPathToBackup = "C:interim.mdb"
Set appAccess = CreateObject("Access.Application")
appAccess.OpenCurrentDatabase strPathToBackup
appAccess.Visible = True 'do not show database
appAccess.Run "Test"
appAccess.CloseCurrentDatabase
I'm using the below code in msaccess which used to work perfectly on the Win XP platform. I upgraded my OS to Win 7. It's now giving an error as "Runtime Error 429 - ActiveX Component Can't Create Object". I unchecked & rechecked all the library references.
Function GetNetWorkDays(startDate As Date, endDate As Date) As Integer Dim objFunction As MSOWCFLib.OCATP Set objFunction = New MSOWCFLib.OCATP GetNetWorkDays = objFunction.NETWORKDAYS(startDate, endDate) Set objFunction = Nothing End Function
Old OS: Win XP New: Win 7 Old msaccess: 2003 New: 2010 Old office: 2003 New: 2010
I has install office XP but when I creat form I has problem: Active X component can't creat object I don't know to correct problem please suggest to me
When I attempt to create a new DB - by performing Blank Database I immediately get a message 'Object Library not registered'.
If I 'OK' that box and try to create a table, I can do so - create Table in design view.
When I then try to Import external data - an excel file I get the message 'ActiveX component Can't create object'.
I have looked ob various sites for help and forum information regarding these errors but have found nothing conclusive, with specidfic regard to Access 2003.
The version has been loaded on my machine about 1 year as part pf Office Professional but this is the first time I have attempted to run Access itself.
Does any forum member have any ideas as to how this problem could be resolved.
I have an application which includes a process that creates an excel sheet with some data. For this I have set reference to the excel object library. I am now packaging a demo of the application with Office Developer and including Access runtime. The question is what to do about this reference, since when I look at the file that it uses, it shows Excel.exe. I don't suppose I can legally be sending that file along with my program. Is there a different reference that I could set that would give me what I need? I noticed this in testing because it is the only reference file that wasn't automatically included in the package.
Basically I have a form where a user has selected a couple values from a dropdown element, and entered a few other text values into the form. I am then trying to grab the values and append them to a table.
Code: Private Sub btnSubmitInputVendorPerformanceForm_Click() 'Button Is part of frmInputVendorPerformance Dim ValueCheck As Integer 'Increments to make sure no errors in entry Dim ErrorShow As String Dim YesorNoAnswerToMessageBox As String Dim QuestionToMessageBox As String Dim DeliveryRate As String
I'm having trouble with my database (Access 2000). I'm trying to export a file into a text file by clicking on a button. Below is the code. Where the code is in bold that is when the runtime error happens.
If i export the code manually by right click on the query > Export then this works, but for some reason by clicking on the button will not work.
Private Sub cmdExport_Click() Dim sExportFilePath As String sExportFilePath = DLookup("[DateExportLocation]", "tblSettings", "[ID]=1") ' Path if file to be exported DoCmd.OpenQuery "qryUpDateTransmissionDateAndTime", acViewNormal, acEdit ' Update dates time DoCmd.TransferText acExportDelim, "ExportFile", "qryExportFile", sExportFilePath End Sub
I create a front end and back end that resides on the lan. Front has everything besides the table which resides on the back end. Front ends table are linked to the backend. I have two computer that i am testing it on. Both of them runs Access 2003 runtime and windows has been update to the latest version, both xp machine aswell.Both has user right to read and write to that directory on the lan. Ldr exist when either of them uses access file. The strange thing is when i run a command to copy some data from one table to another one. one of the machine give me the following error "3027 Cannot Update. database or object is read only". While on the other machine it runs flawless. Another weird thing is if i modified some values in table by using forms it works great on both so i am a bit clueless where the problems is. its seems my problem is copying from one table to another. i dont have problem modyfing one table. Here is the code i use to that halt my ms access database.
Dim dbs As Database, rsProposal As Recordset, TES As String, stdocname As String, stLinkCriteria As String
TES = Me![TESID]
If TES = DLookup("TESID", "Proposals", "TESID =" & "'" & TES & "'") Then MsgBox "Proposal Already Exists for TES ID: " & vbCrLf & _ " " & TES, vbOKOnly, "Proposal Already Exists" GoTo Image264_Click_Exit Else If MsgBox("Do You Really Want to Create" & vbCrLf & "a New Proposal for TES ID " & vbCrLf & " " & TES & " ?", 289, "Create New Proposal?") = vbOK Then Set dbs = CurrentDb Set rsProposal = dbs.OpenRecordset("Proposals") With rsProposal .AddNew ![Long_Desc] = Me![Description] ![Short_Desc] = Me![Opportunity] ![Dest_Site] = Me![Install Site] ![TESID] = Me![TESID] ![End_User] = Me![Contractor/Purchaser Name] ![Date_Due] = Me![Proposal Due Date] ![Date_Completed] = Me![Close Date] ![Status] = Me![Status] .Update .Close Set rsProposal = Nothing dbs.Close Set dbs = Nothing End With stLinkCriteria = "[TESID] = " & "'" & TES & "'" stdocname = "Form Prop - Detail" DoCmd.OpenForm stdocname, , , stLinkCriteria DoCmd.Close acForm, "Form TES - Detail" End If End If
Why does the following code generate an error. All i want to do is open a recordset which I thought would be straightforward. (novice Programmer, new to access vba). The set statement in the ComboProduct event generates the error.
Option Compare Database Dim Company As String Private dbaProposal As DAO.Database Dim EffectiveDate As Date Dim Product As String Private rstProposal As DAO.Recordset
Private Sub ComboProduct_AfterUpdate() Product = ComboProduct.Value Set rstProposal = dbsProposal.OpenRecordset("SELECT * FROM Proposals WHERE Proposals.[Group Name]='" & Company & "' AND Proposals.[Effective Date]=#" & EffectiveDate & "# AND Proposals.Product='" & Product & "'") End Sub
Private Sub Form_Load() Set dbsProposal = DBEngine.OpenDatabase("Database1.accdb") End Sub
I get this error everytime i try to use any wizard in access, i have uninstalled and reinstalled acces, i looked at the MSDN and i cannot find anything that will fix my problem. I have windows XP and office 2002 if that could help with the solution.
i got this error message when i tried to create a command button... i have to do it without the wizard... then when i tried to get one of those convenient access pics applied to the button i get an error pop up Object variable or With block variable not set
...the errors only just started today... well i played hooky on friday cause of a snow storm so i guess it might be a recent microsoft insecurity update...
running XP pro 2002 SP2 with Access 2003 SP2
:( ...maybe this is the latest microsoft challenge... :mad: ...uninstalling and reinstalling access or all of ms office does not remedy the situation... i searched the forums and cant find a solution :eek: ...
Okay, so I have tried to fix this for three days. When I try to create a button, combo or list box I get the message:
ActiveX Controls Can't Create Object. I have been through Internet Options/Security. I have tried reinstalling, I have tried to look into the registry. I even check Microsoft HELP and Mircosoft website and am getting nowhere. Can anyone please, please help solve this problem because it completely baffles me on how to fix this!!!
I'm not sure if this is a Query problem or a Report problem, so I'm putting it in the General catagory. If I need to post it in one of the others, please point me the right direction.
I have set up the following:
Query A - Combines data from several tables Query B - Prompts for a text string and places it in a table Query C - Uses the text entered in Query B to select records from Query A. The field that is searched is a text field. Report A – Has an Open procedure that executes a macro that runs Query A. I also have a Close procedure that executes a macro that runs a second report based on Query A against a different table.
When I run the report on my desktop it works properly. I had a user try to run the report and she gets the following error immediately, prior to being prompted for the text.
Error:429;ActiveX component can't create object
I am running Office XP and she is running 2003 with SP2. She has not had problems with other Access reports in the same DB. Any ideas what is missing?
I am trying to connect to MS Access from MS word using the following code but getting the above error message:
Code: Sub GetDataFromDataBase() 'allocate memory for the database object as a whole and for the active record Dim myDataBase As Database Dim myActiveRecord As Recordset
I am using the following code but when i run it produces the following error.
Run-time error '429':
ActiveX component can't create object.
then on debug it highlights the line
Set objOutlook = CreateObject("Outlook.Application")
I have searched online and already tried a suggestion to ensure that mictosoft outlook 14.0 object library is selected in the VBA references.
Code:
Dim objOutlook As Object Dim objMailItem As Object Const olMailItem As Integer = 0 Set objOutlook = CreateObject("Outlook.Application") Set objMailItem = objOutlook.CreateItem(olMailItem)
I am using access 2000. I have created a database that is working well but have created a form in which I want to place photos. I have created a bound object frame which is linked to field in table. Problem When I go to insert picture in object frame it is placed there as a "Package". It will not place the actual picture as is. How do I get rid of this Package?
Hi , I am working on a project and am a beginner in this field. My difficulty is that i need to print the details on a form (which has a subform ) into the invoice.xls in Excel2000 . I have managed to get all the required data including the first record in my subform in excel , but i donot know how to print/get the next record . I have tried using recordset,cmd.Gotorecord, query and Macros to do so. Pls Help.
...not too much in the archives on this one, so any help appreciated...
We have an Access97 MDE with a split backend that is shared over a network.
Most of our users have WinNT installed and the Access application works fine. We have a user who has Win2K and Office2k and every time this person tried to launch the Access97 app, he receives the following error:
The database that you are trying to open or convert is currently in use, or you do not have permission to open it exclusively.
I have checked the Security Permissions for that user and he actually has full rights (Admin) for the Network folder.
Hi! We have a problem with analyse reports generated automatically since we are using Access2000. Attached to this mail you may find a screenshot of the desired report. When we try printing query analyses with the sql syntax exactly that happens (see attachment). Thanx for your help,... Stefan
My organization recently upgraded from Office97 to Office2000. A database that we had on 97 is giving us errors when we try to run it under 2000. I have been able to fix some of the errors. This one has me stumped.
I'm getting an error 13; type mismatch and it is calling out this line:
Set Mydb = DBEngine.Workspaces(0).Databases(0)
Any help is greatly appreciated. This is the complete function:
Function RegistrationData(Reqinfo As String) As String On Error GoTo error_registrationdata:
Dim Mydb As DAO.Database Dim MyRS As DAO.Recordset
Set Mydb = DBEngine.Workspaces(0).Databases(0) Set MyRS = Mydb.OpenRecordset("REGISTRATION")
Select Case Reqinfo
Case "CommandName" RegistrationData = MyRS.COMMAND
Case "CommandCode" RegistrationData = MyRS.COM_CODE
Case "CommandAddress" RegistrationData = MyRS.COM_ADDRESS
Case "CommandManager" RegistrationData = MyRS.COM_MANAGER
Case "CommandPOC" RegistrationData = MyRS.COM_POC
Case "CommandPhone" RegistrationData = MyRS.COM_PHONE
Case "CommandFax" RegistrationData = MyRS.COM_FAX
Case "ClinicName" RegistrationData = MyRS.CLINIC
Case "ClinicCode" RegistrationData = MyRS.CLI_CODE
Case "ClinicAddress" RegistrationData = MyRS.CLI_ADDRESS
Case "ClinicManager" RegistrationData = MyRS.CLI_MANAGER
Case "ClinicPOC" RegistrationData = MyRS.CLI_POC
Case "ClinicPhone" RegistrationData = MyRS.CLI_PHONE
Case "ClinicFax" RegistrationData = MyRS.CLI_FAX
Case "MailDir" RegistrationData = MyRS.MAILDIR
Case "HROFile" If Not IsNull(MyRS.HROFile) Then RegistrationData = MyRS.HROFile Else RegistrationData = "error" End If
Case "AboutYN" RegistrationData = MyRS.ABOUTYN
Case "ActivityName" RegistrationData = MyRS.ActivityName
Case Else RegistrationData = "error"
End Select
end_registrationdata: Exit Function
error_registrationdata: MsgBox "There was an error retrieving data from the Registration Table. Please ensure all data is filled in correctly." RegistrationData = "x" Resume end_registrationdata:
The Access2000 database is on a server located on our office network. Our office has a mixture of WindowsXP and Windows2000 as the operating system. We are using Novell Netware for the office network. I am wondering if the Novell Network is "confusing" Access???The check box option to open Access2000 as a multiuser database ischecked. Also "No locks" is checked. When the database is opened weget the "LBD" file with "access.lockfile.9". When I look at this file,I see my name and the word "Admin", which seems normal. However, ifanother user attempts to open the database, they can't and they get amessage that another user is using the program.According to Micorsoft, Access must be in a shared directory. Sinceeveryone can read/write/create/delete to the directory it appears "shared".Nevertheless, is it possible that the Novell Network has a conflictwhich prevents Access from being shared? --------------------------------------------------------------------------------------I took the database home (to my home network) and had limited sharing success. First, the folder that access is in must be fully labeled as shared, read/write privileges by themselves don't seem to allow multiuser access. Second, after closing the database, I would get a "can't find" the database message from windows explorer even though the file was visible.
I am working on a report in Access2000 which is getting information from several tables via a number of queries. I am using nested IIf() functions to combine text formatted data in a calculated query field before using it in a report.
One such IIf() function is
Desc_col: IIf([HOVR - UDP].[SERVICE] Is Not Null,[DA] & " " & [SEQ] & " " & [TYPE] & [MO] & " " & [SUB] & " - " & [HOVR - UDP].[SERVICE], IIf([MinOfCCT] Is Not Null,"I/O DIST CAB " & [UDP - JC CIRCUITS-05-F].[PWR] & " - CCTS " & [MinOfCCT] & " thru " & [MaxOfCCT],IIf([DESCRIPTIO] Is Not Null,[DESCRIPTIO],"Spare")))
When I have tried to do the same thing with date fields it does not work. The function is fine as long as it is not nested.
That is
Rev_col: IIf([Rev_HOVR] Is Not Null,[Rev_HOVR],"")
and
Rev_col: IIf([Rev_Elec_equip] Is Not Null,[Rev_Elec_equip],"")
both work.
But when I combine them into a nested function
Rev_col: IIf([Rev_HOVR] Is Not Null,[Rev_HOVR],IIf([Rev_Elec_equip] Is Not Null,[Rev_Elec_equip],""))
I get an error message "! Data type mismatch in criterial expression"
There is no data mismatch in the original tables from which the information was extracted. The dates are all in DATE/TIME and set to "General"format in the tables.
I am wondering if I will have to use Visual Basic function to combine these fields. However that poses a problem. When I've looked at this I find that runtime VB is no longer available in Access and I do not want to go out and buy it on the offchance that it will work.
Can anyone tell me if there is another solution to my problem?
Is there a good replacement for the use of local forms in an Access database? We have a large A97 replicated database application that we are trying to update. We use local forms for data output. Since these are no longer available we are looking for a workaround.
