Página 1 de 1

Math.PassGenerate

Publicado: 18 Mar 2013 15:59
por Ceone
Buenas amigos de AMSSpecialist os traigo una pequeña función que genera passwords, nada del otro mundo... la encontré mirando en mi ya habitual foro de ru-board, aquí os dejo un pequeño ejemplo que he echo y el script, espero que lo disfrutéis!

Script:
Math.PassGenerate = function (sDelimiter, ...) 
    local sRet = ''; 
    local sAlph = 'abcdefghijklmnopqrstuvwxyz'; 
    if arg then 
        for i = 1, #arg do 
            if type(arg[i]) == 'string' then 
                for i = 1, tonumber(arg[i]) do 
                    sRet = sRet .. String.Upper(String.Mid(sAlph, Math.Random(1, #sAlph), 1)); 
                end 
            elseif type(arg[i]) == 'number' then 
                for i = 1, arg[i] do 
                    sRet = sRet .. Math.Random(1, 9); 
                end 
            end 
            sRet = sRet .. sDelimiter; 
        end 
    end 
    return String.TrimRight(sRet, sDelimiter); 
end 
 


a = 0;
repeat
	a = a + 1;
	Random1 = Math.Random(1, 5);
	Random2 = Math.Random(1, 5);
	Random3 = Math.Random(1, 5);
	Random4 = Math.Random(1, 5);
	Random5 = Math.Random(1, 5);

	sPass = Math.PassGenerate('-', tostring(Random1), Random2, tostring(Random3), Random4, tostring(Random5)); 
	
	result = ListBox.AddItem("ListBox1", sPass, sPass);
until a == 9;
Descarga:
Math PassGenerate.apz

Re: Math.PassGenerate

Publicado: 18 Mar 2013 17:10
por abood1987
thanks  :friends: