Hi
I have designed a MS Access tool accessed by multiple user. The first screen asks for badge number which is unique for each user. I wanted to do away with that screen. Instead wanted to get the username of the currently logged in user, may be from registry or somewhere. We have Windows XP here. Is there any VBA script for that....Need help!!
I am trying to record the current windows username in an audit field. But all i can get is the Username Admin?
Dim MyForm As Form, C As Control, xName As String
Set MyForm = Screen.ActiveForm
'Set date and current user if form has been updated.
MyForm!Audit = MyForm!Audit & Chr(13) & Chr(10) & _
"Changes made on " & Now & Date & " by " & CurrentUser() & ";"
[Code] ....
How to make a form that must Check the username and password of a user, in case if they are true then let the user to visit other forms and Tables...
View 1 Replies View RelatedI am trying to match if a user has already started a record using the date and username. I have written the following code but I keep getting a error 94 about null. I know its an issue involving the date part. why this isn't working.
Code:
DLookup("TimeSheetID", "TimeSheet", "EmployeeID=" & Nz(Me.ListEmploy.Value) & " AND TimeSheetDate=#" & Date2 & "#")))
The full code
Code:
Dim Date2 As Date
Date2 = Date
If (Not IsNull(DLookup("TimeSheetID", "TimeSheet", "EmployeeID=" & Nz(Me.ListEmploy.Value) & " AND TimeSheetDate=#" & Date2 & "#"))) Then
lngEmployeeID = DLookup("TimeSheetID", "TimeSheet", "EmployeeID=" & Nz(Me.ListEmploy.Value) & " AND TimeSheetDate=#" & Date2 & "#")
DoCmd.OpenForm "frmTimeSheetMain", , , "TimeSheetID=" & Nz(lngEmployeeID), , , "NoTimeSheetID"
What I really need is for when the form opens, it looks at todays date, then matches current user and then goes to that record for today, if no current user there, then will goto new record..
i know, sounds complicated, and probably is really easy, but my heads not with it today, as about to get drunk as its my 40th, and got people ringing and texting and still trying to get this done....
I've included a copy of this database, named Timecards..
I'm creating a database for a college assignment, and for this database, I need to record the current user ID when a record is created/updated. But I dont know the function (like, Now() returns the current date/time) that gives me the user ID. The help files are awful and I cant find the function I need =(
View 2 Replies View RelatedI need to mine the Proper Name of the current user and automatically populate a field on a form. I've tried default value = currentname() and all I get returned is Admin. How can I retrieve the Proper Name of the network username and auto populate a field? Any help is appreciated.
View 6 Replies View Relatedi have a database that users log into before they can do anything, after they log in, when they open up a form, i want the username that was used to log in to be displayed and stored in a field. how would i do that?
Here are the relevant fields and tables
Name ---------------------- Description
USERS --------------------- contains username/password/success/date time for login
Login ---------------------- Login form
Username ------------------ Username field in 'Login'
Password ------------------ Password field in 'Login'
EXPOSURE_REPORT --------- Table that contains information for form VV
EXPOSURE_REPORT --------- Form
REPORTRECIEVEDBY -------- field that needs the current user stored in it
there are 6 or 7 users total, if that's at all relevant,
thanks!
Hi Guys, my first post hereim making a database for work and need to figure out the followingi have two people that uses a ms access db, each entering data.i made a custom macro in the vb editor:Public Function cUsername() cUsername = Environ("USERNAME")End Functionwhat i want to do now is, everytime a new entry is added in the table, it should add that username to the "user" cell... it should only do this once, so for example, when i enter data it will show "albert" and if i was to close it, login as "steve" it should still show "albert" under the ones i added, and not steve...this needs to be in the table not a query or form...thanks for your timeAG
View 2 Replies View RelatedIf I have a field in a table called "AddedBy", is there a way for this to default to the CurrentUser that's logged in to the database when a record is added to the table? I know you can use "Application.CurrentUser" both in the VB code and within SQL queries, but it doesn't seem to work if I put it in the "Default Value" box with the table editor. Any thoughts on this would be appreciated. Thanks!
View 2 Replies View RelatedI am setting up a call log for an application. Once a message has been entered, I need to restrict access to the person who created it AND to managers (who have admin privelages to the database). Since the user who created a message needs to be able to go back in and edit it if necessary, I can NOT simply restrict access to the edit form to admins.
The command that opens this form looks like this so far:Code:If ((Me.[Transaction] = "Status Call") And _ (Me.[TransactionBy] = CurrentUser())) THEN DoCmd.OpenForm "frmEditMessage" ...Else MsgBox("Blah blah blah, etc etc.")End IfI need to add something to the initial If statement like this:Code:Or (CurrentUser.isMemberOfGroup("Admins"))but I don't know the correct Access syntax for it.
Any help anyone can give me would be appreciated!
I was creating a program using ms access. consist of 2 table of database called employee and userlevel.. in employee table have ID, name, username, password,userlevel, and others related employee profile.. and in userlevel table, it consist of admin level and normal user level.. Userlevel table allow to differenciate admin and normal user(employee) .. in my program each employee having their own loginID and pass to access their own data.. the problem with my program now is displaying the data that belong to the logged in employee. its mean that it only show the data that owned by currently user that logged in..
View 7 Replies View Relatedhow i can get a current user from a custom login form CurrentUser() this function always return a system user name admin as default. In my login schema i have a Hidden splash form that have a unbound field that holds user name from custom login form after login a dashboard execute and also display user name on dashboard according to user login ,this working fine for mine. Actually i want to make a currentuser stamp in every entry when a record is entered in database.
View 1 Replies View RelatedI have a combo box that needs to only show approved values for any current data input but also be able to show legacy values (that were approved at one time but are no longer approved).How can I only allow the user to select from current approved values but still be able to pull a legacy record and show the legacy value.
Table structure
tblRepairReason
ID (Nnumber)
Name (Text)
ApprovedValue (Yes/No)
The recordsource of the combo box:
Code:
SELECT tblRepairReason.ID, tblRepairReason.Name, tblRepairReason.ApprovedValue
FROM tblRepairReason
WHERE (((tblRepairReason.ApprovedValue)=True));
I have a table with several columns (13).
Every week i want to import a csv-file (250 records) which may or may not have been updated, say 200 are the same as previous week and 50 records are new/updated.
Is there a way to import the csv and add an extra column with who imported all of the new records (based on currentuser)?
How to write Sample Code to Retrieve the Current User Name?I have done for short name only and I need it full
Private Declare Function apiGetUserNameWindows Lib "advapi32.dll" Alias _
"GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long
Function fOSUserName() As String
Dim lngLen As Long, lngX As Long
Dim strUserName As String
[code]....
I have an access program and i want it to save a copy into a location... ive got it so it can save however - i want it to save to the current users documents folder (win 7)
What file path would i use?
I manage a fleet of vehicles at work with drivers assigned to these vehicles. Each driver may opt to pay a contribution for private use of these vehicles.
This can normally be done on an excel database, however, the drivers sometimes go on leave, so I need to put their payments on hold. At this time, other drivers may take over for that period or the vehicle is left at the office. Also, the drivers change their level of contribution from time to time, so I need to adjust that accordingly too.
When the driver takes over a vehicle they complete a form that has the contribution level (there are 4 to chose from) and the dates they will have it from. They always provide a start date, however, sometimes the end date is left open.
Sometimes, driver A will say something like 'From 1 Jan 2012 To Open' then driver B may take it for a week and say 'From 1 July 2012 To 1 August 2012'.
I want to know if Access is the right tool to produce the report with the current driver, and that it will revert back to the Driver A after 1 August?
I want to show one ribbon for any user level.
Into attach file I use a UserTable to test different user/level.
I retrieve this error: Error 438"Object Doesn't Support This Property or Method" ...
I have written a user defined function that calculates the end of the current month. This I named EndOfThisMonth. It works well as a function. Now I would like to use it as date criteria to include in a query. The function is included as such EndOfThisMonth().
The field on which this function is to enter as a criteria is another calculated date function called Due.
When I run this query I get an error message saying Undefined Function 'EndOfThisMonth' in expression.
So I have this relatively simple problem: I need to create a button that once clicked will open the Save As dialog box and allow the user to save a copy of the current database where he wishes. The filename should contain todays date in DDMM format along with some pre-set text e.g. DDMM PresetText.
I am using Access 2010.
Hello
I have a very important access database running on a Windows 98SE laptop with Access 97 on the laptop. I wish to have that database backep up and opened on an XP machine running Access 2003. The problem is that the laptop is a corporate laptop with lots of security features and the database can only be opened by that laptop. The laptop only has permissions to read the file, so cannot remove the protection. I have tried to copy the system.mdw file across to the xp machine (in the correct directory), but I still get the below error.
The current user account doesn't have permission to convert or enable this database.
To convert or enable a database, ensure the following:
* You must join the workgroup that defines the user accounts used to access the database.
* Your user account must have Open/Run and Open Exclusive permissions for the database object.
* Your user account must have Modify Design or Administer permissions for all the tables in the database, or it must be the owner of all tables in the database.
* Your user account must have Read Design permission for all objects in the database.
* Request that other users close the database.
I have tried to create a new database on the xp machine and import all the data into a new database, but again I get an error (but only when importing certain forms and macros) below:
"You don't have permission to import, export or link to 'item name'"
I have also tried to create a blank database and import data from the database into it on the laptop, with the same error message above.
Does anybody have any ideas about this one? For example is there a piece of software to remove the protection (not a password remover)? - help appreciated.
I have the security set via the Access workgroups for both groups and users. I want to be able to use the username entered on the logon screen to filter my query results.
How can I get the logon id that was entered when my switchboard form opens?
Thanks in advance.
Dennis Cronin
I have entered the following code to an onclick button. I am sure I have written it incorrectly (it's probably the line I highlighted below to do with username=Manager. By the way Manager is one of my usernames I have created.
Thanks for your help.
Rob
Private Sub Label218_Click()
If UserName = Manager Then
DoCmd.OpenReport "Tennis Teams", acNormal
Exit Sub
End If
MsgBox "You do not have permission to open this form!", vbOK, "Tennis Center Business Manager 2007"
End Sub
Have developed a support database in Access.
I need the dB to automatically pick up the username of the user logged on to the PC. Thus if I'm logged on to the PC as FLESTER, this username wil populate a database field.
Any ideas?
How do you get Access to pick up th OS username currently logged in to the database? For example I'm logged on to the PC as FLESTER and I wnat that recorded in the dB.
View 5 Replies View Related