Función que me devuelva una cadena aleatoria
Expertos.
Ayuda en una función que devuelva una cadena aleatoria (mínimo 10 caracteres) lo necesito con urgencia.
Lo necesito para para dar nombres de archivos aleatorio PSR.
Ayuda en una función que devuelva una cadena aleatoria (mínimo 10 caracteres) lo necesito con urgencia.
Lo necesito para para dar nombres de archivos aleatorio PSR.
1 respuesta
Respuesta de Antonio Garcia
1
Aunque no es muy difícil construir esta función, tienes que tener en cuenta que la posibilidad que se repita el nombre aunque remota, puede darse. Sin embargo se me ocurre que puedes utilizar algo así
INTEGER li_for
INTEGER li_char
STRING ls_cadena
STRING ls_char
Randomize(0)
FOR li_for = 1 TO 15
li_char = RAND(25) + 96
ls_char = CHAR(li_char)
ls_cadena += ls_char
NEXT
El resultado final lo tienes en ls_cadena, puedes aumentar la longitud de la cadena simplemente variando el tamaño del bucle.
Solo ten en cuenta que puede en algún momento repetirse el nombre del fichero, por lo que te recomiendo verificar el nombre del fichero con FILEEXISTS(), si existe vuelves a invocar la función sino utiliza el nombre, claro esto si y solo si, los ficheros serán hubicados en el mismo dispositivo.
INTEGER li_for
INTEGER li_char
STRING ls_cadena
STRING ls_char
Randomize(0)
FOR li_for = 1 TO 15
li_char = RAND(25) + 96
ls_char = CHAR(li_char)
ls_cadena += ls_char
NEXT
El resultado final lo tienes en ls_cadena, puedes aumentar la longitud de la cadena simplemente variando el tamaño del bucle.
Solo ten en cuenta que puede en algún momento repetirse el nombre del fichero, por lo que te recomiendo verificar el nombre del fichero con FILEEXISTS(), si existe vuelves a invocar la función sino utiliza el nombre, claro esto si y solo si, los ficheros serán hubicados en el mismo dispositivo.
