I have a field on a form that when a check box is checked then the date is populate in a AddDate field. The problem is if the user edits that field the changes do not save. Below is some of the code, how do I save the changes?
Code:
Me.AddDate = Date
If Me.Dirty Then 'Save any edits.
Me.Dirty = False
My database was working fine. Now, if I have to save or edit a record, I get a message Run time error 2107. The value you entered does not meet the validation rule defined for the field or control. I am able to enter and edit new records in the table. I did not change any validation in form. Then it goes to debug mode and highlighted this code (me.recordsource=Listsql - is highlighted)
Private Sub ListSearch_Click()
Dim dBS As Database
Dim Rst As Recordset
Dim Listsql As String
Set dBS = CurrentDb()
Listsql = "Select * from MasterData where employeeid ='" & [Forms]![MASTERFORM]![ListSearch] & "'"
[Code] ....
What I want to happen is ... in my order form
display a default record. ( a record of all products with suggested unit quantity
)
allow editing of quantity
then be able to save as a new record.
do I need a macro for this ?
any help welcome
thanks
I have a issue date and an expiry date feilds,
the below script in my query is to automatically increase the date by one year, this works fine but i would like to be able to back date the script if necassary.
i have checked the properties and the field is not locked. but it wont let me change the date.
any ideas
Expirydate: DateAdd("m",12,[Issueddate])
Hi have a table tblImportLearnerFunding with the fields [LCCode], [Date] and [Total Learner Funding]
I want to create a table to see the funding generated for each LCCode in custom date ranges:
LCCode, DateRange1, DateRange2, DateRange3
I can almost get it to work using the crosstab query wizard, but I need to specify the date ranges. Instead of Jan I want to sum the funding in the date range 01/01/2005 to the 28/01/2005 and so on.... Does anyone have any clues?
Here's the Crosstab SQL:
TRANSFORM Sum(tblImportLearnerFunding.[Total Learner Funding]) AS [SumOfTotal Learner Funding]
SELECT tblImportLearnerFunding.LCCode, Sum(tblImportLearnerFunding.[Total Learner Funding]) AS [Total Of Total Learner Funding]
FROM tblImportLearnerFunding
GROUP BY tblImportLearnerFunding.LCCode
PIVOT Format([Date],"mmm") In ("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec");
if i use Date() as default value at my field, can i save it? i mean it not change when next day come for some record. coz i want to use today's date as default date to some record. when next day come, date for that recoerd still at yesterday's date..
or there have any other way to do it?
TQ
Hi there...
I have a table which contains a field with the name "date". i have defined the property "date/time" on the data type of this field and as an input mask I have: “99/99/0000;0;_” i want the date to be saved as 02/02/2008 but every time I try to save it the zero digits are deleted and it is saved as 2/2/2008. How can I do that??
I am building a very comprehensive Membership Management Database with extremely useful facilities initiated by some 20 or 25 Queries..
The database includes 5 Tables which store data relevant to members, another which stores details of Interest Groups and a 3rd which stores which members are affiliated to which Group or Groups.
Currently the database is accessible only by a very limited number of persons and data can be entered/edited by only one person. The database, using Access 2010, is maintained on a desktop computer and synchronized to a copy on a Cloud.
My requirement is to permit some 50 Group Leaders to input/edit data on a Password protected Group Members Form such that that is the only element of the database that they can access. The Forms would have only 2 fields from which the user would select entries from drop down lists.
My query is ; is such a procedure feasible in principle and would I be correct in assuming that the user would require to have available a copy of Access.
In a database I want to know the when the last change of a record has been made. I know one way to do it, but is not realy efficient:
I made the folowing sub
Private Sub addtime()
Date_of_Record.Value = Now()
End Sub
I call this sub if one of the 200+ :eek: inputboxes change:
Private Sub inputbox_change
call addtime
End Sub
Is there a more efficient way to save the date the record is last modified???
thanks in advance
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.
strsqlac = "INSERT INTO EventLog ( EventTime, User, EventType, EventMessage, DocRef, AutoSeq, CoCode ) " & _
" Values ( '" & Now() & "', '" & GlobUser & _
"', '" & Mess2 & _
"', '" & Mess1 & _
"', '" & Docref & _
"', " & AutoSeq & _
", '" & CoCode & _
"' );"
... it's the first column, EventTime that is the issue. I have tried several different ways of wrapping it in the VALUES () without success.
My database field EventTime is defined as a General date which Access 2007 tells me will give me date and time. That's what I want.
The Value formats I have tried (currently showing as 'NOW()' above, are ...
#NOW()#
#'NOW()'=
'#NOW()#'
and (as I say) 'NOW()'
Code for saving access database with date and time stamp when close database as database on 11:11am on 11082015
how can i set it
I have been creating a db, I have split it and saved it to our company's server. We were getting ready to distribute it and start using it when I noticed something on one of the forms that i wanted to change. When I go into the fe to make the revision, it will only open as "read only". I can save a copy to my desktop and make the changes that i want, but then i cant save this copy back to the server because it wont let me over-write a file that is read only.
View 6 Replies View RelatedI have some project run on MS-Access as front-end with database linked to MS-SQL Server. I have some column of table contain Date-Time data that store data as General Date format (ie 01/01/2005 08:00:00). I create some form for my staff to key in a data of lab test that they will be key in only time with out date value. On form, I show this value as time only too. But I want to use this data with Date value for some calculate as backgroud process.
So...
In case of new data, Database will be store my data as CurrentDate with Time that my staff key in.
In case of data update, Database will be store my data as ExistDate with Time that my staff may update.
What should I do for solve my problem?
I have some project run on MS-Access as front-end with database linked to MS-SQL Server. I have some column of table contain Date-Time data that store data as General Date format (ie 01/01/2005 08:00:00). I create some form for my staff to key in a data of lab test that they will be key in only time with out date value. On form, I show this value as time only too. But I want to use this data with Date value for some calculate as backgroud process.
So...
In case of new data, Database will be store my data as CurrentDate with Time that my staff key in.
In case of data update, Database will be store my data as ExistDate with Time that my staff may update.
What should I do for solve my problem?
I'm trying to save a report to my Desktop as a pdf - adding a date {that I am retrieving from a query} as part of the pdf file name.
I get a
Run-time error '2501' - The OutputTo action was cancelled.
(See screenshot).
Here's the code I'm using. So far - all I've tried to do is run the function from the Visual Basic Editor.
Function SaveReport()
Dim strSQL As String
Dim strPath As String
Dim strFilename As String
'Get the ReportDate.
[Code] .....
I have a simple data base with 2 tables. One table is the pertinent Employee data. That includes a EmployeeID that I contrived myself with the first 4 letters of the FIRST NAME and the first 3 letters of the LAST NAME.
how to make the program do that automatically when I enter the employee's first and last name.I have a form that sits overtop this table to populate the data. It's got some test date in it now c/w hand and manually calculated EmployeeID.
So now I figured out how to make the program do that calculation automatically. So why when I cruse over the records and tab through the fields and the form shows the new EmployeeID, it doesn't update the table for that field?
I have 2 tables StudySchedule and ExamSchedule.StudySchedule contains the detail information of opening classes of many different periods. I need to create a form that can:
1. let the user choose a period
2. form will generates automatically exam schedules of the opening classes of the chosen using the relevant information in StudySchedule. Those entries will be saved in ExamSchedule.
3. Note that there are 8 fields of the exam schedules generated/counted from some fields of StudySchedule. The 3 other fields of the exam schedules need to be entered by the users. User must also have the ability to edit the generated fields.
I have been developing a form that will allow me to input, edit and delete data in a table.I have the input, delete, clear, and close command buttons working ok, but I am having trouble getting the edit function to work.
What happens is that I highlight the line in the table (shown on the form as a sub form) click the edit command button, and the field are populated with the current data. I then edit the field that I want, and the add, button, changes to Update. When I go to update I keep getting an error message "Cannot update 'ID'; field not updatable.Below is the code I am using, when I go to the debug the arrow points to the "WHERE ID=" line.
Private Sub cmdAdd_Click()
'when we click on button Add there are two options
'1. for insert
'2. for update
If Me.txtID.Tag & "" = "" Then
[code]...
I'm using Access 2003.I'm trying to create a command for a form that will allow editing or lock all fields, so that records are protected from accidental edits.AllowEdits in the form is set to False by default.I've used the below code to allow a user to unlock the form:
Private Sub cmdEditRecord_Click()
If Me.AllowEdits = False Then
Me.AllowEdits = True
Else
Me.AllowEdits = True
End If
End Sub
And this works without issue.However, I want to create a second button to lock the form again.
Private Sub cmdLockRecord_Click()
If Me.AllowEdits = True Then
Me.AllowEdits = False
Else
Me.AllowEdits = False
End If
End Sub
Seems logical that I should just be able to reverse the true/false but this does nothing!I've also tried the below code:
Private Sub cmdEditRecord_Click()
Me.AllowEdits = Not (Me.AllowEdits)
End Sub
To toggle between editing/locked, with the same results - ie, can switch to editing, but can't then turn it off.
I am working on Data entry form where a user can enter the details in the form and save and go ahead, its a single form in default view. I want to provide an edit button with navigation control in this form only where they can edit their wrong record for update.
View 1 Replies View RelatedI have setup a ComboBox on a form, Listed the PK of the table as the control source. Inserted the PK and many other field as the row source. When I go to select a record I get the error "control can not be edited, it's bound to a auto number field, "Asset_ID"
View 6 Replies View RelatedI have a continuous form with unbound controls. These controls write new records into a table using rec.addnew
If possible, I would like for the user to only be able to add/edit the new record only and not to edit the continuous form below. When I turn off edits on the form, I only get the new record to show. I found some pages that reference using code like .allowAdditons, .allowEdits and .allowDeletions but unsure of how to implement them since I have more than one control the user is entering data into. I also found another site that says to use a control to determine if the record is writable to: I do have a control that is set to =Date() on the default value.
So I have this relatively simple problem: I need to create a button that once clicked will open the Save As dialog box and allow the user to save a copy of the current database where he wishes. The filename should contain todays date in DDMM format along with some pre-set text e.g. DDMM PresetText.
I am using Access 2010.
I am attempting to create an attendance database that needs to be able to be updated if someone calls in sick.
I have created a cascading combo box where you can select a date up to 15 days into the past with the following code in the rowsource for cboDate
Code:
SELECT DISTINCT tblAttendance.dataDate FROM tblAttendance WHERE (((tblAttendance.dataDate)>Date()-15)) ORDER BY tblAttendance.dataDate DESC;
an after update event has been coded to show only employees who have been scheduled for the day
Code:
Private Sub cboDate_AfterUpdate()
On Error Resume Next
Me.cboAgentName.RowSource = "Select tblAttendance.agentName, tblAttendance.attendance,
[Code]....
So basically what i need to do is be able to use the cascading combo boxes to select the date and employee to go to that specific record so i can update the other fields. Currently when i attempt to do this with my current form, it automatically goes to a new record when i select a date and name and doesn't update the existing record.
I have created a form (races) with a subform (yachts in a race) to edit data in joined tables. It seems to be working well but I am having difficulty selecting which record to edit in the main form. I can scroll through the records until i get to the correct race but this won't work well when there are a large number of races to choose from.
I can see that I can use linked forms to select a race from a multi form or datasheet and call up my desired form by a double click on the ID field. This should work but isn't really elegant with users scrolling down a long datasheet to select the race record they want to work with. Is there a better way?
Races are uniquely identified by 3 attributes: SeriesDivision, Date & RaceNumber.I have created an index in the Race table for these 3 fields which forces them to be unique.I would love to create an interactive routine which asks users to select from a list for each of these 3 attributes and then returns the form for editing with the appropriate race record selected or even cascading - users select a SeriesDivision can then choose the valid dates for the selected SeriesDivision and can then select the valid raceNumbers for the selected date
What is the best way to capture the users that modify the records in the database?
Let us start from User Log-in Form After log-in, Main Form will open The main form has various menu (example Add Customer) Once I open the "Add Customer Form", I want to record the username in the Createdby/Editedby Field automatically.