|
|
| |
|
|
Making A Simple Randomizer (ing) |
|
927 Görüntülenme |
Kodu .asp uzantılı dosya olarak kayıt edip çalıştırmalısınız
<%
Randomize(Cbyte(Left(Right(Time(),5),2)))
RANDOMVALUE =(Int((10 - 1 + 1) * Rnd + 1))
Select Case RANDOMVALUE
%>
<% Case 1 %>
"BANNER_ADS/ITSHUGE.gif"
<% Case 2 %>
"BANNER_ADS/STACKED_DEEP.gif"
<% Case 3 %>
"BANNER_ADS/ITSHUGE.gif"
<% Case 4 %>
"BANNER_ADS/STACKED_DEEP.gif"
<% Case 5 %>
"BANNER_ADS/ITSHUGE.gif"
<% Case 6 %>
"BANNER_ADS/STACKED_DEEP.gif"
<% Case 7 %>
"BANNER_ADS/ITSHUGE.gif"
<% Case 8 %>
"BANNER_ADS/STACKED_DEEP.gif"
<% Case 9 %>
"BANNER_ADS/ITSHUGE.gif"
<% Case 10 %>
"BANNER_ADS/STACKED_DEEP.gif"
<% End Select %> |
|
|
|
|
|
| |
|
Bu içerik hakkında hiç yorum yapılmamış |
|
|
|
|
|
|
|
|
|
|
|
