| |||||
| Dernière réponse | |
|---|---|
| Sujet : [VB] comment récuper le nom de l'utilisateur | |
| k1200 | Private Declare Function GetUserNameA Lib "advapi32.dll" (ByVal lpBuffer As String, nSize As Long) As Long
Public Function GetUserName() As String Dim temp As String Dim slength As Long temp = Space(255) slength = 255 GetUserNameA temp, slength GetUserName = Left(temp, slength - 1) End Function |
| Vue Rapide de la discussion |
|---|