Modules & VBA :: File Date Modified Property In Textbox
Jun 19, 2015
I have a split database with a frontend that I semi-regularly update (when one of my users finds a bug I never would have thought for looking for). On my menu screen i have a text box that says: "Last Updated: ##/##/####".
At the moment I manually update the date every time I update the frontend.
Is there a way I can use the DateModifed property of the .mdb file for the frontend as the date in my textbox using VBA?
In a form (bounded to this table) I have, of course, 2 controls bounded to this fields:
txtD1 and txtD2
If the user change the value in txtD1 (using the Date picker) I like to change the DefaultValue for txtD1 to the new date and the DefaultValue for txtD2 to the new date + 1 day. Something like this:
Code: Private Sub txtD1_AfterUpdate() Me.txtD1.DefaultValue = Me.txtD1 Me.txtD2.DefaultValue = Me.txtD1 + 1 day End Sub
I tried whatever crossed my mind... with the same "result" : #Name?
My Regional settings:
Short date format: dd.MM.yyyy Date separator: Dot Simple: 05.12.2013
I have an existing Access Database which has a lot data, new records get added every day and a few are modified as well.
I need to write a script/query/exe which will get modified records(since last execution of same script etc.) from Access and export them to a CSV file.
My problem is getting those modified records.. Is there any default timestamp field in Access which can be used? Or do I have to add a new timestamp column for every table?
I have a main form with about six text boxs, these are too small to display the complete data so I created a form with a larger text box. When I dbbl-click in any of the various text boxs on the main form it would open the new popup form displaying the data. I need to be able to access the control source property of the popup form's textbox to change the control source to match the selected text box on the main form. This would allow me to use only one popup form instead of six.
The code I use to access the actual popup form itself is:
Forms![Notes].Form.Caption = " Notes "
Now I need to know what the code is to access the forms textbox control source data.
I am attempting to manipulate the Format Property of a Textbox. As an example, entering in &" lbs" causes your text to end with " lbs".... only I am trying to add a " mark, for example saying something is 6" away...
I have a form with 4 subforms on it and I am trying to find a way to capture the last modified date for the record regardless of what form or subform they touched
Is this possible?
Right now I have a macro on before update of Now() on the form and all of the subforms but that is only showing when that form was last modified which is not exactly what I am trying to achieve.
I have a subform that is filtered by a textbox on the main form. Is there any way I can add a timestamp to a record on the subform when a user changes anything on that record?
I've tried the Macro that is listed on Microsoft's website regarding timestamps, but I had serious issues implementing that to a subform.
How do I set up a field so that when the record has been modified, the field is automatically filled in (or replaced) with a date? In other words if I open up my member's detail form, and go to Sally Smith and edit her information on 11 July 15, that date is saved into a field called last modified and then updated every time I go into her file and edit & save it.
I have a textbox in a form. What I want it to do is to display the following weeks Monday date. Sounds simple but requires you to know the Monday dates in advance ...
When a form in my database is loaded I want access to check if a textbox on the form is showing today's date and if not send me an email. I'm quite new to VBA so not 100% sure what to do but I've had a few attempts and none seem to work. I have managed what is probably the hard part and can get it to email me but can't seem to get the 'If the textbox is not today's date then' bit right.
The textbox is linked to a table and the data type is 'Date/Time', it does show the time and the date so don't know if this makes a difference? The text box is [DateUpdated] and the form is [Site].
I am trying to clear a textbox after the user enters an invalid date and I do not know why the following code is not working:
Private Sub txtStart_AfterUpdate() If Not IsNull(Me.txtStart) Then If Not IsDate(Me.txtStart) Then MsgBox "You have not entered a valid date" Me.txtStart = Null Me.txtStart.SetFocus End If End If End Sub
I have a table in my Access 2010 Database with few date/time fields. I have set different formats like Short Time, Medium Time etc. But when I link this table to Sharepoint list, all the date/time fields have been modified to their default format (General Date).
Is there a way we can keep the formats as such even after linked to Sharepoint list? If not, is there a workaround?
I am using a macro to export a table to an excel spreadsheet. It seems like I have to write the absolute path in the macro's file name property, otherwise it doesn't work. The problem with that is that I have to change the path name whenever I move the folder to another location.
So I currently have a module which automatically backs up my database to a separate file everyday on open of my database.
If is it possible to create a function which will allow me to delete these backups after a certain amount of days (eg 30 days). They all have different file names based on the time that the backup was created but have the same extension of "*.accdb". I ask because it stores EVERY backup so the storage space required will soon build up unless manually deleting the files which is not what my client will want,
I have tried using the "Kill(pathname)" function but have had no luck yet!
If possible, I would like this to be done automatically either on open or on close of my database.
What I would like to achieve via code on a button. From the table orders
Code: orderDate orderID ref name amt vat 02/02/2014 56789 01 magdi 600 100 22/06/2014 12122 01 magdi 654 100 22/06/2014 65897 02 simon 250 159 22/06/2014 12345 02 simon 156 140 23/07/2014 56781 01 magdi 400 250 01/08/2014 12457 01 magdi 250 900 01/09/2014 56787 02 simon 126 500 02/09/2014 56781 04 peter 400 250 02/09/2014 12345 02 simon 450 122 02/09/2014 65897 04 peter 250 231 02/09/2014 12122 05 hargr 654 100 02/09/2014 79457 05 hargr 254 200
I need to create csv files from the above based on unique date and ref and with filename showing date and ref. So from the above we should get 9 csv files in this format
I have an Access application for which I would like to provide potential customers with a fully functional application but with a limit to the number of records that can be stored in the main file.
I would like to have a message displayed to say "The maximum number of records have been reached for this application."
Could you help with the VB code required to do this? The module will become active at the "On Open" property when the main Form is opened.
I have a date textbox (Week_Ending) and number textbox (Staff_ID) in a form (frmHourEnter), when both have values I open another form (frmStaffReport) with textboxes (txtDateStart and cmbStaff).
How do I open the second form with the values of the first form pre-entered?
I have a database for billing. In my database, I have a form that consists of a main form "Order" and 2 subforms "OrderDetails" and "Customer" OrderDetails are to enter the products to be connected to the Order. All function super, but I want to have some information from one of the forms "copied" over to on of the others.
Here is what I would like
In the subform "OrderDetails" I have made a textbox that summarize all prices to a total, his tekstbox i called "Tekst31". I would like the amount in this textbox to appear in a field "Bel�b" in the main form "Order".
I have tried some different commands, but nothing has worked, also I have made a query which dose the same ting as the tekstboks, as the information in that tekstbox it not stored anywhere.
I want to save NOW() (i.e. Date and time) into an event log file. But I just cannot work out the syntax. My insert statement works fine without the date field in, but fails on a syntax error (3134) when I include it.
I have a form which i use for a user to select an excel file they want to import and then click a cmd button to import the file into a table which works fine, however i want to append a date into a date field from an unbound txtbx before the file is imported so it will look something like;
I am trying to open a form in design mode and add controls, this i have done. I am doing this all in a class, and am having trouble saving the modified form.
I have tried using the following, both produce errors