Randomizar Banners

[edson_jose 0]

Olá Pessoal ?

 

Tenho um banner na pagina principal em flash que utiliza esta tag para mostrar o banner

 

 

<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="468" height="60">

<param name="movie" value="imagens/banners/bannnerrr.swf">

<param name="quality" value="high">

<embed src="imagens/banners/bannnerrr.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="468" height="60"></embed>

</object>

 

 

Como faço para utilizar o script abaixo usando a extensão .swf em vez de .gif?

 

 

 

 

 

 

Dim array(4)

 

randomize

 

array(0)="img1.gif"

array(1)="img2.gif"

array(2)="img3.gif"

array(3)="img4.gif"

array(4)="img5.gif"

 

upperbound=ubound(array)

lowerbound=0

lrandom = Int((upperbound - lowerbound + 1) * rnd + lowerbound)

Response.Redirect "imagens/temp/" & (array(lrandom))

%>

[tr374 0]

Seguinte, no lugar do redirect eu coloquei um response.write direto no objeto, ve se funfa ai.<%Dim array(4)randomizearray(0)="bannnerrr.swf"array(1)="bannnerrr1.swf"array(2)="bannnerrr2.swf"array(3)="bannnerrr3.swf"array(4)="bannnerrr4.swf"upperbound=ubound(array)lowerbound=0lrandom = Int((upperbound - lowerbound + 1) * rnd + lowerbound)%><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="468" height="60"><param name="movie" value="imagens/banners/<%Response.write(array(lrandom))%>"><param name="quality" value="high"><embed src="imagens/banners/bannnerrr.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="468" height="60"></embed></object>