Tema: random sub
Ver Mensaje Individual
  #7 (permalink)  
Antiguo 25/02/2005, 12:54
Avatar de AlZuwaga
AlZuwaga
Colaborador
 
Fecha de Ingreso: febrero-2001
Ubicación: 34.517 S, 58.500 O
Mensajes: 14.550
Antigüedad: 24 años, 2 meses
Puntos: 535
Mmm igual no sé si se pueda ejecutar aleatoriamente varias subs de ese modo. Creo que lo ideal sería hacer sólo una SUB que se encargue de "aleatorizar" algo (en este caso el nombre de la imagen.. porque aparentemente es lo único que cambia en el código). Propongo algo así:

Código:
<%
Function LugarAleatorio()
	Randomize
	NumeroAleatorio = int(rnd*4)
	Select Case NumeroAleatorio
		Case 0
		LugarAleatorio = "catalunya"
		Case 1
		LugarAleatorio = "andalucia"
		Case 2
		LugarAleatorio = "Otro lugar"
		Case 3
		LugarAleatorio = "Y otro lugar"
	End Select
End Function
%>

<% VarLugar = LugarAleatorio() %>
<table width="130" border="0" cellpadding="0" cellspacing="0">
<tr>
<td><img src="eltiempo.jpg"></td>
</tr>
<tr>
<td><table cellspacing=1 cellpadding=3 bgcolor="#000000" width=130>
<tr>
<td bgcolor=eeeeee><a href="eltiempo.asp"><img src="http://www.meteored.com/ccaa/imagenes/<% = VarLugar %>.gif" width=122 border="0" alt="<% = VarLugar %>"></a>
</td>
</tr>
</table><br>
__________________
...___...

Última edición por AlZuwaga; 25/02/2005 a las 12:56