Result = ASUtilisateur(Nouveau_profil, Nouveau_mot_de_passe [, Connexion])
En anglais : ASUser
ASUtilisateur("QPGMR","qpgmr",MaConnexion)
