Login form, to form

[funkygoorilla]

Hi,
I have a login form setup in a database that basically uses a table to check for username and password. I would like to be able to use that login information to automatically open a form, that also pulls with it the users login name, and then store the login name to each record the user enters. I am hung up on how to get the login information to transfer over to the form.
Here is the code that controls the login process;

Option Compare Database

Private Sub cbo_user_AfterUpdate()
    Me.txt_Password = Empty
    Me.txt_Password.Enabled = True
    Me.txt_Password.SetFocus
End Sub

Private Sub cmdOK_Click()
'test the stored password is = to the manually entered password

    If Me.cbo_user.Column(2) = Me.txt_Password Then
        DoCmd.OpenForm "frmMainMenu", acNormal

        DoCmd.Close acForm, "frmLogin"

    Else 'wrong match
        MsgBox "Wrong password entered." & _
            vbCrLf & "Please re-enter password.", _
            vbExclamation, "Invalid Password"
        Me.txt_Password.SetFocus 'places the cursor in password control
    End If

End Sub

All I need is the username. And then I need it to autopopulate a field in a form. Anyone have any ideas? Thanks in advance.

[pbaldy]

There are any number of ways to go forward, depending on your specific needs. The easiest is probably to hide the login form instead of closing it, and you can access the user from anywhere in the application with:

Forms!frmLogin.cbo_user

[funkygoorilla]

OK that sounds like a viable solution. Two questions, would hiding the form, make it inaccessible until closed? Also, would hiding it be a function of VB?

[pbaldy]

Not sure what you mean by inaccessible. Users would be able to see/use it, but VBA code, macros and queries would still be able to access it. To hide it you would set its Visible property to False, either in VBA or a macro.

[funkygoorilla]

Ok. So currently the form has a button that runs this bit of code. Is is possible to have a macro that runs the code, then hides the form, and opens another?

[pbaldy]

I don't see the need for it. Just replace this line:

DoCmd.Close acForm, "frmLogin"

with

Me.Visible = False

[funkygoorilla]

Ah ok. I do have that working now.
How about for setting a text field on a form to the value of the username. Would I set the Default Setting of the text field to Forms!frmLogin.cbo_user? And I can then store that in a table?
Thanks again!

[pbaldy]

That's likely what I would do, yes (I can't remember if it needs = before it).

[Mclaren]

I prefer to close the form after saving the User Login details to a public variable.

In addition, i get the users :

Computer name and System name so that i can track which machine was used and which user on the machine add,edited or deleted records.