 |
 |
 |
| |
Amusez-vous et gagnez de l'argent
|
|
 |
 |
 |
 |
 |
 |
| |
NEWSLETTER
Soyez tenu au courant des nouveautés ou bons plans. Les sujets concernés sont :
- la photo
- la programmation
|
|
 |
 |
 |
|
 |
 |
 |
| |
 Nom d'utilisateur
A copier dans un module :
Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long
Public Function NomUtilisateur() As String
Buffer$ = Space$(256)
guLen& = Len(Buffer$)
A% = GetUserName(Buffer$, guLen&)
NomUtilisateur = Left$(Buffer$, guLen& - 1)
End Function
Le code pour recevoir le Nom d'utilisateur :
MsgBox NomUtilisateur()
|
|
 |
 |
 |
|