Requeste en string

not quiet sur ewhat youmean here rickie but

environ("username")

gives you the name of the preson currently logged on

It´s not working! I have a loginscript for my access. When a user is logged in i want it to display the username.

It uses the following:

Option Compare Database
Option Explicit

Public UserName As String
Public SecurityLevel As Levels

Public Enum Levels
    SecReadOnly = 1
    secuser = 2
    secadmin = 3
End Enum

How do i show the user in the form in a textbox?

Hi rickie
The code doesnt show how the useris logging on only that there is a variable (UserName).

Try making a function

Public Function GetUserName() as string

GetUserName = UserName

End Function


Then you can use for example

MsgBox "Du er logget in som: " & GetUserName


NOTE: NOT TESTED

Oki tak! Men hvad nu hvis jeg ikke vil have det som en tekstboks men som et fält i en form?

=GetUserName
or
=GetUserName()

maybe

I al sin enkelhed: =CurrentUser()

that all depends on how he is logging on. If its windows own logon then great, but of its a simple user-made system where the user enters their name into a text box and it gets saved into the variable then CurrentUser wont work.

But we dont know

Terry - It´s like you wrote. It´s a loginsystem in Access where the user enters username (UserName). I want to request it in a label.

Me.Label1.Caption=CurrentUser()

just to put things in place


In debug window (Ctrl+G) enter
?currentUser()

returns
Admin

current user returns the user who has logged in through Access's buildt in User/group security. And if that is not implemented returns admin who is the default user.


?environ("username")

returns the user who is logged in through Windows.


So, if you have your own login system then I am assuming that the  user who logged in is to be found in the variable UserName

So make a function as I gave 11/10-2006 14:24:18

and in your label

Me.NameOfLabelGoesHere.Caption=GetUserName()

I'm off for the weekend, if you cant get it to work, send to eksperten@NOSPAMsanthell.dk (remove NOSPAM) and I'll look at it as soon as I get back.

God weekend til alle

God weekend to you too.

Dette virker: MsgBox "Du er logget in som: " & GetUserName
MEN hvordan får jeg det in i en rapport eller en form? Der er jo 2 felter - Name og Caption. Hvor og hvordan sätter jeg det in i henholdsvis rapporten og formen?

Brugeren er logget ind og det er fint og det kan jeg se ved at bruge CTRL+G og ?UserFirstName

If you have a label on a form/report then in the form/reports Open event

Me.Label1.Caption = GetUserName()

Or if you want to set the caption on the form/report

Me.Caption = GetUserName()

Still not working! ?

can you send me your database?

Have you recieved it? :-)

No
eksperten@NOSPAMsanthell.dk

remove NOSPAM

still havent

Spm er lukket. Hvad blev resultatet???

Beklager! Kom til at lukke forkert spm. Spm er ikke klar endnu da Terry kigger på min DB. Opretter et nyt spm når dette er klart!

Rickie, I need an answer to my mail I sent you. Have yoy received it?