Error Message On Form
Jan 7, 2008
Hi all,
I'm creating a simplified timecard entry form, and everything works perfect except one thing. When I start a new record and go to the subform and choose the day (monday - friday) it says "This property is read-only and cannot be set" but then it goes ahead and accepts the entry.
A little background, I am making the times as simplified entry (100 for 1pm, 800 for 8am, 500 for 5pm) no colons will be entered. Our hours of operation are roughly 7am until 630pm, with the occassional clock in before 6am and clock out up until 8pm or so. I have this error checking in place, it works ok, I add 1200 to the time if it is pm. Now if they are making a straight time adjustment, they enter it in as well.... for instance 8 for 8hrs holiday pay or paid time off. All this stuff works, that's not the problem.
I am thinking, maybe it might have something to do with having 4 or 5 fields set as the combined primary key on the table that holds the time/adjustment data. The reason I did the combined primary key is so they could enter in the same name, the same start date, even the same day, but the adjustment/time value has to be unique when it is compared with the start date, name, day, adjustment/time value. This table is the subform.
The weird thing is, that after the error, it lets the value stand and does not show the error again, as long as you are on this recordset. If I go back into that record and start a new entry below the others, I get the error again. While the error has no detrimental effects on the db, it is annoying.... and it still shows if I run the form off a macro with setwarnings to false.
I am including the database for review for those of you brave enough to try to understand my logic I'm sure it's something simple. I don't see anything in the properties for the form to turn off error messages like you can in data access pages, or maybe I just overlooked it. I have left one recordset in to show the functionality, it all works according to plan. This is just a rudementary database, I will fine tune it after I get past this hurdle.
Edit: I have Calendar control 11.0 for the start date, but this isn't the problem as it still did it when I had the actual field showing. That, and if you see the disparity between hours and minutes and paid time, it's because if they worked so many hours, 1/2 hour is automatically subtracted. Which is why there is a lunch adjustment field.... if they didn't take a lunch or if they took too long of a lunch.
View Replies
ADVERTISEMENT
Oct 22, 2007
I tried to get help elsewhere with this but it didn't quite work out, so I thought I'd pick a few other brains. So here's the problem from the beginning.
I made a table with three fields:
Field Name----Data Type
Category------Text
Item----------Text
Cost----------Number
I set up a form with two combo boxes and two text boxes. I want to pick an Item from the combo box, and have the Cost appear in the corresponding text box. I set up the combo box to show each field when I click on the arrow.
I was given the following code to put in the After Update section under the Event tab for the combo box:
Private Sub Combo8_AfterUpdate()
Me.Text2 = Me.Combo8.Column(2)
End Sub
That works. I pick an item from the combo box, and its value appears in the text box next to it. Ultimately, I want to edit the value in the text box and have it update the table. I was given the following code for the text box:
Private Sub MyTextbox_AfterUpdate()
Dim strSQL As String
strSQL = "UPDATE MyTable " & _
"SET Myfield = " & Me.MyTextbox & _
" WHERE Id = " & Me.MyCombo
CurrentDb.Execute strSQL, dbFailOnError
End Sub
So far, that hasn't worked. I believe I've made the correct substitutions:
Private Sub Text2_AfterUpdate()
Dim strSQL As String
strSQL = "UPDATE [Primary Table] " & _
"SET Cost = " & Me.Text2 & _
" WHERE Id = " & Me.Combo8
CurrentDb.Execute strSQL, dbFailOnError
End Sub
When I type a different value into the text box and hit enter, I get the following error:
Run-time error '3061':
Too few parameters. Expected 2.
I was given a different line of code in the event that I'm "trying to pass text":
" WHERE Id = '" & Me.Combo8 & "'"
When I use that, the error is the same except it says:
Too few parameters. Expected 1.
Does anyone know the correct code?
View 2 Replies
View Related
Apr 3, 2008
I have designed a form to act as a menu to open other forms. I created the form and placed command button on the form. Using the Access Wizard, the following VBA was created by Access to open the next form:
Private Sub cmdCCDolClr_Click()
On Error GoTo Err_cmdCCDolClr_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "frmCCUS_Dollar_Clearing"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_cmdCCDolClr_Click:
Exit Sub
Err_cmdCCDolClr_Click:
MsgBox Err.Description
Resume Exit_cmdCCDolClr_Click
End Sub
I have done this several times in the past with success. However, this time, I get the following error message when I click on the command button to open the second form.
The expression On Click you entered as the event property setting produced the following error: A problem occured while GCM (name of dB) was communicating with the OLE server or Active X Control.
*The expression may not result in the name of a macro, the name of a user-defined function, or [EVENT PROCEDURE].
*There may have been an error evaluating the function, event or macro.
I tested other forms that were designed to open secondary forms and they continue to act correctly. Is there an easy fix to this issue. There are 16 command buttons and all get this message. Do I have to delete the form and recreate it. A nusiance, but not difficult.
Looking forward to hearing from you experts out there.
Thanks, Alan
__________________
Alan Sidman
View 3 Replies
View Related
Jan 21, 2015
when i want to open the database in an access database i have the following error. you have as the event property setting the expression entered when open.This expression has caused an error amppu (database name) can not find the form that is referred to
View 4 Replies
View Related
Nov 28, 2014
I'm creating a DB that includes a form that "Customers" will fill out. The form (CustomerForm) has text boxs that must be completed. I'm trying to figure out how to make sure all text boxes are filled out. I have already created a Input Mask and selected Required in the "Customer" Table. There is also a Username text box I would like to have validated that is is not already being used and two password text boxes I would like to have validate against one another to ensure it was created correctly. Once all text boxes are properly filled out I would like the Button to Save customer data, close CustomerForm and Open ShoppingCart. This is the code I have created:
Code:
Option Compare Database
Private Sub Log_In_Click()
If IsNull(Me.CustomerFName) Then
MsgBox "Please Enter First Name", vbInformation, "First Name Required"
Me.CustomerLName.SetFocus
[code]...
View 7 Replies
View Related
Sep 15, 2005
I have a form designed to execute a query with a prompt for a particular record. When the record being searched for is not there the form become blank with nothing on it. I would like to return a message that indicates that the record was not found and give he user an option of reexecuting the query of exiting the form.
View 1 Replies
View Related
Mar 8, 2006
Hello all,
I have 5 check boxes on a form and one of them must be checked in order to get the correct result.
If the user does not check any of the the five checkboxes he gets a msgbox telling him that he must checks one of the checkboxes.
What i want to ask is if is possible to prevent the form from updating? Because the user gets the error message but after that the form is being updated even though he hasn't check any of the fields.
Thank you in advance!
View 2 Replies
View Related
May 1, 2013
I have created a profiling form for my school. Each boy can access his form using his admission number ( Adno) which is the primary key. On the form are lots of sub forms - for things like favourite authors, clubs, teams played in etc - but these don't have a primary key ( as they are automatically linked to the Adno via the main form ). Unfortunately when several boys are filling in their own forms at the same time I keep getting error messages, one says that the data can't be updated and another says that there is a primary key problem.
View 8 Replies
View Related
Sep 21, 2012
I have a form and when it's opened you get 3 different search questions to answer or leave blank. My question is.... If a search parameter is entered but no results are found to match it, how do I create an error message telling the requestor "No Data Found"?
View 7 Replies
View Related
May 4, 2006
I have a form with a subform in it. On the main form, I have a combo box with a list of program numbers to choose from. Once one is selected, the subform displays all the unpaid invoices under that program number. This part works fine. The problem occurs when I try to close the form, switch to design view, or scroll the subform to the right. Basically, the error message says that the record can't be saved because it would create a duplicate value in the index/primary key. However, this form is used to display information only. I have disabled the edit, delete and addition abilities, so I can't figure out why it thinks I am trying to change or add a new record. Any help would be appreciated.
I figured it might make things easier if I included a copy of the database, so here it is.
The form is called SETR, and the subform is AllInfo subform.
View 1 Replies
View Related
Mar 31, 2006
Does anybody know what this error message refers to?
"Reserved Error (-1517); there is no message for this error."
It just started happening today, and I haven't even made any changes to the database. It occurs when I hit a button I have to run a macro.
the macro does the following:
1) Shows all records
2) Requery
3) ApplyFilter.
The Where Condition for the filter is:
Right([tblContracts].[JobNum],4)=Right([Forms]![FrmContProc].[txtFindJobNum],4)
The weird thing is that it only occurs if the Form window is taller than 1/2 of my viewable area. If the Form window is 1/2 the viewable area or shorter, it works OK. This was running fine earlier today, but about 4:00 pm (03/31/06) this started happening.
If anybody knows what this error means, or how to get rid of it (I really need to use this window in full-screen) then please let me know.
-Thanks, Sean
View 10 Replies
View Related
Feb 1, 2006
Hello All,
I have been developing my database all one seems to be well exept for an error message which is attched.
If anybody can help me trap this error or offer some advice i would be greatfull.
Alastair
View 6 Replies
View Related
Sep 28, 2005
While going to the design mode of a form, I regularely get the following message :
Microsoft Access can't run the macro or callback function 'fDesign'.
In my Dbase there is no macro with that name.
Can anyone tell me what this messages means and how to get rid of this thing.
Running Win XP, Access 2003 Sp1
View 2 Replies
View Related
Jan 23, 2006
I have attached a screen print of an error message I recieved on my access database. I finally got it to come up, but only after a few pop up boxes with this error message.
I do know the shared drive it is housed on went on the fritz. So I copied it and pasted it to my desk top. Grrr...I thought this message was due to the flipping shared drive. But now, I recieved it on my desk top too.
Anywho...can someone look at it and tell me what it means.
Thanks alot.
PS, i know my desktop has to much stuff, so don't go there. ;)
View 2 Replies
View Related
Apr 3, 2006
Hi can anyone help i keep clicking on a qry and it comes up with this message "Syntax error (missing operator) in query expression 'tblSTSLimits.Max Short'. but Max Short is correct can anyone help
View 1 Replies
View Related
Aug 9, 2006
Hi all,
I face a problem while openning a form.
It gave me this error message:
The expression On Load you entered as the event property setting produced the foolowing error:
User-defined type not defined.
What to do?
Sorry for bothering you.
Thanks & Regards
Mark K.
View 3 Replies
View Related
Aug 23, 2006
I get an error message when I open access 2003 database "database contains a missing or broken reference to the cacview.ocx version 1.0
All help so far says to go to tools>references.
My tools in the help menu does not have references
anysuggestions
View 1 Replies
View Related
Oct 9, 2006
I have a table that keeps crashing. The only error message I get is "Invalid Argument". Each time, a single record will turn into "#Error". Each field says this in the row. When this happens, Access won't let me delete just that row,
Any ideas how to delete them?
View 2 Replies
View Related
Jul 11, 2005
I am getting the following message:
"you tried to execute a query that does not include the specified expression qryMaxDays.Days Between 0 and 50 as part of an aggregate function."
I have other queries just like this and they run with no problem. any ideas? :confused:
SELECT Count(qryMaxDays.Days) AS [Number Of], qryMaxDays.Days
FROM qryMaxDays
GROUP BY qryMaxDays.Days
HAVING (((qryMaxDays.Days) Between 0 And 50));
View 1 Replies
View Related
Mar 6, 2006
I am trying to Right Join two queries which are basically from the same exact table, but when I do that I get the following error.
ODBC--called failed.
[Microsoft][ODBC SQL Server Driver][SQL Server] The column prefix 'MS1' does not match with a table name or alias name used in the query. (#107).
The following is a copy of my SQL
SELECT PqryExpiredPolicy.Policy_Number, PqryExpiredPolicy.Orig_Exp_Date, PqryExpiredPolicy.Insured_Key, PqryNewPolicy.Policy_Number, PqryExpiredPolicy.Name
FROM PqryNewPolicy RIGHT JOIN PqryExpiredPolicy ON PqryNewPolicy.Insured_Key = PqryExpiredPolicy.Insured_Key;
I have looked for this MS1 and cannot find it. Any ideas where I should be looking or what this means?
View 3 Replies
View Related
Jul 21, 2005
I get the following error message when I open a form, but I cant see anything wrong:
Run Time Error '2447':
There is an invalid use of the . (dot) or ! operator or invalid parenttheses.
This is the code that causes the problem:
Private Sub Form_Activate()
If Me.SumOfTotalGVS > 16 Then
MsgBox "You have exceded the total amount of GVS on the CATT site"
Let Me.SumOfTotalGVS.BackColor = 255
Me.SumOfTotalGVS.ForeColor = 65535
Else
Let Me.SumOfTotalGVS.BackColor = 16777215
Me.SumOfTotalGVS.ForeColor = 0
End If
End Sub
View 13 Replies
View Related
Feb 27, 2006
Can anyone tell me what is wrong with this line of code please. Im trying to count the number of records on another form that is open. This is an On_Click command from another form.
Me.lblCount.Caption = "You have " & Forms![Armour_Selection].RecordCount & " Armoured Squadron(s)"
View 1 Replies
View Related
Aug 11, 2006
Hello all,
I have an access application. I imported a form to it with all related tables and queries and modules from another application. Unfortunetaly, it didn't work.
It gives me this error message when openning the form:
The expression On Load you entered as the event property setting
produced the following error:
User-defined type not defined.
Sorry for bothering you.
Thanks & Regards
Mark K.
View 7 Replies
View Related
Nov 28, 2006
Hi folks,
i have a form that allows me to save mobile phone details.
The problem with this form is that if its incomplete and i click 'x' it shows me the validation message followed by an error message (which is attached with this thread).....
why is that? is there anyway i can exit the form (incomplete) without the valdation message or error message occuring???
View 14 Replies
View Related
Sep 7, 2004
Function Age(varBirthDate As Variant) As Integer
Dim varAge As Variant
varAge = DateDiff("yyyy", varBirthDate, Now)
If Date < DateSerial(Year(Now), Month(varBirthDate), _
Day(varBirthDate)) Then
varAge = varAge - 1
End If
Age = CInt(varAge)
End Function
I get # error in the field. Help?
View 2 Replies
View Related
Sep 24, 2004
I get this error when I try to run a query. I have attached a screeen print of the problem. Every thing else works just fine it is the same query I copied it and just change one of the fields. the other query orks fine.
View 1 Replies
View Related