Input into unbounds on an unbound form from unbound form with an unbounds

[Neophite]

I have an unbound form in which I am performing a login function: user name and password validation. It uses an unbound combobox with an unbound text control. The combobox pulls a string of five fields from the employee record table. The user selects their name from the list and inputs their password, validation occurs, and then based upon the user’s level, they are routed to the appropriate Navigation Control Form. This part works like a champ.



The problem I am having is that within the unbound Navigation Control forms there are several unbound text controls which I am trying to populate with data contained in the data string pulled by the combobox. I have found several potential go-bys, but I can’t seem to make the them work due to my poor grammar. I am now thinking about how I might use gintThis’s and gintThat’s, and go from there. Any suggestions would be appreciated.

[pbaldy]

Is this what you're after?

http://www.baldyweb.com/Autofill.htm

[Missinglinq]

In versions 2007/2010 the easiest way would probably to use global variables utilizing the new TempVars which, unlike previous global variables, don't lose their values if an error occurs.

Help should give you the needed info on declaring and setting them.

Linq ;0)>

[Neophite]

Thanks for the input. I looked at the solution offered and it looked to me like the unbound text control being updated was on the same unbound form. I am trying to update unbound text controls on another unbound form. I did however learn something, which was good. Another kind soul offered a solution using Tempvar's. I plan on playing with that idea tomorrow. I also found some possible solutions and "go-bys" in the Inside Out book. I suspect this problem will tease me for another couple of days. Thanks again for your suggestion.

Is this what you're after?

http://www.baldyweb.com/Autofill.htm

[Neophite]

Thanks for the input. I found a refence on Tempvars and their use and abuse in Access 2010 Inside Out. I'll give it a whirl.

[pbaldy]

I looked at the solution offered and it looked to me like the unbound text control being updated was on the same unbound form. I am trying to update unbound text controls on another unbound form.

Being on a different form is a simple matter of using the appropriate syntax:

http://access.mvps.org/access/forms/frm0031.htm

[Neophite]

Thanks. Pretty darn ineresting. That is a wonderful cheat sheet that helps me in several other problems I'm tinkering with. Okay, so I'll go back to the drawing board and play with it. Great -- another learning experience. Also, I'll ponder its use as it relates to deciphering this diddy I found someplace else: strSQL = "Update[activeEmp_Temp] set(ActiveEmp_Temp.Control.Number = " "& Forms![EmpAssignment_Log]![Control_Number] &")". I don't know if the syntax is correct as my scribbled note on the back of the napkin was done in haste. I feel like I'm a blind dog walking around a room bumping into things with my head; but eventually I, like most blind dogs, will figure out where all the head knockers are and thus be able to navigate the room, until someone moves the furniture.

Being on a different form is a simple matter of using the appropriate syntax:

http://access.mvps.org/access/forms/frm0031.htm

[pbaldy]

No problem. Your diddy is someone building SQL in code. They are concatenating the value of a form control into the string. Here's a tutorial on that if you're interested:

http://www.baldyweb.com/BuildSQL.htm

[Neophite]

So far no luck. Here is what I currently have after bumping into everything in the room a couple of times:

I have a unbound login form with an unbound combobox with which I do a user name and password validation. The combobox selects 6 fields from a table with the sixth field being the employee ID number. Works like a champ. After the validation, the application loads the appropriate unbound Navigation form. The code is as follows:

'Password is Correct
'Load EmployeeID from Combobox into gintEmployeeID
Me.[Combo21].Column(5) = gintEmployeeID
'gintEmployeeID = Me.Combo21.Column(5)
'Select appropriate Navigation form
Me.Visible = False
If Me.[Combo21].Column(4) = 0 Then
DoCmd.OpenForm "TeamMemberNavigation"
Else
DoCmd.OpenForm "TeamLeaderNavigation"
End If
'Close Login form
DoCmd.Close acForm, "DatabaseLogin", acSaveNo
cmdDatabaseSignin_Click_Exit:
Exit Sub

cmdDatabaseSignIn_Click_Err:
MsgBox "Err during DatabaseSignin: " & Err & ", " & Err
Resume cmdDatabaseSignin_Click_Exit
End Sub

I have the following Module for the public variable:

Option Compare Database
Option Explicit

Public gintEmployeeID As Integer

In the Navigation form, I have the following code to pass the employee ID number from gintEmployeeID to the unbound text box: EmployeeID:

Private Sub EmployeeID_OnOpen()
TeamMemberNavigation!EmployeeID = Me!EmployeeID
Set Focus = Me!EmployeeID
'Pass EmployeeID from gintEmployeeID to textbox
gintEmployeeID = Me!EmployeeID
'Me!EmployeeID = gintEmployeeID

Also in the Login form I have:

Private Sub Form_Load()
'Make sure current EmployeeID is reset when Login form loads
gintEmployeeID = False

End Sub

It dies a miserable death at "Me.[Combo21].Column(5) = gintEmployeeID" in the Navigation form selection routine.

So, what think you?

[pbaldy]

Based on your description:

'Load EmployeeID from Combobox into gintEmployeeID
Me.[Combo21].Column(5) = gintEmployeeID

You've reversed them. What you have is trying to put the value of the variable into the combo.

[Neophite]

Based on your description:

'Load EmployeeID from Combobox into gintEmployeeID
Me.[Combo21].Column(5) = gintEmployeeID

You've reversed them. What you have is trying to put the value of the variable into the combo.

After I sent my previous reply, it struck me that I might have my tos and froms mixed up. You have confirmed my blunder. However, after I changed it as specified, it choked at that line and Access froze up. I have read nearly a couple of dozen posts on various forum sites on the same subject. The name of the mod is unique, but perhaps it is not initialized/activated (the login form is the first place it is used) in the right location or I am missing some step/declaration that loads it or calls it.

[pbaldy]

It freezes? I assume you mean the variable is declared in a standard module? Shouldn't matter, and you don't have to do anything to initialize it. Can you post the db here?

[Neophite]

It freezes? I assume you mean the variable is declared in a standard module? Shouldn't matter, and you don't have to do anything to initialize it. Can you post the db here?

We probably need to take this discussion offline if at all possible as the DB contains security sensitive information and procedures of a government entity.

[pbaldy]

You can email it to me if you want

pbaldy
gmail
com

[pbaldy]

In reference to your question emailed with the db:

For starters, I am trying to get the EmployeeID from the Login form to the Navigation form so that I can populate a field in the header and then use it via queries, etc., to fill the name fields in that header and all subsequent form and subform headers, and to populate the EmployeeID field on all the transaction records created by an individual .

Since you also have other info in that combo, I'd probably leave the login form open but hidden. That lets you access it from any of the places you mentioned. If you want to "get it to the navigation form":

Forms!TargetFormName.TargetControlName = Me.Combo21