We discussed it recently in a meeting, we work with people that have very little computer knowledge, the system admin, myself and the Training manager decided to create a password based on the employees initials and birthdate. I personally don't agree with it, but its not my call.
Thanks for your help however.
BL
User Profile
Collapse
-
I figured this out. I have a button, btnUpdate, when clicked :
Code:Private Sub btnUpdate_Click() Form_sfrmRequiredLevelI.txtTrainee.Value = Me.txtTraineepassword DoCmd.Close End Sub
Leave a comment:
-
Hello Again,
I'm still attempting to accomplish this the way I had originally imagined it. So far I have accomplished a few things:
I have the main form with a subform, "sfrmrequiredge neral", it has a yes/no control, "chkClassTaken" , and three text fields "txtTrainer " and "txtTrainee " and "DateTaken"
when chkClassTaken = -1(true) "frmTrainerPass wordReq"...Leave a comment:
-
I finally got this working. I was getting a key violation and after doing some research, found that if i took off the "referentia l integrity" it would work.. and it did.
(NOte: I made a bunch of changes to my tbl structure for another reason, so the names are different)
Thank you so much for you help!!
Code:Private Sub btnEnter_Click() Dim strSQL As String If Me.chkHRAdmin
Leave a comment:
-
I changed the txtTrainer text box to a combo box and renamed it cboTrainer. Then added an afterupdate for cboTrainer to open the form frmPasswordReq. (The combobox source is the qryCurrentEmplo yees, with fields labeled "LogOnName" and another for "Password")
How do I link cboTrainer from sfrmRequiredGen eral to txtTrainerPassw ord in sfrmTrainerPass word?
The password doesn't need to be saved anywhere...Leave a comment:
-
Update a table using VB
Hello Again, (although I haven't figured out my other problem yet, I decided to tackle another obstacle!)
what I am trying to accomplish:The Trainer will click a checkmark when a trainee finishes a specific class, this opens a prompt for the Trainer's password. When the password is entered, you push a button, the prompt closes and updates a field in the main form with the Trainer's name and another textbox with the current date.... -
Trying it without the primary key field noted
Code:Private Sub btnEnter_Click() Dim strSQL As String strSQL = "INSERT INTO tblClassGroup (ClassAreaStationID, GroupID) " & _ "VALUES ('" & Me.txtClassAreaStationID.Value & "', " & 19 & ")" DoCmd.RunSQL strSQL End Sub
Leave a comment:
-
I think i got it, but when i attempted to test, i got an syntax error
Code:Private Sub btnEnter_Click() Dim strSQL As String If Me.chkHRRep = -1 Then strSQL = "INSERT INTO tblClassGroup ([ClassGroupID], [ClassAreaStationID], [GroupID]) VALUES (" & Me.ClassGroupID.Value & ", " & Me.txtClassAreaStationID.Value & ", " & 19 & ")" DoCmd.RunSQL
Leave a comment:
-
Thank you both for you help. I am attempting to enter the code now, but got lost at:
(" & Me.GroupID.Valu e & ", " & Me.ControlName2 .Value & ", " & Me.ControlName3 .Value & ");"
The table is being updates is called
tblClassGroup
ClassGroupID (primarykey)
ClassID
GroupID
the checkmarks need to represent the...Leave a comment:
-
BabyLucifer666 started a topic Using Multiple Checkboxes in a Normalized Database to add new recordsin AccessUsing Multiple Checkboxes in a Normalized Database to add new records
Hello All, (using Access2000)
I have a form with multiple unbound checkboxes. What I would like to do is have the user check whoever needs to take a specific training course. My database is normalized, I have no Yes/no fields in my tables, what I have is VB code that inputs an IDnumber into the field that matches the specific job title for the employee that needs to take that course:
Code:Private Sub chkMFGAssoc_Click()
-
Thanks for you help, I got it working, the mainform is bound to a qry and the subform is bound to another qry. The comboboxes now filter the subform to show the results needed.
Nic, I think that will be useful to try, THANKYOU.
BLLeave a comment:
-
HI!
Thanks for you help.
When I open the main form the subform (which is shown in datasheet view) is blank. But when i open the subform seperately it shows data.
The AfterUpdate code is just an openquery:
Private Sub cboStation_Afte rUpdate()
DoCmd.OpenQuery "qryClassLookup "
End Sub
But doing it this way opens a seperate window, I want...Leave a comment:
-
Base a subform on multiple combobox selection problem
hello,
What I'm trying to do is create a list of classes based on what Area and Station they are in. I have the following tables set up already:
tblClasses
(Fields: "ClassID", "ClassName" , "Descriptio ns")
tblArea
(Feilds: "AreaID", "AreaName")
tblAreaStation
(Fields: "AreaStationID" , "StationNam e", "AreaID")...
No activity results to display
Show More
Leave a comment: