begin process at 2012 02 08 19:27:36
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

Chaînes de caratères

 > GÉNÉRER UNE CHAINE ALÉATOIRE

GÉNÉRER UNE CHAINE ALÉATOIRE


 Information sur la source

Note :
7,75 / 10 - par 4 personnes
7,75 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Chaînes de caratères Classé sous :string, chaîne, aléatoire, random, caractère Niveau :Débutant Date de création :09/05/2004 Date de mise à jour :01/06/2010 15:32:13 Vu :20 370
Auteur : BinOff

Ecrire un message privé
Commentaire sur cette source (5)
Ajouter un commentaire et/ou une note

 Description

Ce code source est très simple. Il permet de créer une chaine aléatoire (pratique pour une demande de confirmation par mail pour des votes ou autres...)

Je sais bien qu'il est possible par d'autres moyens d'arriver à la même chose => variables de sessions), mais avec ce code, on peut choisir son dictionnaire et surtout la taille de la chaine à générer.

Source

  • function CreateAleatoire(StrTaille)
  • '--------------------------------------------------'
  • 'Création d'une chaine de caractères aléatoire '
  • ' ----------------------------- '
  • ' strTaille : Longueur de la chaine de sortie'
  • '--------------------------------------------------'
  • Dim l, s, i, Dictionnaire
  • if StrTaille = 0 then exit function
  • Dictionnaire = "abcdefghijklmnopqrstuvwxyz1234567890"
  • l = len(Dictionnaire)
  • for i = 0 to StrTaille -1
  • randomize
  • s = s & mid(Dictionnaire, int(rnd * l)+1, 1)
  • next
  • CreateAleatoire = s
  • end function
	function CreateAleatoire(StrTaille)

		'--------------------------------------------------'
		'Création d'une chaine de caractères aléatoire     '
		' -----------------------------                    '
		'	strTaille : Longueur de la chaine de sortie'
		'--------------------------------------------------'

		Dim l, s, i, Dictionnaire
		if StrTaille = 0 then exit function

		Dictionnaire = "abcdefghijklmnopqrstuvwxyz1234567890"
		
		l = len(Dictionnaire)
		for i = 0 to StrTaille -1
			randomize
			s = s & mid(Dictionnaire, int(rnd * l)+1, 1)
		next
		CreateAleatoire = s
	end function

 Conclusion

le parametre strTaille permet de définir la longueur de la chaine qui sera renvoyée.

Amusez vous bien ;)


 Historique

01 juin 2010 15:32:13 :
correction d'une variable non déclarée

 Sources du même auteur

GÉNÉRATION AUTOMATIQUE DE TABLEAUX CROISÉS EN FONCTION D'UNE...
VÉRIFICATION D'UNE DATE AVEC GESTION DES ANNÉES BISSEXTILE
Source avec Zip GESTIONNAIRE DE NEWS AVEC COMMENTAIRES
FONCTIONS DE CONVERSION FRANCS <> EUROS
Source avec Zip FAIRE DES TÉLÉCHARGEMENTS EXCLUSIFS
Toutes les sources de BinOff

 Sources de la même categorie

FONCTION : REMPLACER LES CARRACTÈRES ACCENTUÉS PAR LEUR ÉQUI... par promeythey
CHERCHER ET REMPLACER UN MOT DANS UN FICHIER TEXTE par roro59650
CONVERSION CARACTÈRES UTF-8 VERS FRANÇAIS par EricDD
FONCTION UCFIRST EN ASP par DesignerCreator
Source .NET (Dotnet) FONCTIONS DE VÉRIFICATION DE LA SYNTAXE D'UNE CHAINE par vladam
Toutes les sources de la catégorie Chaînes de caratères

 Sources en rapport avec celle ci

AFFICHER LES LIGNES D'UN DATATABLE DS UN ORDRE ALÉATOIRE par taillecrayon
Source .NET (Dotnet) CHAINES DE CARACTÈRES - UPLOAD par arcollet
DÉCOUPER UNE CHAINE DE CARACTÈRE par bambina100
CONCATÉNATION D'UN CHAÎNE DE CARACTÈRES par Jos
GENERER UN NOMBRE ALEATOIRE par Nix

