I have a routine than has been working perfectly up to now. My save routine was called by clicking a Command Button called cmdAdd.
I tried to change this Command Button to a toggle button by deleting it then creating the toggle button, naming it cmdAdd and clicking on the event property to link it to the existing procedure. PS It is an UnboundForm
BTW, I've done this for several other commands without a problem but with this particular case I get the following error
Run Time Error 2115.
The macro or function set to the Before Update or Validation Rule is preventing Access from saving etc."
It seems likely that I need to do something to the toggle properties.
It allows the docmd.save but still says "You must save the current field before you run the Requery action"
The system is looking to save/update and something is stopping it. Funny though that this doesn't occur with Command Button
I have tried decompiling, compact and repair, commenting out every line that involved updating a field or variable (Except for a recordset operation that does correctly do the updates required)
BTW the Toggle button has no Before or After Update events - Only the On_Click
Hello all - One of my 3 users' computers keeps coming up with an error when I try to enter the following command in the "Validation Rule" field of the table design view:
>=#1/1/1998# And <=Date()
Some investigative work showed that it's erroring on this clause: "<=Date()". Any idea why it would error on her pc and not the other 2 pc's? Her pc is old, but we're all using Access 2002. The error says: "The function you entered can't be used in this expression." Any thoughts would be helpful. Thanks much.
I am trying to change the button color on a subform if a related form data changes.Main form is products with a continuous subform with serial numbers of products i.e, serial number, location, price and a button to add addtional issues if there are any for this particular serial number (this will open up another form related to the serial number so I can add an issues if there are any).The reason I would like the button to be a different color is so I can quickly see if there are any additional notes been added to the serial number. Just in case you may ask why not add the field to the continuos form is that the issues and be quite lengthy and there may be lots of serial numbers on the form
Hi all! This is kind of a philosophical question :)
I’m doing some changes to a “CRM”-database, and need to make a function that changes values in several records in one operation. The problem is, I have now idea on how to approach this problem.
One example; I have made a simple invoice function in my db, which works well. But now I send a lot more invoices then when I made the function. I’ve made a form, which prints the invoices, and I can print several in one “operation”. How can I, in the same operation, also change the status of the invoice record so that it says “Printed”?
If you have any suggestions on the method e.t.c.? Thank you! (I'm using Access 2000)
I have a form and I want the dates to be displayed based on predefined time. In this case, I want my form to show present date from present day's 7:00 AM to next day 7:00 AM.
I have a form where I am capturing StartTime and EndTime of certain events. I have set the input mask as 99:00 >LL;0;_
My users think it is too much to enter am or pm. What they want is the system to calculate the am pm based on the time entered.
If the time entered is between 8:00 to 11:59, the system should save it as 11:59 am and if the time entered is between 12:00 to 7.00, the system should save it as 7.00 pm.
hi there, I'd like to ask the solution for my problem. I made a new project using ms access 2003,crystal report 9, and visual studio 2005.
I just made a simple access dbase with 1 table(Table 1) and protected with password, o I forgot this table has 2 field(id and desc). After that I made simple report that using DAO connectivity(save data with report option is disabled).
At last I made simple program(windows app) using visual studio 2005. I put the CrystalReportViewer component, and these is the code :
using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms;
namespace prj { public partial class Form1 : Form { public Form1() { InitializeComponent(); }
and the problem is when I move the access database file to other location, the viewer shows a box to be confirmed by my UserID and password, my question is how must I write in the program so that the box doesnt come out.
I have created a table called - "Test" The properties of the table is listed below
Table Name: Test Field Name: ADMDAT2 (Text) DISDAT2 (Text) Operation Date (Date/Time)
I have written a query to populate a field where the Operation Date is between the ADMDAT2 and DISDAT2
Expr1: IIf([ADMDAT2] Is Null,"",IIf([Operation Date]>=[ADMDAT2] And [Operation Date]<=[DISDAT2],"Match"))
Unfornately it returns and ERROR message... I believe this may be because, the data type of the field, matching a Text with a Date/Time, I have rerun the query using a sample table where all the fields are Date/Time, and it work perfectly.
What i need help with how do i convert a text field into a Date/Time in a query?
So i can place that in the query before i populate the Test table. therefore it all should be date/time
I am needing to design a form that allows a user to add or overwrite a number of records by copying and pasting the information from an Excel Spreadsheet, however one of the problems is that the information being sent has times stored as text - so, for 04:45, it is simply stored as 0445 on the spreadsheet.
Is there a way to have these autocorrect once pasted into the datasheet?Also, is there a way to make a datasheet form that copies a number of records into itself depending on a user selection? The basics of what I am trying to achieve is:
I have a number of services that operate on a number of services (public transport), each vehicle has a unique identifier (Bonnet), and each place in the schedule has a unique identifier (RunNo); there are different schedules for different day types (Saturday, Sunday, Monday, Tuesday to Thursday, Friday and so on), and the times that each RunNo goes out and comes in differs depending on the day type.
At the moment, I have a table which has the following fields:
ID (Autonumber, PK) DayType Route RunNumber TimeOut TimeIn
My idea/hope is that a user will be able to open a vehicle allocation datasheet for the day, select the day type (lets say, Saturday) which will then populate the relevant number of rows with the schedule information (looking at a Saturday, that would be 128 rows), and then a blank column to add to the records a vehicle ID that is being used for each RunNo for the day.
Now, on top of all this, I need to also cater for vehicles being substituted during the course of the day - - - if one breaks down, it will have to be de-allocated from the list (so presumably by changing the TimeIn to the current/actual time rather than the scheduled time) and the user will need to be allowed to add a further row to show which vehicle was used next against that RunNo.
Just to further complicate things, there is quite a number of vehicles that will have a time in which is in the following day (ie after midnight) - whilst this isn't a problem in storing the times, I also want this table to be looked up to determine whether a vehicle is currently allocated or not.
The fields for the AllocatedVehicles table are:
ID (Autonumber, PK) RunNumber Bonnet Number DateOfService TimeOut TimeIn
It is hope that all of these with the exception of Bonnet Number can be populated by selecting the day type?
I have an Access 2010 application running on Win 7 Pro which connects to a Back End SQL Server database. I am trying to get Access to synchronise the client pc system date & time with the Sql server date and time. Please note, the date/time does not necessarily have to be correct, it just has to be consistent between the server and all the pcs running the Access application.
I have tried two methods as follows. But both only work if Access with Administrator privileges, which isn't really practical.
Method 1:
Code: Dim MyDateTime As Date 'Some Code here to get MyDateTime If MsgBox("Change date & time to:" & vbCrLf & vbCrLf & MyDateTime & "?", vbYesNo, "Change") = vbYes Then Date = DateValue(MyDateTime) Time = TimeValue(MyDateTime) End If
Method 2:
Code: Private Type SYSTEMTIME wYear As Integer wMonth As Integer wDayOfWeek As Integer wDay As Integer
One when a required field is set to yes - i want to change the error message to something more meaningful.
Two i would like to stop people enetering data into a sub form on the main form when there is no data in the main form? I linked them using the wizard.
So main product linked to sub form with productID?
I am getting a "cannot change or add a record because a related record is required in table 'tblOrder'". I have scoured this site so forgive me if there is a post already on this.
My Order table has:
OrderID CustomerID SalesTaxRate
My Order detail table has: OrderDetailID PoNumber TransDate ProductID OrderID QuantitySold QuantityReceived QuantityOrdered TransType
I wasn't sure if by this you could point me in the right direction as to why it is saying this. I am very new to Access so bare with me. Thanks
I have set up a simple switchboard that gives the user a choice of 2 forms. The second from allows the user to navigate through a questionaire for a particualar individual. I have set up some buttons to advance thru the questions and answers. When I reach the end of the dataset, I get the error message "You can't go to the specified record." I also get this message when I am on the first question and try to page backwards. Is there a way to change this error message to something more meaningful to my users - like "End of questionaire" or "Beginning of questionaire"?
I'm in datasheet design view and I'm trying to change the data type of a cell and add a lookup. When I try to change the datatype I get an error which says I need to remove a relationship first - except I did. I deleted all the relationships, saved and closed the relationship view and closed and reopened the table.
I have the following code linked to an event. when I run this I am getting a run time error that says "Data type mismatch in criteria expression" Any ideas on what could be the problem?
Private Sub Command2_Click()
If IsNull(DLookup("[Acct#]", "qryTest", "[Acct#]=" & Forms![Form]![Account])) = True Then If IsNull(DLookup("[Acct#]", "qryTest2", "[Acct#]=" & Forms![Form]![Account])) = False Then
DoCmd.OpenQuery "qryTest2", acNormal Else MsgBox "The Account Number was not found" End If Else DoCmd.OpenQuery "qryTest", acNormal End If
If Me!MAJOR_CD = "616" Or "614" Or "176" Or "613" Or "F16" Or "612" Or "611" Or "650" Then MsgBox "MUST COMPLETE ENGINEERING SURVEY BEFORE RECEIVING DIPLOMA", vbOKOnly, "DIPLOMA PICK-UP" End If
End Sub
I am using Access 2000 with a search feature to find students by entering an ID_Number. It finds the person in the database and it is supposed to show a pop-up message if the person in the database has either one of MAJOR_CD on their records. It returns this error:Run Time Error '13': Type Mismatch.