Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

CLE ALPHANUMERIQUE


Information sur la source

Catégorie :Maths & Algorithmes Classé sous : clé, clef, alphanumérique, tableau, string Niveau : Initié Date de création : 15/01/2001 Vu : 7 292

Note :
10 / 10 - par 1 personne
10,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (2)
Ajouter un commentaire et/ou une note

Description

pour generer une cle alphanumerique à partir d'un tableau de caracteres
 

Source

  • <%
  • Function LIBELLULE(Perpignan)
  • dim Tablo(50)
  • Tablo(0) = "0"
  • Tablo(1) = "1"
  • Tablo(2) = "2"
  • Tablo(3) = "3"
  • Tablo(4) = "4"
  • Tablo(5) = "5"
  • Tablo(6) = "6"
  • Tablo(7) = "7"
  • Tablo(8) = "8"
  • Tablo(9) = "9"
  • Tablo(10) = "A"
  • Tablo(11) = "B"
  • Tablo(12) = "C"
  • Tablo(13) = "D"
  • Tablo(14) = "E"
  • Tablo(15) = "F"
  • Tablo(16) = "G"
  • Tablo(17) = "H"
  • Tablo(18) = "I"
  • Tablo(19) = "J"
  • Tablo(20) = "K"
  • Tablo(21) = "L"
  • Tablo(22) = "M"
  • Tablo(23) = "N"
  • Tablo(24) = "O"
  • Tablo(25) = "P"
  • Tablo(26) = "Q"
  • Tablo(27) = "R"
  • Tablo(28) = "S"
  • Tablo(29) = "T"
  • Tablo(30) = "U"
  • Tablo(31) = "V"
  • Tablo(32) = "W"
  • Tablo(33) = "X"
  • Tablo(34) = "Y"
  • Tablo(35) = "Z"
  • randomize
  • do while len(cle) < Perpignan
  • num = Tablo(Int((35 - 0 + 1) * Rnd + 0))
  • cle = cle + num
  • loop
  • End Function
  • response.write ( LIBELLULE(10) & vbcrlf)
  • %>
<%
Function LIBELLULE(Perpignan)

	dim Tablo(50)
		Tablo(0) 	=	"0"
		Tablo(1)	=	"1"
		Tablo(2)	=	"2"
		Tablo(3)	=	"3"
		Tablo(4)	=	"4"
		Tablo(5)	=	"5"
		Tablo(6)	=	"6"
		Tablo(7)	=	"7"
		Tablo(8)	=	"8"
		Tablo(9)	=	"9"
		Tablo(10)	=	"A"
		Tablo(11)	=	"B"
		Tablo(12)	=	"C"
		Tablo(13)	=	"D"
		Tablo(14)	=	"E"
		Tablo(15)	=	"F"
		Tablo(16)	=	"G"
		Tablo(17)	=	"H"
		Tablo(18)	=	"I"
		Tablo(19)	=	"J"
		Tablo(20)	=	"K"
		Tablo(21)	=	"L"
		Tablo(22)	=	"M"
		Tablo(23)	=	"N"
		Tablo(24)	=	"O"
		Tablo(25)	=	"P"
		Tablo(26)	=	"Q"
		Tablo(27)	=	"R"
		Tablo(28)	=	"S"
		Tablo(29)	=	"T"
		Tablo(30)	=	"U"
		Tablo(31)	=	"V"
		Tablo(32)	=	"W"
		Tablo(33)	=	"X"
		Tablo(34)	=	"Y"
		Tablo(35)	=	"Z"


	randomize

	do while len(cle) < Perpignan
		num = Tablo(Int((35 - 0 + 1) * Rnd + 0))
		cle = cle + num
	loop

End Function

response.write ( LIBELLULE(10) & vbcrlf)
%> 

Conclusion

LIBELLULE(10) ,10 representant le nb de caracteres
 

Commentaires et avis

signaler à un administrateur
Commentaire de Trafalio le 15/05/2003 17:22:51

Ton code marche pas! Jsais pas pourquoi mais y fonctionne pas....

signaler à un administrateur
Commentaire de softghost le 28/06/2006 02:54:54

voila ca marche pas rien a afficheé

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

Tableau d'objet [ par jorrie ] Bonjours, j'aimerais créer un tableau de personne que je stockerais dans une variable session mais lorsque j'essaie il me met erreur de reference a l' Pb avec telechargement d'un fichier en asp.net 1.1 [ par Sardonnen ] bonjourj'ai un soucis avec le téléchargement des fichiers clients vers le serveur car le code html de la page est ajouté à chaque fois à la fin du fic Upload et les checkBox [ par Phenomenium ] Salut. J'ai une boucle qui insert en base des données en fonction des checkbox coché dans le formulaire et qui fonctionne nikel. Je recupere ma variab QUERY_STRING en asp ? [ par babaslow ] Bonjour, Je débute en asp et comme tout débutant je galère... Comment fait-on pour ajouter au code du dessous ceci Request.ServerVariables("QUERY_ST mise a jour d une table asp [ par garnier54 ] Bonjour,   J ai un problème bizarre avec une mise à jour d?une table Sécurité ASP.net - Forms Authentication [ par carlos95 ] J'essaie de mettre en place une application web sécurisée par un formulaire d'authentification. Mais je rencontre un problème pour décrypter les rôles Miniatures d'img (bisi-bis), Nurgle si T là ! [ par yous ] Je souhaite gérer des miniatures d'images pour optmiser les temps de téléchargement. Je travaille en .Net 1.1.Nurgle m'est déjà Mot Clé - moteur de recherche - Meta Tags [ par scottmat ] Bonjours à tous, Question qui va peut-être paraitre ridicule< Renvoi d'un string [ par zecups ] Salut a tous,j'ai un petit probleme avec mon javascript dans mon code behind dans ma page.netje m'explique:j'ai un bouton auquel j'ai rajoute un Oncli asp.net 2.0 envoyer un mail suite a un evenement update [ par ludwigfve ] Bonjour je veux en language  vbscript pouvoir envoyer un mail suite a l update d un formulaire et cela en recuperant la valeur email de ce meme formul


Nos sponsors

Sondage...

CalendriCode

Décembre 2008
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Téléchargements



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, 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
Temps d'éxécution de la page : 0,359 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.