Commentaires et avis

Commentaire de StevenJLMunn le 12/05/2004 20:17:07

Pourquoi tu fais un dictionare quand tu pourrais faire:
Randomize
x = (Rnd * 254)+1
x = chr(x)
s = s & x
Avec ca n'importe lequel des Charactères ASCII pourait apparetre.

Commentaire de BinOff le 16/05/2004 12:29:12

si je ne fais pas ca, c'est pour éviter certains caractères spéciaux. La fonction a été créée à l'origine pour permettre la validation d'une action par mail.

L'utilisateur étant inviter à cliquer sur un lien avec une clé spéciale de validation, il ne fallait pas de caractères accentués, ni de symboles tels que le ?, et le & par exemple.

Commentaire de ThunderPsycho le 26/05/2004 10:26:15

Mouai bof...
Dans le cas ou tu veux un identifiant unique pour tes réponses par mail tu peux utiliser l'id unique de session de IIS, et meme tu peux y rajouter derriere un truc du genre :

Session.SessionID & "_" & Int(Date()) & "_" & Int(Time())

...
Comme ça tu peux même réidentifier ton client web a condition que tu ais une base de données avec tout ca dedans...

Commentaire de surfzoid le 13/12/2007 20:04:10 1/10

Je m 'y connait plus trop en site web, mais normalement ont fait pas ça avec un simple cookie !!!!!

Commentaire de BinOff le 14/12/2007 10:59:41

oui surfzoid, on peut le faire par variable de session. C'est marqué dans le commentaire de présentation.

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Couper chaîne de caractère [ par hugo7 ] Bonjour à tous , question bête je voudrais savoir comment en enlevent des caractère passer de cette chaîne: ~\JeuxVideo\images\image1.jpg à : image1.j Lecture de plusieurs données dans ma base SQL [ par olivierdn ] Bonjour, Je suis débutant en .NET et j'ai pas mal galéré pour trouver des bons tutos sur le C#. J'arrive à lire une donnée dans ma base de donnée. Ma popup en utilisant la methode RegisterStartupScript [ par za3ima41 ] Bonsoir j'utilise le code suivant pour afficher une page popup (.aspx), le problème c'est que le système n'accepte pas cette suntaxe en disant : 'Sy IF switch et déclaration de variable csharp asp.net [ par phpdos ] Dans ma "[B]private void[/B]" où je charge mes labels et dans mon "[B]termLabel[/B]", j'affiche les numéros de boîte Voici : [code=cs]mTermLabel.Tex ORA-00911: Caractère non valide. [ par Marsu006 ] Bonjour, je suis nouvelle sur ce site et je ne sais pas très bien comment il fonctionne... J'ai installé la version oracle express (gratuite) pour wi probleme avec listView [ par sabeur88 ] j'ai crée une listview et je veux recuperer les données mais il affiche des erreurs au niveau de selectedIndices et Subtimes et je ne sais pas pourquo MORPION tableaux [ par Emma0789 ] bonjour, voilà afin de réaliser un projet de morpion, il faudrait afficher un tableau contenant des "-" qui serait au fur et à mesure remplacé par des Connection string asp.net [ par jaron01 ] S.v.p je suis en train de programme une application avec asp.net+c# qui utilise Crystal Report lors de configuration de SqlConnection je me trouve fac generateur aléatoire [ par ALEX910 ] Bonjour a tous je cherche un petit script qui pourai me génerer des numeros de telephone portable et autre si posible merci a vous tous ca seari converstion de string en url [ par eniluape ] Bonjour, Dans le cadre de mes études, je fais actuellement un stage où je développe en ASP. Je ne suis pas une super développeuse c'est pourquoi je v


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

Photo Green Energy Solutions With Light Bulb Morphed Into LandscapePhoto Single Large Rock Formation in Monument Valley
Photo Happy Bright Landscape WIth Butterflies 

Visiter la photothèque
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,406 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)