[R] Creation texte aléatoire

[ricky]

Hello,

j'aimerais savoir s'il existe une fonction qui permettrai de créer un nom aléatoire avec des lettres minuscules, majuscules, chiffres et de pouvoir choisir la longueur...

Merci d'avance pour votre aide

[matwachich]

Cette fonction n'existe pas, mais c'est très simple à réaliser avec d'autres fonctions:
Chr(), Random(), et la "ASCII Table" Dans "Appendix" de l'aide d'AutoIt

[mikell]

Code : Tout sélectionner

$longueur = 20
$txt = ""
$string = "azertyuiopqsdfghjklmwxcvbnAZERTYUIOPQSDFGHJKLMWXCVBN1234567890"
$char = StringSplit($string, "")

For $i = 1 To $longueur
$txt &= $char[Random(1, $char[0], 1)]
Next

MsgBox(0,"", $txt)

[ricky]

Merci mikell, c'est mickel, heu nickel...

[ricky]

J'en ai fait une fonction, une idée pour améliorer les if?

► Afficher le texte

Code : Tout sélectionner

Func TexteAleatoire($longueur = 10, $type = 1)

    ;$type = 1 : que lettres minuscules
    ;$type = 2 : que lettres majuscules
    ;$type = 4 : que des chiffres
    Local $txt = ""
    Local $lettresMini = "abcdefghijklmnopqrstuvwxyvz"
    Local $chiffres = "1234567890"

    if $type >= 4 then
        $type -= 4
        $txt &= $chiffres
    endif
    if $type >= 2 then
        $type -= 2
        $txt &= StringUpper($lettresMini)
    endif
    if $type >= 1 then
        $txt &= $lettresMini
    endif

    Local $char = StringSplit($txt, "")
    $txt = ""

    For $i = 1 To $longueur
        $txt &= $char[Random(1, $char[0], 1)]
    Next

    return $txt

EndFunc

[Tlem]

Il est est étrange de voir que peu d'entre vous utilise réellement l'outil de recherche du forum !!!

Ou alors est-ce l’hiver qui pousse les gens à trouver une occupation, quitte à refaire ce qui à déjà été fait ...

[mikell]

Boss, écrire ces 8 lignes de code m'a pris quelques secondes, moins de temps que pour faire une recherche

[zeshrek]

Mikell, le probleme n'est pas que ca t'ai pris 8 secondes ou 3 jours.
Le problème c'est que répondre a une telle question revient à encourrager un comportement réprouvé par l'administrateur et les modérateurs. Cela sape les efforts qui sont fait pour obtenir de tout le monde un comportement adulte, qui consiste a commencer par rechercher une solution avant d'appeler au secour. Et c'est regretable qu'un membre émérite n'en ait pas conscience.

[Tlem]

Comme à son habitude, Stéphane à mis les pieds dans le plat.
J'en profite donc pour faire comme lui et présenter mon point de vue.

Cela fait déjà quelques temps que certaines personnes donnent une réponse aux sujets dont j'ai indiqué au membre demandeur que la solution était à portée de main et qu'il suffisait de faire quelques efforts.
Ceci étant fait pour les rendre autonome et ne pas à avoir à perdre du temps sur des sujets qui ont pour la plupart été évoqués à maintes reprise.

Ce forum étant une communauté d'entre aide et de partage, c'est tout à leur honneur, mais passer derrière l'admin et lui casser la baraque, n'est pas quelque chose qui peut être apprécier à long termes.

Jusqu'à présent, j'étais partagé entre :

• - Me taire et faire comme si de rien était
  - Prendre certaines résolutions et clôturer un sujet sur lequel je serait intervenu en ce sens
  - Faire un p'tit message privé aux bienfaiteurs en leur expliquant que ce qu'ils faisaient n'était pas forcément la meilleure chose à faire.
  et enfin
  - Ne plus m'occuper de répondre aux diverses questions posées sur ce forum, car il y a suffisamment de bons samaritains !

Voilà, ceci étant dit, j'espère que cela ne découragera pas ces fameux bons samaritains à continuer de partager leurs connaissances et à aider nos chers membres en difficulté.

[DimVar]

Et c'est regretable qu'un membre émérite n'en ait pas conscience.

[MODE TROLL ON] Ça donne pas envie d’être membre émérite, faut avoir la même conscience qu'un gros modo vert!!![MODE TROLL OFF]

[ricky]

Personne ne peut m'aider sur mes problèmes de if?

Pour en finir avec la polémique et pour répondre à Tlem, puisque c'est lui qui a lancé la remarque.
Je suis désolé, mais j'ai cherché dans le forum et même dans celui en anglais, j'avais trouvé la fonction random dans le mode d'emploi mais elle ne me convenait pas. D'où ma demande...
Avant de faire mes demandes je fais des recherches, je suis aussi modérateur dans un forum et je connais la problématique...

[mikell]

Pour tes If, un indice : dans mon code la string de base fait 62 caractères alors pense aux délimiteurs de la fonction Random

[ricky]

Ben non, car on ne peut pas cumuler les fonction, bon tant pis, je vais faire avec une boucle et un switch...

[zeshrek]

Pour ton probleme de if, la solution c'est de virer les if. Comme ca plus de if, plus de probleme.
Il suffit de les remplacer par des BitAnd, et ca tient sur une seule ligne. On en proffite pour virer tout un tas de m*rdier qui prend de la place pour rien en mettant ce qui nous faut dans un tableau, et on a ca :

► Afficher le texte

Code : Tout sélectionner

Func TexteAleatoire($longueur = 10, $type = 1)
    ;$type = 1 : que lettres minuscules
    ;$type = 2 : que lettres majuscules
    ;$type = 4 : que des chiffres

    Local $txt = ""
    Local $lettres[5] = ["", "abcdefghijklmnopqrstuvwxyvz", "ABCDEFGHIJKLMNOPQRSTUVWXYZ", "", "1234567890"]
    Local $CharSet = $lettres[BitAND($type, 1)] & $lettres[BitAND($type, 2)] & $lettres[BitAND($type, 4)]
    Local $CharSetLen = StringLen($CharSet)

    For $i = 1 To $longueur
        $txt &= StringMid($CharSet, Random(1, $CharSetLen, 1), 1)
    Next

    Return $txt

EndFunc   ;==>TexteAleatoire

[Tlem]

Pour montrer qu'il existait déjà les bases :
http://www.autoitscript.fr/forum/viewto ... 395#p21395
http://www.autoitscript.fr/forum/viewto ... =21&t=1878
Là, je n'ai pris que deux liens de la première page de ma recherche, p'tet qu'en cherchant un peut plus il y à encore mieux !!!

[mikell]

Ouah le code sur le lien 2
J'avais pas pensé à chercher "générateur" ou "mot de passe"

[Tlem]

une fonction qui permettrai de créer un nom aléatoire avec des lettres minuscules, majuscules, chiffres et de pouvoir choisir la longueur...

Si le but final n'est pas de créer un pseudo mot de passe, la définition y ressemble comme deux gouttes d'eau en tout cas.

[ricky]

Merci zeshrek, connaissait pas...

@Tlem, effectivement, ça y ressemble et je n'ai pas pensé à chercher avec "mot de passe" mais avec "aléatoire", "texte aléatoire", "random".
Et pour te répondre, non, ce n'est pas pour créer des mots de passe.