Red de conocimiento informático - Material del sitio web - Cómo agregar un código aleatorio después del nombre de dominio

Cómo agregar un código aleatorio después del nombre de dominio

Cambie la página de inicio predeterminada a home.asp y luego escriba Response.redirect("index.asp?"amp; gen_key(8))

Función gen_key(digits)

p>

'Crear y definir matriz

dim char_array(50)

char_array(0) = "0"

char_array(1) = " 1"

char_array(2) = "2"

char_array(3) = "3"

char_array(4) = "4"

char_array(5) = "5"

char_array(6) = "6"

char_array(7) = "7"

char_array (8) = "8"

char_array(9) = "9"

char_array(10) = "A"

char_array(11) = " B"

char_array(12) = "C"

char_array(13) = "D"

char_array(14) = "E"

char_array(15) = "F"

char_array(16) = "G"

char_array(17) = "H"

char_array (18) = "I"

char_array(19) = "J"

char_array(20) = "K"

char_array(21) = " L"

char_array(22) = "M"

char_array(23) = "N"

char_array(24) = "O"

char_array(25) = "P"

char_array(26) = "Q"

char_array(27) = "R"

char_array (28) = "S"

char_array(29) = "T"

char_array(30) = "U"

char_array(31) = " V"

char_array(32) = "W"

char_array(33) = "X"

char_array(34) = "Y"

char_array(35) = "Z"

'Iniciar método de aleatorización para la siembra predeterminada

randomize

'Recorre y crea la salida según la variable pasada a

'la función para la longitud de la clave.

do while len(output) lt; digits

num = char_array( Int (

(35 - 0 1) * Rnd 0))

salida = número de salida

bucle

'Establecer retorno

gen_key = salida

Función final