I have a checkbox on my form that basically deletes a record when the user ticks the checkbox. What I want to know is how do i check whether the person is "ticking" or "unticking" a checkbox before any action is carried out?
View RepliesI have made some accounts with the user-level security wizard, and i was wondering is there a way to know who logs in?
Im wanting to give a person preset information on forms and stuff.
Is there any function or code that would display the workgroup in which the current user belongs simular to the function "currentuser()" which displays the user logged onto the db?
View 9 Replies View RelatedI don't know if this can be done. I'm using Access 2010 and I have users updating information on a hourly basis.
Can I have a field that basically shows the last user that edited the form or saved it?
I have three check boxes in my form and i want the user to select any one of the check box, if not, i want to display an error msg? How to do it?
View 2 Replies View RelatedHow to make a form that must Check the username and password of a user, in case if they are true then let the user to visit other forms and Tables...
View 1 Replies View RelatedI have a field 'Payment Types' with values (Cash, Cheque, Debit/Credit Card) and a field 'Payment Received' which is Yes/No.
When putting the order through the user selects the payment type and ticks a box if payment has been received.
On a report for delivery drivers, the owner wants it simple for the driver... he wants all the payment types listed with a checkbox next to each one, then wants the appropriate box ticked if payment has been received.
So I need something on the report (or underlying query) which ticks the appropriate box, i.e.
If payment received = true then payment type checkbox = true.
Or should I put the payments into a separate table with both fields so multiple payment types can be marked as paid?
I'm familiar with screen.activecontrol but what I am trying to do is to activate an event relevant to the control currently triggering the mousemove event.
In the attached db, if you open the MMHighlight form and move the mouse over the boxes, as they are moved over they go yellow (mousemove event), whilst still hovering, click on a box and the first box displays the first and last boxes selected (mousedown event). release the click to trigger the mouse up event which clears the boxes. Broadly this is working as intended
The problem is the mousemove event which has to be 'personalised' for each control - highlighted in yellow
In the real application there are several hundred controls, so I'm looking for a timesaver - one option being to build a form via vba, but ideally some equivalent to screen.activecontrol and perhaps a third where I can replace [text0] with a generic name - a bit like 'Me' to refer to the form.
I've got a form (frmEdit) that allows users to search tblMain for records using a bunch of unbound controls and a dynamically created SQL statement. Search results are displayed in a subform (subMain), and the current record in the subform is displayed in a set of bound controls on frmEdit.
Now the important bit: There is a set of unbound checkboxes on my form that allow the user to change which fields are visible in subMain. This is accomplished by the following:
Code:
Private Sub chkName_AfterUpdate()
If Me.chkName = 0 Then
Me.subMain.Form.CorrespondingField.ColumnHidden = True
Else
Me.subMain.Form.CorrespondingField.ColumnHidden = False
End If
End Sub
Certain fields are visible by default, but the user may want to change which fields those are. Here's what I've done so far to accomplish this:
Created a button (btnChangeDefaults) that opens a form (frmChangeDefaults)
Put checkboxes for each table field on frmChangeDefaults
Put a "Cancel" button (btnCancel)* and "Done" button (btnDone)** on frmChangeDefaults.
*btnCancel just closes frmChangeDefaults without making any changes to frmChangeDefaults or frmEdit
**btnDone changes Forms.frmEdit.Form.chkName.DefaultValue to Me.CorrespondingCheckBox.Value and then closes frmChangeDefaults
This all seems to work quite well, actually. Debugging confirms that the default values of the checkboxes on frmEdit are indeed changed when I click btnDone. But when I close frmEdit and re-open it, the default values return to what they were prior. This happens even when:
I close frmEdit using DoCmd.Close acForm, "frmEdit", acSaveYes
I close frmEdit after using DoCmd.Save acForm, "FrmEdit"
I save frmEdit manually by right-clicking and pressing save
What am I missing here?
I want to uncheck a check box field for all records in a table. I want to do this with a push of a button which will implement a function or sub or query that clears only that field. I?d like to know:
a) How will this hit performance? There will be approximately 150 records (max) that will be effected. Is this something that will slow the system to a crawl? If it takes a minute or so for these records to be altered, I can live with that.
b) How can this be implemented? Say a user hits the button to clear them, how does it get implemented? For instance, a select statement that grabs all the records that have -1 (a ?check?) in that field and then do an update statement for each one that changes it to a 0 (unchecked). Any suggestions?
Thanks,
scratch
Ok I can't wrap my brain around this for some reason. I'm still learning access so there are a lot of things I'm trying to figure out.
I have a form that has a check box section to check off the days of the week. But for some reason they all stay checked when I move to the next record. How can I fix this?
Hi
was wondering if i could get some assistance to hopefully a simple query.
In one of my tables i have about 1000 records with the data type yes/no and the problem is I have reliased that I need to have as a default value a yes (or a tick in my form) but i dont want to go down each record filling in a tick. Is there any easier way to do this
You will have to bear with me I am pretty new to access.
I manage to set up a default value of yes but this will only work on new records entered, but the issue i have is I require it to be on my records which are already there.
Any help will be really appreciated.
Thanks
Ranj
I wanted to uncheck all check boxes on a form on exit. I added the following to the ON EXIT event of the form. It works, but takes a lot of time to finish. there are close to 700 records on this table:
Dim rs As DAO.Recordset
Set rs = Me.RecordsetClone
With rs
.MoveFirst
Do While Not rs.EOF
[Code] ....
'SELECT' is the name of the check box. Is the code correct? If not, could you correct it?
I am trying to verify that there is no value entered in a text box on a subform before the main form closes. I have tried all manner of combination but continually get the statement that Access can't find the field referred to in your expression. I do have the names of all forms and fields correct.
Below are a couple of what I have tried. (SubassemblyFRM is the main form and ItemsSFRM is the subform and Description is the text field I am trying to check.)
Forms![SubassemblyFRM]![ItemsSFRM].Form.Description
Me![SubassembliesSFRM].Form.Description
I am trying to use it in this statement.
If Len(Me![SubassembliesSFRM].Form.Description & vbNullString) = 0 Then
what might be causing this error?
I have a form with a number of entry fields and after a button is clicked I write to an MS Sql datatable. Everything works fine as long as I put a value in each field. If I do not put a value in one of the fields the sql does not run and the record is not added / updated in the database. I have tried checking the length of the data in the field using
Ent_Length = Len(tb_TagDesc)
or
Ent_Length = Len(tb_TagDesc.Text)
or
Ent_Length = Len(tb_TagDesc.value) but nothing shows.
I am using Access 2007, 32 bit Windows 7
I have some code that sends an email when the database is registered. The problem is that depending on a users security settings on their PC they can stop the email from being sent (2007) How can I add to the code to make it check that the user hadnt cancelled the email?
My code is:
Private Sub btnRegister_Click()
Dim olApp As Object
Dim objMail As Object
On Error Resume Next 'Keep going if there is an error
Set olApp = GetObject(, "Outlook.Application") 'See if Outlook is open
[Code] ....
The following code searches for a record and if not found, the user is advised of that and allowed to re-enter the lookup stock number. Obviously, the code is only going to allow valid stock numbers. If the user clicks the 'Home' command button to close the form with an incorrect stock number in the lookup control, it is an endless exercise in advising of the incorrect stock number. I'm thinking of using the 'Home' command button as an escape. How can I tell if the 'Home' button was clicked? I have indicated where I believe it should be put.
Private Sub txtLookupNbr_BeforeUpdate(Cancel As Integer)
On Error GoTo Err_txtLookupNbr_BeforeUpdate
Dim rst As DAO.Recordset
Dim db As DAO.Database
Dim lookup_Nbr As String
lookup_Nbr = StrConv(Me.txtLookupNbr, vbUpperCase)
[Code] .....
I've got an attendance form set up with check boxes for each day I want to check attendance. I have two problems with this form.
1) All the boxes start out with little squares (I want them to be blank)
2) If I try checking a box for one person, it checks all the boxes in the column (same with unchecking).
I want to check if a date falls between the first date of a year and the last date of a year.
The goal is to go through a table in the database that contains dates in a column. There are for example several dates in the year 2014 and there are dates in the year 2015.
What i want to do is get a list in a report that shows me for every year a line in the list with other data that i will calculate. So a line for 2014 and a line for 2015.
How can i do that?
I have a Listbox on a fprm which has a button attached to it, the button allows you select one of the items in the listbox and append it to a table. the problem is that it currently allows you to add the item as many times as you like. How can I check for duplicates?
Code:
Private Sub CmdAdd_Click()
'Add new record to tblShootingTasks
strSQL = "INSERT INTO tblShootingTasks ( ShootID, ContactName, Task ) " _
& "SELECT [Forms]![frmTasks]![ShootDateiD] AS ShootID, [Forms]![frmTasks]![Combo15] AS ContactName, [Forms]![frmTasks]![Frame17] AS Task;"
DoCmd.SetWarnings False
DoCmd.RunSQL strSQL
End Sub
I am developing a form where students have to enter their ID number but I want my form to check through a table of students and their IDs and flag up if the ID number does not exist in the table.
View 10 Replies View RelatedI have a transaction form and there is at least two fields I need to make sure have been entered before the record is saved.
I have no problem with text or numeric fields but I can't seem to be able to check the contents of a drop down field.
What is the best method to use to make sure a drop down has been selected by the user and contains a value.
I have temporarily used a default value in the drop down but that's not really what I want.
Below is some code that I'm struggling with and I get an error message "Type Mismatch".
Description: The database contains multiple projects and the subset of each project is a release. The "PublishedNumber" can't be a duplicate within a release, but it can be a duplicate within the table where the data is stored. There can however be multiple occurrences of 0.
Here's my code:
Dim stLinkCriteriaRelease As String
Dim stLinkPublishedNumber As String
Dim DuplicateNumber As Variant
stLinkCriteriaRelease = "[AssociatedRelease]=" & [AssociatedRelease]
stLinkPublishedNumber = "[PublishedNumber]=" & [PublishedNumber]
[Code] ....
I am building a form in access and I am trying to find a way where user input isn't possible in the associated textbox when "No" from on option box is selected.
View 3 Replies View RelatedHi
I have my table set up to add today's date as a "date last updated" field. this works for all new records but I need to flag instances where a user has amended any existing records, so that on a daily basis I can filter out anything new based on the "date last updated".
Any ideas how I can flag changes to existing records?
Apologies if this is a straight forward question I'm fairly new to Access
Be advised that I'm a complete novice with Access, and have used it only to view Excel files with more than 64,000 records. Any help would be appreciated.
I have an Excel file of 10,000 records entered by salesmen of possible prospects, with salesmen, prospect name, address fields. Some salespeople have entered the same prospect and address information; the only thing different in these records are the salesman name.
I know how to import the file into Access. But from this point, how do I construct a query and generate a report that shows me ONLY THE DUPLICATE RECORDS? We would like to use this report to identify the double entries and the salespeople so they can clean up the database. I know Access (I have Access 2003) can create this query, I don't have a clue on how to do it.
One hint: A post on another forum suggested " Make a group-by query (grouped on all fields except salesperson). Add a count field. Select if count >1. This should do the trick."
I'm sure this is the answer, but I don't know how to "make a group-by query", how to "add a field", etc. Like I said, I know how to import the data. That's it.
This is extremely frustrating to be this close to the answer and not know how to finish it. Any assistance would be appreciated. Thank you.