In the form view of the db I have a bound box for an embedded ole object
I use it to embed Word documents for each db entry (The database is for works of art and the Word document is the description of each work of art which often contains Chinese Characters, hence the Word Document)
The box is set to show an icon (The Word Icon)
Upon entering the data and moving off the record, subsequent return to to the record sometimes shows that the icon is gone from the box, it is blank.
Clicking the blank box brings up the Word Document but then closing the Word Document and re-clicking the blank box dos not bring up the Word Document.
The standard message saying that the ole object is empty appears and all the data from the Word Document is lost.
this has only happened since moving to Office 2007. I upgraded the db to 2007 format and we are using Word 2007.
A Google of the symptoms doesn't bring any meaningful results, does anyone have any ideas?
I tried to keep this as short as possible (which wasn't easy) if you need more info just ask
I created a database which was working well. I then added my data and it still seemed to be working well. Since then I have made quite a few other changes, but only to queries realting to the subform.
When I cycle through my main records the subform shows and displays all the info. But when I get to the end to add a new record, the subform disappears.
I've created a form and when i create a user it goes through without a problem. However when i try to create another user, my code somehow deletes the last record. Where am i going wrong?
Code:Option Compare DatabaseOption ExplicitPublic s As StringPublic Check1 As StringPrivate Sub cmboSC_ID_AfterUpdate()Me.txtSC_ID = cmboSC_ID.Column(0)Me.txtSC_NAME = cmboSC_ID.Column(1)Me.txtSC_PASSWORD = cmboSC_ID.Column(2)Me.txtSC_LEVEL = cmboSC_ID.Column(3)Me.txtSC_PROGRAM = cmboSC_ID.Column(4)If Check1 = "DEL" ThenElseCheck1 = "MOD"End IfMe.txtSC_ID.Visible = TrueMe.txtSC_ID.SetFocusMe.cmboSC_ID.Visible = FalseMe.cmboSC_ID = "" Me.cmdUpdateADO.Enabled = TrueEnd SubPrivate Sub cmboSC_ID_GotFocus()cmboSC_ID.RequerycmboSC_ID.DropdownEnd Sub Private Sub cmdClear_Click()Check1 = ""Me.txtSC_ID = ""Me.txtSC_NAME = ""Me.txtSC_PASSWORD = ""Me.txtSC_LEVEL = ""Me.txtSC_PROGRAM = ""Me.txtSC_ID.Visible = TrueMe.txtSC_ID.SetFocusMe.cmboSC_ID.Visible = FalseMe.cmdDel.Enabled = TrueMe.cmdUpdateADO.Enabled = FalseEnd SubPrivate Sub cmdClose_Click()DoCmd.CloseEnd SubPrivate Sub cmdUpdateADO_Click()On Error GoTo ADOErrhandlerDim ADOrs As ADODB.RecordsetDim sSQL As String 'sSQL = "Select * from tblSecurity;" 'Set rsADO = New ADODB.Recordset'rsADO.Open sSQL, CurrentProject.Connection, adOpenKeyset, adLockBatchOptimisticIf Check1 = "ADD" ThensSQL = "tblSecurity"Set ADOrs = New ADODB.RecordsetADOrs.Open sSQL, CurrentProject.Connection, adOpenDynamic, adLockOptimisticWith ADOrs .Fields("SC_ID") = Me.txtSC_ID.Fields("SC_Name") = Me.txtSC_NAME.Fields("SC_Password") = Me.txtSC_PASSWORD.Fields("SC_Level") = Me.txtSC_LEVEL.Fields("SC_Program") = Me.txtSC_PROGRAM.UpdateEnd WithSet ADOrs = NothingMsgBox Me.txtSC_NAME & " Added" ElseIf Check1 = "MOD" ThensSQL = "Select * from tblSecurity where tblSecurity.SC_ID = '" & txtSC_ID & "';"Set ADOrs = New ADODB.RecordsetADOrs.Open sSQL, CurrentProject.Connection, adOpenDynamic, adLockOptimisticWith ADOrs .Fields("SC_ID") = Me.txtSC_ID.Fields("SC_Name") = Me.txtSC_NAME.Fields("SC_Password") = Me.txtSC_PASSWORD.Fields("SC_Level") = Me.txtSC_LEVEL.Fields("SC_Program") = Me.txtSC_PROGRAM.UpdateEnd WithSet ADOrs = NothingMsgBox Me.txtSC_NAME & " Edited" ElseIf Check1 = "DEL" Then sSQL = "Select * from tblSecurity where tblSecurity.SC_ID = '" & txtSC_ID & "';"Set ADOrs = New ADODB.RecordsetADOrs.Open sSQL, CurrentProject.Connection, adOpenKeyset, adLockOptimistic ADOrs.DeleteSet ADOrs = NothingMsgBox Me.txtSC_NAME & " Deleted"ElseMsgBox "An Error Occurred. The system doesn't know which action to take"End IfSet ADOrs = NothingCall cmdClear_ClickExit SubADOErrhandler:Select Case Err.Number Case ElseMsgBox Err.Number & vbCrLf & Err.DescriptionEnd Select End SubPrivate Sub txtSC_ID_AfterUpdate()Dim DAOdb As DatabaseDim DAOrs As DAO.RecordsetDim sSQL As StringDim s As StringSet DAOdb = CurrentDb()s = "Select * from tblSecurity where tblSecurity.SC_ID = '" & txtSC_ID & "';"Set DAOrs = DAOdb.OpenRecordset(s)If DAOrs.EOF Then'New recordCheck1 = "ADD"txtSC_ID.SetFocusElse'Exisitng RecordMe.txtSC_ID = DAOrs("SC_ID")Me.txtSC_NAME = DAOrs("Sc_Name")Me.txtSC_PASSWORD = DAOrs("SC_Password")Me.txtSC_LEVEL = DAOrs("SC_Level")Me.txtSC_PROGRAM = DAOrs("SC_Program")Check1 = "MOD"End IfDAOrs.CloseDAOdb.CloseMe.cmdUpdateADO.Enabled = TrueEnd SubPrivate Sub txtSC_ID_DblClick(Cancel As Integer)Call cmdClear_ClickMe.cmboSC_ID.Visible = TrueMe.cmboSC_ID.SetFocusMe.txtSC_ID.Visible = False End SubPrivate Sub cmdDel_Click()Call cmdClear_ClickMe.cmboSC_ID.Visible = TrueMe.cmboSC_ID.SetFocusMe.txtSC_ID.Visible = FalseCheck1 = "DEL"End Sub
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 inherited this database and I can't figure this out so I'm looking for some causes.
the database is in one .mdb file, the interface in another and links to the database via the linked table manager.
The tables aren't normalized, nor was there any attempt at relational integrity (Strike 1). Thats obvious
But what isn't so obvious is that data in fields just disappears, it'll get entered, verified and a couple weeks/months later, its just gone and no one claims responsibility for taking it out (and in 99% of cases, we wouldn't)
It is a multi user database but there are only 10 people in the office and I doubt more than 3 are ever connected at once. And most of the time is only one of us at a time based on our schedules.
Anyone have any ideas? I'm going to advise the bosses that we take the time to start over with sql server, normalize the tables and take better care of developing the forms (in .net)
I have a calculated field in a form that calculates the amount due. When I open the form or the record and the record has an amount due of 0, then the field says "$0.00" for a second and then disappears. Any idea why this is so? This becomes a problem because $0.00 doesn't appear on any reports either. Any help would be appreciated!
In Access 2010, I can't get a form to show up in Pop Up mode without it disappearing. Tried several solutions (most from this message board) with no luck, including:
Set Modal = no Set Auto Resize = no Set Auto Center = no Set Border Style = dialog
There isn't any VBA set to run when the form opens, only on button clicks.I'm able to call out the form to open as acDialog in vba, but this blocks additional code I need to prepopulate the form.So far this happens on all forms I try to set as Pop Up.
I am currently building a database for the company I work for that is fairly similar to the Northwind Database; however it is made from scratch so hopefully some of the common problems with that database won't find their way into mine.My problem is that when I go to my Orders form, I pick a customer from the main form, which creates a record on the Orders table. When I then go to the subform to choose a product/line item, I get the error in my title ("The LinkMasterFields property setting has produced this error: 'The object doesn't contain the Automation object 'OrdersT.") as soon as a product is chosen from the drop down list.
Hello, MS Access 2000 sp3 When adding a new record to an order file, I have a default value on the ordnum field. It also has a format = "9999-999". The default value is "0603-". When the user clicks on the new rec nav button, the form has the correct default in the ordnum field "0603-". However, when the user trys to key in the remaining 3 digit sequence number (.i.e. result 0603-123), the default value disappears as soon as the use startes to type the first character. The table source is a query that links the order table to the customer table via cust num. When i use only the order table as the form source, this works ok, no issues but i see this issue when i am using a query joining two tables. Does anyone have any ideas why or how I can correct this? Thanks!! zip file attached with test database
I am making up how to create a database as I go along so I am sure some of the techniques I have used are a bit unconventional! However, I wanted to use data from 2 different tables as control sources, so changed the record source to a query that combined the two tables. I thought this was correct as I could then apply control sources from both tables to fields.
However, now when I click out of design view and into form view, the form/database dissapears. Does anyone know why & how I could resolve this?
Whenever I come to a record that does not have any data in my subforms, then (as you can expect) my subform controls disappear.
My subforms have "Allow Additions" set to YES.
The subform tables are linked through a LEFT JOIN.
I would like the controls to stay visible even when there are no records in the subforms.
I tried to set the subforms ID to the main forms ID thinking that this will at least generate an autonumber to make the subforms controls visible, but it did not work
I have a calculated control on a form that is summing other controls and then a subtotal on a subform. This is access 2007
The calculated control does not display the value until I enter a value other then the default in all of the source controls. If I hit the "refresh" button, the value appears in the calculated control for a moment, then disappears.
I have set the default of the source controls to be 0, so none are null.
the calc control value does not stay until I put a value in the subform and its subtotal thus has a value
I have two related issues with reports. That is the data shows in report view and then disappears. The first is the simplest. I have a report that has a query recordsource and I calculate totals and populate the report in the OnLoad event using VBA code. This displays perfectly in "report view" and prints or exports fine. My issue is that after the print or export, the report has no data in my fields in "report view". It is like it is reloading the report without invoking the OnLoad event. When I close the report and re-open in report view, everything is fine again until I print.
The second issue is related. I have another report that is a bit more complicated. Due to the number of controls (I use many text boxes to display my calculations), I am using 3 subreports to get around the limitations in the number of controls. In report view, the report looks fine, but when I scroll down to the bottom and then back up, the text boxes in the subreport sections are empty. The parts of the report not in subreports is fine. By using "Msgboxes" in events, I discovered that when I scroll down, the subreports close, then re-open when I scroll back up. Again, due to an Access limitation of 22 inches per section, the I placed the subreports in the "report Header" section. It appears that my problem occurs when I scroll down to the "detail" section of the main report.
I have a simple SQL query that is e-mailed when there are >0 records. Fairly consistently, the SQL code in the query is wiped out and the query fails. It happens consistently to this query, even though I have many similar queries. I am running Access 2013 in Windows 7
SELECT AR.[Inv#], [History Header].[PO#], AR.[Customer Name], AR.Date, AR.Mdse, AR.Freight, AR.Amount, AR.[Due Date] FROM (AR INNER JOIN [History Header] ON AR.[Inv#] = [History Header].[Inv#(number)]) LEFT JOIN [Advanced Engineering Payment Reminder Sic]
For example if I open up the Access database on my left monitor, then move it to my right - whenever I switch from design to form mode the form disappears. Moving Access back over to the left monitor will not show the form. Minimizing all windows except Access won't show it either. If I switch to layout view, then form view it will show on the monitor I have Access up on - but if I go back to Design and then form it will disappear again.
If I move Access to the left monitor (in this example). open the form in design and then form view it pops up visible. Seems clear that it ties the opening position of the popup to the monitor Access was opened on.
I have a footer in my Report that contains subtotals. I'd like to add a textbox that says "Total" to my report, and although this label shows up when I view the report, it disappears if I export to Excel. How to prevent the label from disappearing when I export? (Attached a screenshot of my report's design.)
Is there an efficient way to have default text in a textbox on my form (like a search box), but have it so that when a user focuses on the textbox (to type in a search term), the word should disappear.
Just like the search box on windows 7 start menu.
Then, is there a way to have the default text not be the actual text in the box? Otherwise, my search box will search the default text.
I'm getting an error message (informational only):
The object doesn't contain the automation object 'ClientID.'You tried to run a visual basic procedure to set a property or method for an object. However, the component doesn't make the property or method available for Automation operations.
Check the components documentation for information on the properties and methods it makes available for automation operations. This happens when I start entering data in the field "productname" of a subform.
So I'm assuming something in the form or in the code of the form is referring to ClientID. but I've checked it, and there is nothing referring to it anymore. Well, at least as far as I'm aware of.
This afternoon access crashed without any error, it just closed. Upon reopening the DB again, all my work of the past one and a half week was gone. Normally I always backup the data, but these past days I didn't due to christmas and still working a lot too. So I forgot.
I did some redesigning in the process this evening, deleting and adding some fields and code.
I can't get rid of this error. Can anyone help? Or point me in the right direction?
Also the DB is 3.5MB in size. While it is completely empty. And I can't imagine that some empty tables, queries, forms and a bit of code can be so much. But that's for a later time to worry about I guess, unless one of you says: this and that, maybe that works... Otherwise, I would really be very glad already if the error disappears....
I am needing to develop an audio catalog and would like to know if anyone has experience with embedding audio in an Access database. The ideal situation would be to have all audio contained within the database, however, some of the audio files may be quite large and I don't want to bog down the entire database by having 100MB files in there either.
So I guess my question simply is; if my audio files are 50MB or larger, embed or link?
I have an embedded excel workbook on an Access form (Access 2002)
I would like to change the zoom of the excel "view".
I've tried this:
' xlCharts is an embedded XL workbook xlCharts.Object.Parent.ActiveWindow.Zoom = 100 I get an error that says: "Unable to set the Zoom property of the Window class"
However, if I READ the zoom level, it works fine. The zoom property of the window class in excel is read/write, but this may not be the case for embedded OLE objects. Is there another way? Does anyone have any ideas?
Ok, say I have a table with the following fields, custid, mainnum, subnum whereas the data would look like this: Code:Cust Main SubA101 1 2A101 2 1A101 3 4A101 4 2A101 5 3B202 1 2B202 2 4B202 3 1C303 1 2C303 2 1
The main number always counts up from 1 on each new customer, I already have code to do this. I am running a for next loop based on the highest main number (I already have this part), for instance, for Cust A101, the for next loop would essentially be: for x = 1 to 5.... like I said, I have this part.
What I want to do when x is counting, to pull up the mainnum value that equals the value in the for/next (in other words equals X), and run a for next loop based on the sub number based for that record. For example using C303's data: Code:For X = 1 to MaxOfMainNum '<---I already have this 'code to pull up subnum where mainnum=X For Y=1 to SubNum_For_Selected_Mainnum 'I will be doing an insert to table here custid,x,y Next YNext X The parts in Bold in the above code is what I'm needing an answer to.
I tried to be as concise as possible, but I know it might be confusing.
I have a form with a calculated time difference between a "Start" and "Stop" time I have managed to get the correct formula however I would like to display this value in a more civilized forma as HH:MM on the example attached I have some values that appear as 4:8 and it should be 04:08.
The second problem is I need to embed this calculated value on my tblTime as doing so I can run more easily some queries.
pretty Excel sheet full of conditional formatting that is used as a vehicle assignment board where I work. I know I can embed the file into an Access form using an unbound object, and therefore "integrate" it into Access, however this creates a copy of the file, and therefore when people change the sheet, the original Excel file is not updated. Is there any way to embed the excel file in such a way that the Excel document itself is also updated? Basically some sort of an active, two-way link rather than what amounts to just importing a copy of it? I need to be able to pull data from various cells in that Excel file so it needs to be kept up-to-date.
I would like to know if it is possible in Access 2007 to add a button/hyperlink where by the order number (as in the example below) is being sourced from another field [ORDNR]
i.e. replacing the 0996653 for example with a lookup to the ordernumber held in another column?!
[URL] .....
this link is one from a web url - I want to copy this in my DB.
