a ver si esto sirve
<%
Dim Aleatorio
Dim Fondo(3)
Dim FondoTabla(3)
randomize
Aleatorio = Int((3) * Rnd + 1)
Aleatorio=Aleatorio-1
Fondo(0)="css/prueba.css"
Fondo(1)="css/prueba2.css"
Fondo(2)="css/prueba3.css"
FondoTabla(0)="images/fondob1.gif"
FondoTabla(1)="images/fondob2.gif"
FondoTabla(2)="images/fondob3.gif"
%>