I have a form based on a table (master) with a cbo which returns yes or no according to what users select.
I then have another form which get's its data from a query based on the above table (master). This time, the value I have selected in the previous form using the cbo, should be displayed using a check box.
This is how I would like it to work:
If Me.cbo = yes (meaning that the value selected is yes), then
check box should show be checked.
If Me.cbo indicated NO, then, the check box should not be checked.
I'm trying to get a field in my Data Access Page to display the last time a field was updated, I figured I would have to do this in HTML, after a lot of dead ends elsewhere. Here is the code:
<SCRIPT language=vbscript event=BeforeUpdate(dscEventInfo) for=MSODSC> <!-- Dim DateModified DateModified = Date 'Current System Date dscEventInfo.DataPage.Recordset.Fields("DateModified") = Date
--> </SCRIPT>
Any clues where I would enter this in the HTML source?
Here is my problem. I have several fields located on a form. The user has a problem finding the curser on what field its on. I did ok with the text fields, but I need to come up with something for the check boxes. Any Ideas
The code below works good for text fields. But I need to do the same for Check Boxes or the Check Box Label that is associated with the check Box.
Private Sub Ctl4bCode_Enter() Me.Ctl4bCode.BackColor = RGB(255, 0, 0)
End Sub
Private Sub Ctl4bCode_Exit(Cancel As Integer) Me.Ctl4bCode.BackColor = RGB(255, 255, 255)
I am planning to give different rights (AllowEdit, ViewOnly…) to the user on accessing forms and reports in a db on a single pc instead of dealing with server as my client have only one pc.
As a present requirement, db would be in one pc only and would be used by 3-4 users. I need each of users to limit their access to some of the forms and reports in the same pc. To get it, what I did is as follows:
Example:
One of my tables called tblEmployees (Back End Table) linked in FE containing following fields:
There is a login menu form. Something like 2 text boxes on the form and opening at the startup. User selects his name from a combo and types his password. If the user is available in the tblEmployees, Access opens main form and store UNumber and UName with time stamp in a local table called “T_CurrUser. If user not available in tblEmployees, it should close or give some msg.
Now, when the Main form opens (after login with correct user and pwd) and user wants to click different command buttons to open the form, I need to write code to check whether the current user have right to open the selected form (check marked to allow opening this form in the table tblEmployees) BEFORE opening it.
If check mark is set to false on F1 in the table tblEmployees, it means he can’t open form1, and a msg should pop up “Not allowed to view”..Something likes that.
1. I don’t know the code I created with simple if then, where to write ? I mean on which event of form ? On open / On Activate or where. Bcz the code should run before form opens and should check the table whether the user have check mark value true or false.
I tried to write the following code but some time it works some time doesn’t. What is wrong with code lines?
On Click of Command Button that opens Form1
Dim USR = DlookUp(“lngEmpId”,”T_CurrUser”) ‘ Local Table emp.
‘To check if Form1 check mark is set to true If DlookUp(“F1”,”tblEmployees”,”lngEmpId=USR)=True Then Docmd.OpenForm “Form1” Else End If
When another user logs on the same pc (off course, after login out of first user) the local table T_CurrUser record will be replaced with new user. Note that local table T_CurrUser contains always one record. Hopefully I described correctly.
I have created code to import and excel file and create a table from that info. Now I need to confirm that the import has the correct Datatype of Number and Fieldsize of Double for one of the columns.
Enforce referential Integrity and Cascade Update Related Fields
Thus, it is possible to change the name of the state or city, but can not be deleted until the state is associated with some of the city.
I also made a form for the "state" in which is the list that contains a list of all states. The name of the list is "lstState". So that I can delete the "State" I make a button in form and I use the following code:
Code: Private Sub DeleteState_Click () If IsNull (Me.lstState) Then MsgBox "Select the state you want to delete", vbCritical else DoCmd.SetWarnings False
[Code] ....
Everything works fine when the state is not assigned to any one city. But the problem arises when trying to delete a state which is assigned to the city, that is when I select this state and click on the delete button then the state is not deleted - this is ok, but without any message told why the state is not deleted and that's the problem.
My question is how to make the code that the user receives a message that such State can not be deleted because there are cities that are associated with it.
I am trying create some code that checks if the contents of the status field in a table is "Authorised" where the ID = something specific for multiple records. If all records witht the specific ID are "Authorised" Then generate a new record in another table. Where to start, perhaps a Dlookup?
I'm in need a of a check-in/check-out application for my company. We have about 550-600 employees at any given time and our turnover is about 20-30% per year. Our check-in/check-out process requires our employees to personally visit between 30-40 areas in our company (personnel, safety, credentials, parking, insurance, etc) within the first month of employment. This is currently done manually and is a huge drain on labor, especially when check-in sheets are lost, misplaced or, in some cases, forged.
I'm looking to build a database that would be intranet based, password secure (by check-in area) that would allow the new employee to present at a particular check-in, check-out site, complete that portion of the check-in/out process and then allow the person responsible for the check-in/out to enter the status into the database. At any point in the process, I would want to know the status of the person checking in/out (how long they've been checking in/out and what portion of the process have they completed).
Works great, but when I hit the number "3", (3 times in row) it will let me into the form. I want it to not let me in IF I don't know the password.
Where did I go wrong?
Private Sub Form_Load() Dim pw As Variant
If InputBox("What is the password?", "Password") = "1" Then Else MsgBox "Invalid Password", vbCritical, "Sorry Charlie" DoCmd.Close If InputBox("What is the password?", "Password") = "2" Then Else MsgBox "Invalid Password", vbCritical, "Sorry Charlie" DoCmd.Close End If End If
I protect my code from people being able to read it by setting a password on the code from Tools > Properties, selecting the Protection tab and entering a password, and clicking "Lock Project"
Is there a way to write code that will remove that Lock Project check and check it back on?
I've looked through the Application.SetOption command and it doesn't seem to be one of the choices. It would be very helpful if someone knew how to do this.
Hi I have sendkey "{f7}" on loss focus. this works great as a spell check but then I get the mesage box that spell check is complete. How do I stop this box from occuring?
Does anyone know or have an example of how to use check box's to filter out things in a form. What I want to do here is I have like 5 different locations and I want to be able to choose which of those location, whether it be one or more checked at a time and then have whatever those check boxes are checked to be filtered out.
I have a continious form containing data from the table "tblToernament". On that form there is a combobox containing teams that are stores in the table "tblTeams".
The table looks like this:
ID | TeamName
1 | Team01 2 | Team02 3 | Team03 4 | Team04
When I select, for example, Team02 in the combobox I want that value on, after I selected it from the combo NOT to be in the combobox.
Hello, im making a database for a charity as part of my work experience and id just like someone to check over it for me. If you see any issues please let me know. Im already aware of changing text PK's to autonumber, this is a prototype so im not going to change the PK's at the min.
Any ideas, or ways to improve it?
You can find the LDM or ER-D here: (i understand that it may be difficult for you to follow since you dont know the system! But please have a go...) 17447
I was working on my project again as usual, which is about transaction of cars coming in and going out (car pool system), So i created a table then a form for this. In the table, i put the option of 'Yes/No'. So, for the form, i want to create a search system which will include a search system.
My Idea:
I want to make a check box, as a search system, so when it is checked and clicked on a command button, it searches for all records with 'Yes'. and if not checked, and clicked on command button, then it searches for all records with 'No'.
Now i did my research, on google and stuff also in the access help but it ddnt help much.
To be honest with you guys, i dont know much of visual basic writing, but i do understand most of it. ( you know, when you understand one language but can speak it?? same way :o ).
So i would request some one to give me instructions on this one. It would really be appriciated.
Do check boxes have to be bound to be able to save them in your forms? In other words, when you check the box and click save, does the check box have to be bound so that the check mark can be saved? Thanks.
I want to connect a single check box to a record of check boxes, so that when it is on yes (checked) all the other boxes are yes (checked) automatically. How do I go about doing this? Is there an expression I can build for it? :confused:
I know there is probably a simple answer to this question, but im wondering if there is a way to make the value of a "true" checkbox anything but -1. i'd like the checked box to display a positive 1 in the corresponding table, so that they may be added up for a further query.....
i am working with IIF statements now with no luck,
Please tell me how i can fix it, and if there is a simple way of changing the value to a positive number, or even to a letter or word!
I have a access form that when a user clicks a button it runs a report for that particular record. When the user clicks this button to run the report I would like to have a check box or whatever else you recommend on the form that would become checked once the user runs this report so that they will know that they have already ran a report for this record. If they try to run it again a msg box will appear letting them know that a report has already been created but if they want they can run it again. Any Ideas or HELP?????
If Me.Check25.value = "no" Or Me.Check25.value = "" Then MsgBox "You must agree to the terms below.", vbOKOnly, "Required Data" Me.Check25.SetFocus Exit Sub End If
What the easiest way to turn text to an integer - ir have vaiable defined as long and an inputbox - want to keep asking for an input until I get an integer.
Hi In my tables I have set a field to Yes/No and the format to be True/False. When I activate the table it shows the field as a checkbox, however when I create a List Box on a form to that table it displays the fields as True/False, how can I get the list box to also display the field as a checkbox.