Randomize per include

[francy_eb]

Ciao a tutti,
è possibile far si che al reload della pagina, tramite la funzione randomize passare un include file/virtual (da valutare quale utilizzare) sempre diverso:
es
<%

Randomize()
sponsor = 5
n_sponsor = CInt( sponsor*Rnd() + 1 )

Select Case n_sponsor
Case 1 sponsor = "pippo.asp?q=prestito"
Case 2 sponsor = "pippo.asp?q=finanziamenti"
Case 3 sponsor = "pippo.asp?q=mutuo"
Case 4 sponsor = "pippo.asp?q=prestiti online"
Case 5 sponsor = "pippo.asp?q=finanziamenti online"
End Select

%>
Come posso fare per includere sponsor in


Spero di essermi spiegata
Grazie

[longline]

Non si può fare, gli "include" vengono eseguiti prima dell'esecuzione dell'ASP.

[Baol74]

<% 
Dim page,n_sponsor,q
Randomize() 
n_sponsor = CInt( 2*Rnd() + 1 ) 

Select Case n_sponsor 
Case 1:
 page = "pippo.asp":q="prestito" 
Case 2:
 page = "pippo.asp":q="finanziamenti" 

End Select 
Server.Transfer(page)
%>

nella pagina pippo vedrai la variabile q, il quesystring è un'altro discorso...