Ik ben bezig met een access database en nu wil ik dat als een gebruiker een formulier invult dat dan automatisch de volledige windows gebruikersnaam verschijnt. Ik heb al code gevonden om de inlognaam in te voegen.
Deze code gaat als volgt
Maar ik wil dus de volledige naam. Ik heb al op google gezocht en ook de search hier levert mij niet veel op. Elke keer kom ik weer op deze code uit en die geeft dus alleen de inlog naam.
Heeft iemand misschien enig idee hoe ik de volledige naam kan krijgen.
Deze code gaat als volgt
code:
1
2
3
4
5
6
7
8
9
10
11
| Private Declare Function GetUserName Lib "advapi32.dll" _ Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long Function username() As String 'Returns the name of the logged-in user Dim Buffer As String * 100 Dim BuffLen As Long BuffLen = 100 GetUserName Buffer, BuffLen username = Left(Buffer, BuffLen - 1) End Function |
Maar ik wil dus de volledige naam. Ik heb al op google gezocht en ook de search hier levert mij niet veel op. Elke keer kom ik weer op deze code uit en die geeft dus alleen de inlog naam.
Heeft iemand misschien enig idee hoe ik de volledige naam kan krijgen.
[ Voor 9% gewijzigd door Dopestar op 03-09-2003 14:02 ]
Not Dope, Not A star