Page 1 sur 1
[..] Generer un nom au hasard
Posté : mer. 26 août 2009 19:14
par kakashi545
bonjour, alors voila j'aurais besoin d'un script a intégrer dans un autre qui génère au hasard parmi l'alphabet un nom dans une zone de texte ^^"
merci d'avance
Re: generer un nom au hasard
Posté : mer. 26 août 2009 19:49
par Dididj
Quelque petites précision ne serait pas de trop...
-Un nom de maximum combien de caractères
-Un nom de minimum combien de caractères
-Avec ou sans les nombres
-Avec ou sans les caractères spéciaux ( Ex : é # / & )
-Avec ou sans les minuscules / majuscules
-Avec ou sans les espaces
Dididj
Re: generer un nom au hasard
Posté : mer. 26 août 2009 19:54
par kakashi545
-Un nom de maximum combien de caractères:8
-Un nom de minimum combien de caractères:3
-Avec ou sans les nombres:avec
-Avec ou sans les caractères spéciaux ( Ex : é # / & ):sans
-Avec ou sans les minuscules / majuscules:avec les 2
-Avec ou sans les espaces:sans
merci et aussi pour tout autre raison je dois faire un script a un amis qui est plutot nul en code et tout le tralala il ma donne le fichier.bat a exécuter depuis son script j'ai mis sa comme code:
ShellExecute("C:\Documents and Settings\(...)\ip.bat") mais il semble ne pas marcher je veut dire que le .bat ce lance mais ne me dectecte pas comme admin je pense et donc ne fait pas ce que je demande mais quand c'est moi qui clique 2 fois sur le .bat il marche! un solution pour mes 2 problèmes ^^
Re: generer un nom au hasard
Posté : mer. 26 août 2009 20:00
par Dididj
Je vais un peu regarder pour ton code. Par contre pour ton problème avec le .bat je ne sais pas.
P.S : pense a mettre les [..] dans le titre
Re: generer un nom au hasard
Posté : mer. 26 août 2009 20:02
par timmalos
Pour le .bat, essaye plutot avec Run()
Il existe un script sur ce forum qui fait deja ca, en charchant dans generateur de mot de passe.
Edit:
http://www.autoitscript.fr/forum/viewto ... eur#p18873
Re: generer un nom au hasard
Posté : mer. 26 août 2009 20:09
par kakashi545
merci du lien j'y vois un peut plus claire mais il n'y a pas de limitation dans le script du lien? et il y a les caractère spéciaux hors moi je ne les veut pas ^^ et le .bat avec run ne marche toujour pas
ps: oups un petit oublie quand le script auras generer le nom je voudrais qu'il le marque dans le champ d'ecrit^^
Re: generer un nom au hasard
Posté : mer. 26 août 2009 20:25
par Iste
kakashi545 a écrit :il y a les caractère spéciaux hors moi je ne les veut pas ^^
Bah suffit de pas les mettre
Code : Tout sélectionner
; $CharFlag - Use special chars in password.
; 0 = No
; 1 = Yes
Re: generer un nom au hasard
Posté : mer. 26 août 2009 20:27
par Dididj
Aussi non il y a aussi ceci :
► Afficher le texte
Code : Tout sélectionner
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <UpDownConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("PassWord Generator v1.0", 279, 211, 192, 124)
GUICtrlCreateLabel("PassWord Generator", 42, 8, 205, 28)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
GUICtrlCreateLabel("Password Len", 115, 60, 83, 17)
$PassWrdLen = GUICtrlCreateInput("10", 67, 56, 40, 21, BitOR($ES_CENTER,$ES_AUTOHSCROLL,$ES_READONLY,$ES_NUMBER))
GUICtrlCreateUpdown (-1)
GUICtrlSetLimit(-1, 20, 6)
$SpecialChars = GUICtrlCreateCheckbox(" Special Chars", 80, 96, 145, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$PassWrd = GUICtrlCreateInput("", 52, 136, 170, 21, BitOR($ES_CENTER,$ES_READONLY))
$Generate = GUICtrlCreateButton("Generate", 106, 176, 75, 25, 0)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetState($Generate, $GUI_FOCUS)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Generate
GUICtrlSetData($PassWrd, _PassWordGenerate(GUICtrlRead($PassWrdLen), _IsChecked($SpecialChars)))
EndSwitch
WEnd
;===============================================================================
; Description: Returns a password string with or without special chars.
; Parameter(s): $PassWordLen - The len of desired password
; $CharFlag - Use special chars in password.
; 0 = No
; 1 = Yes
; Requirement(s): None
; Return Value(s): Return a string.
;
; Author(s): JBnH
; Note(s):
; Examples: MsgBox(64,"Password without special chars", _PassWordGenerate(10, 0))
; MsgBox(64,"Password with special chars", _PassWordGenerate(10, 1))
;===============================================================================
Func _PassWordGenerate($PassWordLen, $CharFlag)
Local $PassWrd, $Global
If $CharFlag = 1 Then
$SpecialChar = StringSplit("&'_:;,.!@#$%*()-=+[]\/?", "")
For $X = 1 to $SpecialChar[0]
$Global &= $SpecialChar[$X]
Next
$Array = StringSplit("abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789" & $Global,"")
Else
$Array = StringSplit("abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789","")
Endif
For $X = 1 to $PassWordLen
$PassWrd &= $Array[Random (1, $Array[0], 1)]
Next
Return $PassWrd
EndFunc
Func _IsChecked($control)
Return BitAnd(GUICtrlRead($control),$GUI_CHECKED) = $GUI_CHECKED
EndFunc
Re: generer un nom au hasard
Posté : mer. 26 août 2009 20:36
par kakashi545
Re: generer un nom au hasard
Posté : mer. 26 août 2009 21:34
par timmalos
Essayez d'utiliser tout ce qu'on a mit, vous avez toutes les pistes.
Et Corrigez le titre comme on vous l'a déjà dit en rajoutant le [..] s'il vous plait
merci
Re: [..]generer un nom au hasard
Posté : jeu. 27 août 2009 12:27
par kakashi545
j'aime bien le script de dididj avec la gui mais moi le probleme c'est que je ne veut pas de gui je veut enfaite que la souris déjà placer sur la zone a écrire tape un nom au hasard dans la zone si c'est possible
Re: [..] Generer un nom au hasard
Posté : ven. 28 août 2009 17:38
par 20100
it's smell like bruteforce...
j'aime bien le script de dididj avec la gui mais moi le probleme c'est que je ne veut pas de gui je veut enfaite que la souris déjà placer sur la zone a écrire tape un nom au hasard dans la zone si c'est possible
Tu veux écrire une string générer aléatoirement dans quel zone?
- Formulaire web?
- Inputbox d'une application?
- Fichier texte, Excel?
Bon sinon voila de quoi faire avec _RandomString($stringlen), tu peux evidemment modifier ton dictionnaire si besoin. J'ai mis l'alphabet, les chiffres et quelques char spéciaux. Mais tu peux très bien t'en inspirer pour rajouter ce que tu veux dans ton dictionnaire, même des motifs si tu le souhaites
(par exemple : $motif[1] = ["toto"])
Code : Tout sélectionner
#include <Array.au3>
;===========================================================================================================
; Description : Création d'une string aléatoire
; Syntaxe : _RandomString($stringlen)
; Parametere : $stringlen = Taille de la string à générer
; Return : (String) $string
;===========================================================================================================
Func _RandomString($stringlen)
Local $alphabet[26] = ["a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z"]
Local $number[10] = [0,1,2,3,4,5,6,7,8,9]
Local $special[6] = [",",";",":","!","@","$"]
Local $sizeMax = UBound($alphabet) + UBound($number) + UBound($special) ; 26 + 10 + 6 = 42
Local $string = ""
For $i=0 To $stringlen-1 Step 1
$index = Random(0, $sizeMax-1, 1)
Select
Case $index < UBound($alphabet)
$string &= $alphabet[$index]
Case $index < UBound($alphabet) + UBound($number)
$string &= $number[$index-UBound($alphabet)]
Case Else
$string &= $special[$index-UBound($alphabet)-UBound($number)]
EndSelect
Next
Return $string
EndFunc
; Exemple de la fonction
Local $randomString = _RandomString(40)
MsgBox(0, "", "RandomString = "&$randomString&@CRLF&"Size = "&StringLen($randomString) )
Re: [..] Generer un nom au hasard
Posté : lun. 29 mars 2010 18:39
par julienduhavre
Bonjour, serait-t-il possible de créer un générateur qui prenne seulement un chiffre, une lettre ?
Je vous remercie d'avance
Re: [..] Generer un nom au hasard
Posté : lun. 29 mars 2010 23:33
par Tlem
