Nombre de la función:Nombres Aleatorios
Descripción:Genera nombres aleatorios
Lenguaje:ASP
' Funcion para generar nombres aleatorios
Function GeneraNombreRandom(strNombreArchivo)
Dim strFecha
'Quita caracteres ilegales
strFecha = Year(Now) & String(2 - Len(Month(Now)), "0") & Month(Now) & String(2 - Len(Day(Now)), "0") & Day(Now)
Randomize
'Regresa
GeneraNombreRandom = strNombreArchivo & strFecha & "_" & CStr(Round(Rnd * 1000000))
End Function